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

Do not precompute user defined prim

Browse source
This commit is contained in:
Justin Ethier 2017-07-19 18:02:20 -04:00
parent eb4a4b9aff
commit 5112aa9f46
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/transforms.sld
View file

@ -349,6 +349,7 @@
(and (and
(pair? ast) (pair? ast)
(prim? (car ast)) (prim? (car ast))
(not (prim:udf? (car ast)))
;; Does not make sense to precompute these ;; Does not make sense to precompute these
(not (member (car ast) (not (member (car ast)
'(Cyc-global-vars '(Cyc-global-vars