Remove leftover debug prints

Dr-Nekoma · Nov 25, 2023 · 76c6927 · 76c6927
1 parent b39e6db
commit 76c6927
Showing 1 changed file with 9 additions and 13 deletions.
diff --git a/util.rkt b/util.rkt
@@ -68,19 +68,15 @@
              syntax->list
              length
              range)))
-       (let [(ret
-              #`(lambda [args ... name]
-                  (unless (preds args)
-                    (raise-argument-error name
-                      (with-output-to-string
-                        (lambda []
-                          (write 'preds)))
-                      n
-                      args ...)) ...
-                  body ...))]
-         (displayln (syntax->datum ret))
-         (newline)
-         ret))]))
+       #`(lambda [args ... name]
+           (unless (preds args)
+             (raise-argument-error name
+               (with-output-to-string
+                 (lambda []
+                   (write 'preds)))
+               n
+               args ...)) ...
+           body ...))]))
 
 (module interfaces racket
   (provide