Re-implemented (export)

2019-11-02 17:11:41 -04:00
parent 707f056649
commit ff934f9f16
7 changed files with 45 additions and 54 deletions
--- a/examples/basics/benchmark.lisp
+++ b/examples/basics/benchmark.lisp
@@ -57,13 +57,4 @@

 ; Interop
  (test "interop" ((of (of (js) "Math") "max") 2 4) 4)
-  (test "recursive key selector" ((of (js) "Math" "max") 2 4) 4)
-
-; fs
-
-; filesystem
-
-(echo (filepath))
-(echo (dirpath))
-(echo (file))
-(echo (dir))
+  (test "recursive key selector" ((of (js) "Math" "max") 2 4) 4)
--- a/examples/basics/recursive.lisp
+++ b/examples/basics/recursive.lisp
@@ -1,16 +0,0 @@
-; recursive
-
-(clear) 
-(defn rec 
-  (v) 
-  (if 
-    (gt v 0) 
-    (
-      (stroke 
-        (circle 
-          (mul 5 v) 
-          (mul 5 v) 
-          (mul 5 v)) "red" 1) 
-      (rec 
-        (sub v 5))))) 
-(rec 100)