diff options
Diffstat (limited to 'module/language/cps/split-rec.scm')
-rw-r--r-- | module/language/cps/split-rec.scm | 4 |
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))))) |