~ chicken-core (chicken-5) 7d6e701dbc7edbe5beb2f6717f2842ded20b8617
commit 7d6e701dbc7edbe5beb2f6717f2842ded20b8617
Author: felix <felix@call-with-current-continuation.org>
AuthorDate: Wed Mar 22 11:20:15 2017 +0100
Commit: felix <felix@call-with-current-continuation.org>
CommitDate: Wed Mar 22 11:20:15 2017 +0100
drop comments from generated C code
diff --git a/c-backend.scm b/c-backend.scm
index e2b5fe94..5d484c58 100644
--- a/c-backend.scm
+++ b/c-backend.scm
@@ -520,11 +520,11 @@
(eq? caller-rest-mode 'none)))
(gen #t "C_word av2[" avl "];"))
((>= caller-argcount avl) ; Argvec known to be re-usable?
- (gen #t "C_word *av2=av; /* Re-use our own argvector */"))
+ (gen #t "C_word *av2=av;")) ; Re-use our own argvector
(else ; Need to determine dynamically. This is slower.
(gen #t "C_word *av2;")
(gen #t "if(c >= " avl ") {")
- (gen #t " av2=av; /* Re-use our own argvector */")
+ (gen #t " av2=av;") ; Re-use our own argvector
(gen #t "} else {")
(gen #t " av2=C_alloc(" avl ");")
(gen #t "}")))
Trap