diff options
Diffstat (limited to 'csc/cps.csc')
| -rw-r--r-- | csc/cps.csc | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/csc/cps.csc b/csc/cps.csc index 827f4b7..a5b7d3b 100644 --- a/csc/cps.csc +++ b/csc/cps.csc @@ -116,9 +116,9 @@ (define (to-cps expr continuation) (match expr - (_ (when (or (constant? expr) - (lexical-ref? expr) - (library-ref? expr))) + (_ when (or (constant? expr) + (lexical-ref? expr) + (library-ref? expr)) (continuation expr)) ((% %lexical-set ref arg) (to-cps |