; Fix file headers and footers

* lisp/emacs-lisp/igc.el: Fix file header and footer.
* test/src/igc-tests.el: Add copyright and license statement.
This commit is contained in:
Stefan Kangas 2025-01-08 05:37:04 +01:00
parent 845be5bd0d
commit a05d7840f0
4 changed files with 27 additions and 5 deletions

View file

@ -7,4 +7,4 @@ FormatStyle: ''
CheckOptions: CheckOptions:
- key: bugprone-unused-return-value - key: bugprone-unused-return-value
value: 'mps_.*' value: 'mps_.*'
... ...

View file

@ -10,4 +10,4 @@ Todo list for scratch/igc
- Make native compilation work on macOS. (Might be fixed with Helmut's - Make native compilation work on macOS. (Might be fixed with Helmut's
exact root approach, but can't check because Homebrew libgccjit 14.1 exact root approach, but can't check because Homebrew libgccjit 14.1
makes problems when configuring (libgcc_s.dylib not found)). makes problems when configuring (libgcc_s.dylib not found)).

View file

@ -1,5 +1,4 @@
;; -*- lexical-binding: t; symbol-packagaes: nil -*- ;;; igc.el --- Short function summaries -*- lexical-binding: t -*-
;;; memory-report.el --- Short function summaries -*- lexical-binding: t -*-
;; Copyright (C) 2024-2025 Free Software Foundation, Inc. ;; Copyright (C) 2024-2025 Free Software Foundation, Inc.
@ -278,3 +277,5 @@ the changes to snapshot A. See the modes's help."
(setq igc--collect-timer (run-at-time nil secs #'igc--collect-stats))) (setq igc--collect-timer (run-at-time nil secs #'igc--collect-stats)))
(provide 'igc) (provide 'igc)
;;; igc.el ends here.

View file

@ -1,4 +1,23 @@
;;; igc-tests.el --- tests for src/igc.c -*- lexical-binding: t -*- ;;; igc-tests.el --- tests for src/igc.c -*- lexical-binding: t -*-
;; Copyright (C) 2024-2025 Free Software Foundation, Inc.
;; This file is part of GNU Emacs.
;; GNU Emacs is free software: you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
;; the Free Software Foundation, either version 3 of the License, or
;; (at your option) any later version.
;; GNU Emacs is distributed in the hope that it will be useful,
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;; GNU General Public License for more details.
;; You should have received a copy of the GNU General Public License
;; along with GNU Emacs. If not, see <https://www.gnu.org/licenses/>.
;;; Code:
(require 'ert) (require 'ert)
@ -13,3 +32,5 @@
(should (equal (igc--set-commit-limit nil) nil)) (should (equal (igc--set-commit-limit nil) nil))
(should (equal (assoc-string "commit-limit" (igc-info)) (should (equal (assoc-string "commit-limit" (igc-info))
'("commit-limit" 1 -1 0)))) '("commit-limit" 1 -1 0))))
;;; igc-tests.el ends here.