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

Fix compiler warning

Browse source
This commit is contained in:
Justin Ethier 2015-06-23 22:05:41 -04:00
parent dd4875d141
commit 3d7adf0a9f
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
cgen.scm
View file

@ -885,7 +885,7 @@
(string-append (string-append
"closureN_type " cv-name ";\n" "closureN_type " cv-name ";\n"
cv-name ".tag = closureN_tag;\n " cv-name ".tag = closureN_tag;\n "
cv-name ".fn = __lambda_" (number->string lid) ";\n" cv-name ".fn = (function_type)__lambda_" (number->string lid) ";\n"
cv-name ".num_elt = " (number->string (length free-vars)) ";\n" cv-name ".num_elt = " (number->string (length free-vars)) ";\n"
cv-name ".elts = (object *)alloca(sizeof(object) * " cv-name ".elts = (object *)alloca(sizeof(object) * "
(number->string (length free-vars)) ");\n" (number->string (length free-vars)) ");\n"