fixing -c in chibi-ffi

This commit is contained in:
Alex Shinn 2015-02-12 23:50:15 +09:00
parent 695b845b11
commit 9007d1675e

View file

@ -2008,8 +2008,9 @@
;; chibi-ffi to compile to (chibi process) module. ;; chibi-ffi to compile to (chibi process) module.
(let* ((so (string-append (strip-extension src) (let* ((so (string-append (strip-extension src)
*shared-object-extension*)) *shared-object-extension*))
(execute (begin (eval '(import (chibi process))) (execute (begin (eval '(import (chibi process))
(eval 'execute))) (current-environment))
(eval 'execute (current-environment))))
(base-args (append cflags `("-o" ,so ,dest "-lchibi-scheme"))) (base-args (append cflags `("-o" ,so ,dest "-lchibi-scheme")))
(args (args
(eval (eval