minor: turn into test

namin · Aug 31, 2023 · a6bfb3a · a6bfb3a
1 parent 7b8ac4f
commit a6bfb3a
Showing 1 changed file with 9 additions and 7 deletions.
diff --git a/tests/applications/metaKanren.rkt b/tests/applications/metaKanren.rkt
@@ -495,13 +495,15 @@ Syntax
 
 ;; tests
 
-(run 1 (res)
-  (staged
-   (eval-programo
-    `(run* (z)
-       (letrec-rel ((unify-2 (z) (== z '2)))
-                   (call-rel unify-2 z)))
-    res)))
+(time-test
+  (run 1 (res)
+    (staged
+     (eval-programo
+      `(run* (z)
+         (letrec-rel ((unify-2 (z) (== z '2)))
+                     (call-rel unify-2 z)))
+      res)))
+  '((2)))