Fcalva/cyclone
1
0
Fork 0
mirror of https://github.com/justinethier/cyclone.git synced 2025-05-25 04:55:04 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

WIP - debugging

Browse source
This commit is contained in:
Justin Ethier 2015-08-24 21:53:59 -04:00
parent 1951d7abe6
commit 32a2a72ab5
2 changed files with 11 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
TODO
View file

@ -13,7 +13,6 @@ Working TODO list. should start creating issues for these to get them out of her
if necessary, write makefile directive to automate rebuilding cyclone for macro development if necessary, write makefile directive to automate rebuilding cyclone for macro development
- clean up runtime - clean up runtime
- fix up return_ macros, remove cgen comments
- remove unused runtime globals, rename others to make more sense - remove unused runtime globals, rename others to make more sense
- need multiple closure types? maybe just migrate closureN to closure? - need multiple closure types? maybe just migrate closureN to closure?
- remove unused code, old comments, etc - remove unused code, old comments, etc

12
scheme/cyclone/macros.sld
View file

@ -1,5 +1,6 @@
(define-library (scheme cyclone macros) (define-library (scheme cyclone macros)
(import (scheme base) (import (scheme base)
(scheme write)
(scheme eval) ;; TODO: without this line, compilation just (scheme eval) ;; TODO: without this line, compilation just
;; silently fails. WTF?? ;; silently fails. WTF??
(scheme cyclone util)) (scheme cyclone util))
@ -64,13 +65,22 @@
defined-macros)) defined-macros))
(env (create-environment env-vars env-vals))) (env (create-environment env-vars env-vals)))
;; Assume evaluated macro ;; Assume evaluated macro
(newline)
(display "/* ")
(display (list 'evaluating-macro macro exp))
(display " */ ")
(eval (eval
(list (list
(cdr macro) (cdr macro)
(list 'quote exp) (list 'quote exp)
rename rename
compare?) compare?)
;env ;; TODO: at the moment this causes building cyclone to break because not
;; all macros can be evaluated correctly. suspect some shortcomings in
;; eval compared to compilation? anyway, as of now this line breaks:
;; 1) scheme/base.sld due to macros defined in this module being evaluated
;; 2) test2.scm, because we're trying to debug this issue
env
)) ))
)))) ))))