From fed28363fb60266c030a0f6b30d5a9d697774ee0 Mon Sep 17 00:00:00 2001
From: Rose Hogenson <rhogenson@posteo.net>
Date: Tue, 28 Jun 2022 15:58:36 -0700
Subject: Improve CPS.

Goodbye soup. Thanks to "Compiling with Continuations" by Appel.
---
 csc/list-test.csc | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'csc/list-test.csc')

diff --git a/csc/list-test.csc b/csc/list-test.csc
index faa90b6..e16feee 100644
--- a/csc/list-test.csc
+++ b/csc/list-test.csc
@@ -113,3 +113,9 @@
   (assert-equal
     #f
     (all (lambda (x) (= 0 (remainder x 2))) '(2 13 8))))
+
+
+(test all-equal
+  (assert-equal
+    #t
+    (all = '(1 2 3) '(1 2 3))))
-- 
cgit v1.3.1