This commit is contained in:
retropikzel 2025-07-12 17:28:28 +03:00
parent 1ffbb2c547
commit a315ca5d1d
3 changed files with 426 additions and 461 deletions

View File

@ -69,7 +69,6 @@ clean:
find . -name "*.link" -delete
find . -name "*.meta" -delete
find . -name "*.import.*" -delete
rm -rf README.txt
rm -rf dist
rm -rf test
rm -rf deps

View File

@ -124,9 +124,6 @@ as compiler.
<a name="#roadmap"></a>
- Support for more implementations
- gerbil
- Dont know how to run this thing yet :D
- r7rs
- husk
- Dont know how to add directories to load path yet, might not be
implemented
@ -251,11 +248,6 @@ before running it. For example:
If you are using Chicken you should propably read the next section too, you
will most propably run into it soon.
### Mosh
<a name="#usage-mosh"></a>
Only allows one loadpath. No workarounds exist currently in compile-r7rs.
### mit-scheme
<a name="#usage-mit-scheme"></a>

View File

@ -201,32 +201,6 @@
append-directories)
" "
,input-file)))))
(gerbil
(type . compiler)
#;(library-command . ,(lambda (library-file prepend-directories append-directories r6rs?)
(apply string-append
`("gxc"
" "
,(util-getenv "COMPILE_R7RS_GERBIL")
" "
,library-file))))
(command . ,(lambda (input-file output-file prepend-directories append-directories library-files r6rs?)
(apply string-append
`("gxc"
" "
,(util-getenv "COMPILE_R7RS_GERBIL")
" "
"-prelude \":scheme/r7rs\""
" "
"-exe"
" "
"-static"
" "
,@(map (lambda (item) (string-append item "/ ")) prepend-directories)
,@(map (lambda (item) (string-append item "/ ")) append-directories)
" "
" "
,input-file)))))
(guile
(type . interpreter)
(command . ,(lambda (input-file output-file prepend-directories append-directories library-files r6rs?)