todo update
This commit is contained in:
parent
b287608554
commit
cdfcc753e4
|
|
@ -18,21 +18,20 @@
|
|||
- add url of source/inspiration to clib/*.cpp
|
||||
- add instrumentation (time, nr of evals, num of atoms, debug info, debug environment etc)
|
||||
#### Language
|
||||
- support for (), nil, t, in lsp code replace 0 by nil in logicals
|
||||
- support for "t" symbol as a true
|
||||
- file functions
|
||||
- open file
|
||||
- read line
|
||||
- write line
|
||||
- close file
|
||||
- string functions
|
||||
- itok - integer to char, chartoint (better names) - mini printf can be useed for it (%d)
|
||||
- char to int - ktoi (better names) - maybe mini printf can be useed for it (%d (one_char_string))
|
||||
- compare - needed for sorting, cmp ignore case
|
||||
- regexp functions
|
||||
- date support
|
||||
- decode-universal-time
|
||||
- env functions
|
||||
- get-env, set-env; set-env cannot be implemented in stdlib.lsp, because popen is in fact subshell
|
||||
- format (sprintf)
|
||||
- add include-stdlib function for other libs in stdlib dir (during startup stdlib.lsp is loaded only)
|
||||
- syntax highlighting do VS Code
|
||||
- add hash datatype
|
||||
|
|
|
|||
13
debug.lsp
13
debug.lsp
|
|
@ -1,8 +1,4 @@
|
|||
|
||||
;; (benchmark "benchmark makelist 1000 : " (make-list 1000))
|
||||
;; (benchmark "benchmark range 1000 : " (range 1 1000))
|
||||
|
||||
|
||||
;https://github.com/anthay/Lisp90/blob/master/lisp90.cpp
|
||||
;http://howtowriteaprogram.blogspot.com/2010/11/lisp-interpreter-in-90-lines-of-c.html
|
||||
|
||||
|
|
@ -27,17 +23,8 @@
|
|||
|
||||
;; (define first_tid (thread-create (while 1 (do (thread-under-lock "ilock" (print 1)) (thread-sleep 50)))))
|
||||
;; (define second_tid (thread-create (while 1 (do (thread-under-lock "ilock" (print 2)) (thread-sleep 75)))))
|
||||
|
||||
;; (print "first thread id:" first_tid)
|
||||
;; (print "second thread id:" second_tid)
|
||||
|
||||
|
||||
;; (threads-join)
|
||||
;; (print "ok")
|
||||
|
||||
|
||||
;; (define av (read-url "https://www.alphavantage.co/query?function=EARNINGS&symbol=WFC&apikey=LJ4XGQ7BQIL925RF"))
|
||||
;; (if (= (first av) 200)
|
||||
;; (do
|
||||
;; (define json (parse-json (second av)))
|
||||
;; ))
|
||||
|
|
|
|||
Loading…
Reference in New Issue