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

Added TODO

Browse source
This commit is contained in:
Justin Ethier 2017-03-21 17:56:41 +00:00
parent 9849ea285b
commit c99e046517
1 changed files with 10 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
scheme/cyclone/cgen.sld
View file

@ -1414,11 +1414,20 @@
(else (else
;; Do not use closcall1 macro as it might not have been defined ;; Do not use closcall1 macro as it might not have been defined
(emit "cont = ((closure1_type *)cont)->element;") (emit "cont = ((closure1_type *)cont)->element;")
;(emit "((cont)->fn)(1, cont, cont);")
(emit* (emit*
"(((closure)" "(((closure)"
(cgen:mangle-global (lib:name->symbol lib-name)) (cgen:mangle-global (lib:name->symbol lib-name))
")->fn)(data, 1, cont, cont);") ")->fn)(data, 1, cont, cont);")
;; TODO: can GC to ensure objects are moved when exporting exports.
;; Ideally want to create an inner function and only do this for libraries
;; that we know are exporting exports. Otherwise it just wastes time on
;; startup
;(emit*
; "object buf[1]; buf[0] = cont;"
; "GC(data, "
; (cgen:mangle-global (lib:name->symbol lib-name))
; ", buf, 1);")
)) ))
(emit "}") (emit "}")