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

Possible TODO

Browse source
This commit is contained in:
Justin Ethier 2017-08-02 13:07:52 +00:00
parent 69a54ecb6a
commit 8684c93e20
1 changed files with 1 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
scheme/cyclone/cps-optimizations.sld
View file

@ -1533,6 +1533,7 @@
(lambda (x)
(or (not (pair? x)) ;; Should never happen
(and (prim-call? x)
;; TODO: necessary for gcbench stability??? (not (prim:mutates? (car x)))
(not (prim:cont? (car x))))))
args))
`(Cyc-seq