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

Splice in lambda body of cyc-seq

Browse source
This commit is contained in:
Justin Ethier 2018-11-01 13:09:42 -04:00
parent 31e749bf5a
commit 61d265c512
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

@ -1094,7 +1094,7 @@
(opt:inline-prims (opt:inline-prims
`(Cyc-seq `(Cyc-seq
,@(cdr exp) ,@(cdr exp)
,(ast:lambda-body (car exp))) ,@(ast:lambda-body (car exp)))
scope-sym scope-sym
refs)) refs))
(else (else