diff options
Diffstat (limited to 'module/language/cps/compile-bytecode.scm')
-rw-r--r-- | module/language/cps/compile-bytecode.scm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/module/language/cps/compile-bytecode.scm b/module/language/cps/compile-bytecode.scm index 58d908b1c..53a252444 100644 --- a/module/language/cps/compile-bytecode.scm +++ b/module/language/cps/compile-bytecode.scm @@ -135,6 +135,8 @@ (emit-fmov asm dst src) (lp moves reset-frame?))))))) (match cont + (($ $kargs) + (shuffle-results)) (($ $kreceive ($ $arity req () rest () #f) kargs) (let ((nreq (length req)) (rest-var (and rest |