Fix test case for pred pattern.

cmsc430 · Nov 13, 2024 · 3a8ae63 · 3a8ae63
1 parent 688c866
commit 3a8ae63
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/knock-plus/test/test-runner.rkt b/knock-plus/test/test-runner.rkt
@@ -269,7 +269,7 @@
                        '(match #f
                           [(? always?) 1]
                           [_ 2]))
-                  2)
+                  1)
     (check-equal? (run '(define (id x) x)
                        '(match #t
                           [(and (? id) y) y]