kanaka/mal
1
1
Fork 0
mirror of https://github.com/kanaka/mal.git synced 2024-09-11 13:55:55 +03:00
Code Issues Projects Releases Wiki Activity

Add a test that eval is in root scope and that newly defined symbols can be found in nested scopes.

Browse Source
This commit is contained in:
Andrew Wason 2019-12-11 15:43:23 -05:00
parent 0c31a28d55
commit a124b32269
1 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
tests/step6_file.mal
View File

@ -126,6 +126,11 @@
*ARGV* *ARGV*
;=>() ;=>()
;;
;; Testing that eval sets aa in root scope, and that it is found in nested scope
(let* (b 12) (do (eval (read-string "(def! aa 7)")) aa ))
;=>7
;>>> soft=True ;>>> soft=True
;>>> optional=True ;>>> optional=True
;; ;;
@ -175,3 +180,4 @@ mymap
;;; Hopefully less problematic characters can be checked together ;;; Hopefully less problematic characters can be checked together
(read-string "1; &()*+,-./:;<=>?@[]^_{|}~") (read-string "1; &()*+,-./:;<=>?@[]^_{|}~")
;=>1 ;=>1