Merge pull request #281 from sebras/master

[jackhill/mal.git] / racket / step6_file.rkt

diff --git a/racket/step6_file.rkt b/racket/step6_file.rkt
index 3665cf0..680f84f 100755 (executable)
--- a/racket/step6_file.rkt
+++ b/racket/step6_file.rkt
@@ -75,7 +75,7 @@
 ;; core.rkt: defined using Racket
 (hash-for-each core_ns (lambda (k v) (send repl-env set k v)))
 (send repl-env set 'eval (lambda [ast] (EVAL ast repl-env)))
-(send repl-env set '*ARGV* (list))
+(send repl-env set '*ARGV* (_rest (current-command-line-arguments)))
 
 ;; core.mal: defined using the language itself
 (rep "(def! not (fn* (a) (if a false true)))")