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

Disabling cyc-seq for now, since it breaks gcbench

Browse source 
Compiling with this seems to cause crashes (segfaults, etc) on the gcbench program.
This commit is contained in:
Justin Ethier 2017-08-01 18:08:12 -04:00
parent 0e5257eb91
commit 9a9bb4079f
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

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

@ -1521,7 +1521,8 @@
(cond (cond
;; If the lambda argument is not used, flag so the C code is ;; If the lambda argument is not used, flag so the C code is
;; all generated within the same function ;; all generated within the same function
((and (> optimization-level 0) ((and #f
(> optimization-level 0)
(eq? (lambda-formals-type fn) 'args:fixed) (eq? (lambda-formals-type fn) 'args:fixed)
(pair? (lambda-formals->list fn)) (pair? (lambda-formals->list fn))
(with-var (with-var