Add a simple testing framework

1 files changed, 1 insertions, 2 deletions

diff --git a/c.bqn b/c.bqn
index 88e74aa6..66edc3ca 100755
--- a/c.bqn
+++ b/c.bqn
@@ -59,6 +59,5 @@ Gen←{
 Compile←{
   body←GenFn∘Parse 𝕩
   rcp←"x" GenFn∘Parse "1÷x"
-  (1↓∾)(","∾⥊∘⍕)¨ Gen ⟨⟨0‿1,1‿1⟩/¨¨f64 ⋄ ⥊<"fn" ⋄ ⟨body,rcp⟩⟩
+  Gen ⟨⟨0‿1,1‿1⟩/¨¨f64 ⋄ ⥊<"fn" ⋄ ⟨body,rcp⟩⟩
 }
-•←Compile "b←3⋄d←(b×b)-4×2×1⋄((-b)+√d)÷2×2"