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

Add missing semicolon

Browse source
This commit is contained in:
Justin Ethier 2021-02-11 15:12:15 -05:00
parent fc39cacbb3
commit 9df5665dab
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/cgen.sld
View file

@ -2191,7 +2191,7 @@
(loop (cons (string-append "make_pair(" (car cs) ", &" (car ps) ", &" (cadr cs) ");\n") code) (loop (cons (string-append "make_pair(" (car cs) ", &" (car ps) ", &" (cadr cs) ");\n") code)
(cdr ps) (cdr ps)
(cdr cs))))) (cdr cs)))))
(emit* "object buf[1]; object cont = args[0]"); (emit* "object buf[1]; object cont = args[0];");
(if head-pair (if head-pair
(emit* "buf[0] = &" head-pair "; (((closure)cont)->fn)(data, cont, 1, buf);") (emit* "buf[0] = &" head-pair "; (((closure)cont)->fn)(data, cont, 1, buf);")
(emit* "buf[0] = NULL; (((closure)cont)->fn)(data, cont 1, buf);")) (emit* "buf[0] = NULL; (((closure)cont)->fn)(data, cont 1, buf);"))