summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMark H Weaver <mhw@netris.org>2015-10-06 10:09:12 -0400
committerMark H Weaver <mhw@netris.org>2015-10-06 10:09:12 -0400
commit315adb6347c3e51f4e24fa32ff08458f2aa1b09c (patch)
tree9d123608b81a37262d72d1d8978e28e376e50929
parent73f6146bd83045dad909f37e42306d05f3bf9d16 (diff)
downloadguile-315adb6347c3e51f4e24fa32ff08458f2aa1b09c.tar.gz
Fix typo in CPS conversion.
Fixes <http://bugs.gnu.org/21614>. Reported by tantalum <sph@posteo.eu>. * module/language/tree-il/compile-cps.scm (convert): Add missing 'cps' argument to the continuation passed to 'convert-arg'.
-rw-r--r--module/language/tree-il/compile-cps.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/module/language/tree-il/compile-cps.scm b/module/language/tree-il/compile-cps.scm
index 59d2d7d90..7f34e6b48 100644
--- a/module/language/tree-il/compile-cps.scm
+++ b/module/language/tree-il/compile-cps.scm
@@ -460,7 +460,7 @@
(($ <module-set> src mod name public? exp)
(convert-arg cps exp
- (lambda (val)
+ (lambda (cps val)
(module-box
cps src mod name public? #t
(lambda (cps box)