Fcalva/cyclone
1
0
Fork 0
mirror of https://github.com/justinethier/cyclone.git synced 2025-07-11 06:47:37 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Need to figure out how to compile cgen with Cyc_procedure

Browse source
This commit is contained in:
Justin Ethier 2015-07-05 22:58:09 -04:00
parent 9d16dc9426
commit 6c20402e3a
1 changed files with 15 additions and 14 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

29
test2.scm
View file

@ -2,20 +2,21 @@
(scheme file)
(scheme write))
;; TODO: C macros for funcall1, etc are not being generated even though entries are set
;; in the vector. must be another problem inspecting the vector ???
(write 'hello)
(let loop ((i 10))
(if (zero? i)
(write 'done)
(loop (- i 1))))
(write (command-line-arguments))
(write (when (lambda () #t) 'true))
(write (when (lambda () #f) 'false))
(write 'Cyc_procedure)
;;; TODO: C macros for funcall1, etc are not being generated even though entries are set
;;; in the vector. must be another problem inspecting the vector ???
;(write 'hello)
;(let loop ((i 10))
; (if (zero? i)
; (write 'done)
; (loop (- i 1))))
;
;
;(write (command-line-arguments))
;
;(write (when (lambda () #t) 'true))
;(write (when (lambda () #f) 'false))
;
;; Need to fix this up at some point:
;;
;; Lambda application is broken with pure varargs