diff options
| author | Rose Hogenson <rhogenson@posteo.net> | 2022-06-25 19:32:04 -0700 |
|---|---|---|
| committer | Rose Hogenson <rhogenson@posteo.net> | 2022-06-25 19:32:04 -0700 |
| commit | 05463502db73ab9a5ac23e1f598e838fbe14b3f8 (patch) | |
| tree | b7ae8cb2f7da272db8c0006dd5e0d5400a702743 /csc/testing.csc | |
| parent | Continue work on continuation passing style. (diff) | |
| download | chromatopelma-05463502db73ab9a5ac23e1f598e838fbe14b3f8.tar.zst | |
More CPS.
Diffstat (limited to 'csc/testing.csc')
| -rw-r--r-- | csc/testing.csc | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/csc/testing.csc b/csc/testing.csc index aad2a63..ecf5547 100644 --- a/csc/testing.csc +++ b/csc/testing.csc @@ -63,7 +63,7 @@ (let ((x left) (y right)) (unless (cmp x y) - (fatalf "Fatal: {} is not equal to {}.\nleft is {}\nright is {}" 'left 'right x y)))) + (fatalf "Fatal:\n {}\nis not equal to\n {}.\nleft is\n {}\nright is\n {}" 'left 'right x y)))) ((assert-equal left right) (assert-equal equal? left right)))) |