regexp-search added, std lib loader changes, more REadme items

2021-02-21 14:03:14 +01:00
parent 0ba8536aa2
commit a87964f552
8 changed files with 97 additions and 40 deletions
--- a/tests/test.lisp
+++ b/tests/test.lisp
@@ -14,11 +14,11 @@
 (defun scitej (n)
   (if (<= n 1)
      1
-      (+ n (scitej
-       (- n 1)))
+      (+ n (scitej (- n 1)))
    ))

 (print (scitej 4000))
+; (print (scitej 5))



@@ -97,4 +97,7 @@
 (print (str-to-date "01.01.1970" "%d.%m.%Y"))
 (print (date-add (str-to-date "01.01.1970" "%d.%m.%Y") 1 "day"))

+(print (regex-search? "test.lsp" "^.*\.l(i)?sp$"))
+
+
 (print "Test ends")