summaryrefslogtreecommitdiff
path: root/module/language/cps/split-rec.scm
diff options
context:
space:
mode:
Diffstat (limited to 'module/language/cps/split-rec.scm')
-rw-r--r--module/language/cps/split-rec.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/module/language/cps/split-rec.scm b/module/language/cps/split-rec.scm
index 5a8119bb2..c733c38c0 100644
--- a/module/language/cps/split-rec.scm
+++ b/module/language/cps/split-rec.scm
@@ -87,9 +87,9 @@ references."
(add-uses args uses))
(($ $call proc args)
(add-use proc (add-uses args uses)))
- (($ $branch kt ($ $primcall name args))
+ (($ $branch kt ($ $primcall name param args))
(add-uses args uses))
- (($ $primcall name args)
+ (($ $primcall name param args)
(add-uses args uses))
(($ $prompt escape? tag handler)
(add-use tag uses)))))