aboutsummaryrefslogtreecommitdiffstats
path: root/guix/mcgoron
diff options
context:
space:
mode:
authorGravatar Peter McGoron 2025-08-08 10:42:27 -0400
committerGravatar Peter McGoron 2025-08-08 10:42:27 -0400
commit44433f42f14eb0c86b87555710c3d950dd300099 (patch)
tree6bacee719592db24f6e86ec2818ab06bd01429db /guix/mcgoron
parentupdate README.md (diff)
rationalize packages, add foment
Diffstat (limited to 'guix/mcgoron')
-rw-r--r--guix/mcgoron/guix/chibi.scm54
1 files changed, 0 insertions, 54 deletions
diff --git a/guix/mcgoron/guix/chibi.scm b/guix/mcgoron/guix/chibi.scm
deleted file mode 100644
index 49e7545..0000000
--- a/guix/mcgoron/guix/chibi.scm
+++ /dev/null
@@ -1,54 +0,0 @@
-#| Copyright (C) 2025 Peter McGoron
- |
- | This program 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.
- |
- | This program 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 this program. If not, see <https://www.gnu.org/licenses/>.
- |#
-
-(define-module (mcgoron guix chibi)
- #:use-module (guix packages)
- #:use-module (guix build-system)
- #:use-module (guix build-system copy)
- #:use-module (gnu packages scheme)
- #:use-module (guix gexp)
- #:export (chibi-scheme-with-path
- chibi-scheme-build-system))
-
-(define chibi-lib-dir "share/guix-chibi")
-(define chibi-binlib-dir "lib/guix-chibi")
-
-(define-public chibi-scheme-with-path
- (package
- (inherit chibi-scheme)
- (native-search-paths
- (list (search-path-specification
- (variable "CHIBI_MODULE_PATH")
- (files (list chibi-lib-dir chibi-binlib-dir)))))))
-
-(define chibi-scheme-build-system
- (let ((lower* (build-system-lower copy-build-system)))
- (build-system
- (name 'chibi-pure)
- (description "Build system for copying Scheme libraries to Chibi module directory")
- (lower
- (lambda args
- (apply lower*
- (if (memq #:install-plan args)
- args
- (append
- args
- (list
- #:install-plan
- `'(("." ,(string-append chibi-lib-dir
- "/"))))))))))))
-
-chibi-scheme-with-path