Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-05-19 05:39:18 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

chibi-genstatic: Remove inline? override

Browse source 
Remove inline? binding here; it was effectively no-op'ed
`--inline` option.
This commit is contained in:
okuoku 2017-09-09 17:12:13 +09:00
parent 887100b8ab
commit 307c3aeecf
1 changed files with 1 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
tools/chibi-genstatic
View file

@ -425,8 +425,7 @@
(set! *features* features)) (set! *features* features))
(let* ((c-libs+c-files (find-c-libs includes excludes cfiles)) (let* ((c-libs+c-files (find-c-libs includes excludes cfiles))
(c-libs (car c-libs+c-files)) (c-libs (car c-libs+c-files))
(c-files (cdr c-libs+c-files)) (c-files (cdr c-libs+c-files)))
(inline? #t))
(display "#include \"chibi/eval.h\"\n") (display "#include \"chibi/eval.h\"\n")
(newline) (newline)
(for-each (lambda (x) (include-c-lib x c-files inline?)) c-libs) (for-each (lambda (x) (include-c-lib x c-files inline?)) c-libs)