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

Remove experimental code

Browse source
This commit is contained in:
Justin Ethier 2017-04-18 07:48:38 +00:00
parent f1d5bb6f83
commit 62613e537e
1 changed files with 0 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
cyclone.scm
View file

@ -224,13 +224,6 @@
input-program))
(trace:info "---------------- after func->primitive conversion:")
(trace:info input-program) ;pretty-print
(trace:info "---------------- results of inlinable-top-level-function analysis: ")
(for-each
(lambda (e)
(if (inlinable-top-level-function? e)
(trace:info (define->var e))))
input-program)
(let ((cps (map
(lambda (expr)