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

Remove debugging

Browse source
This commit is contained in:
Justin Ethier 2016-06-08 23:36:36 -04:00
parent b32a8f32f8
commit 0f7839c4ce
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

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

@ -541,7 +541,7 @@
;; This is a cons "box" so it can be mutated. ;; This is a cons "box" so it can be mutated.
;; return - call into this continuation to return early ;; return - call into this continuation to return early
(define (inline-ok? exp ivars args arg-used return) (define (inline-ok? exp ivars args arg-used return)
(trace:error `(inline-ok? ,exp ,ivars ,args ,arg-used)) ;(trace:error `(inline-ok? ,exp ,ivars ,args ,arg-used))
(cond (cond
((ref? exp) ((ref? exp)
(cond (cond