PiperOrigin-RevId: 360877125
This commit is contained in:
Laurent Orseau
2021-03-04 11:36:34 +00:00
committed by Louise Deason
parent ca532c106c
commit bf886c22bf
25 changed files with 1063 additions and 425 deletions
+2 -1
View File
@@ -18,7 +18,7 @@
;; Even though the namespace is at the module level, the variables
;; are set in the namespace with their value so they can be used with eval.
;; TODO: When a ns-anchor is given, commands are eval'ed by default, and to directly modify
;; variables one must use ! (where the second argument is evaled)
;; TODO: variables one must use ! (where the second argument is evaled)
(define-syntax (interact stx)
(syntax-parse stx
#:literals (list)
@@ -83,6 +83,7 @@
[else (printf "Unknown command: ~a\n" cmd)
(loop)]))))))]))
;; For manual testing in DrRacket
(module+ drracket
(define-namespace-anchor ns-anchor) ; optional, to use the eval command