diff options
Diffstat (limited to 'r/step3_env.r')
| -rw-r--r-- | r/step3_env.r | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/r/step3_env.r b/r/step3_env.r index 34bc354..a86a85b 100644 --- a/r/step3_env.r +++ b/r/step3_env.r @@ -9,7 +9,7 @@ READ <- function(str) { } eval_ast <- function(ast, env) { - if (is.symbol(ast)) { + if (.symbol_q(ast)) { Env.get(env, ast) } else if (.list_q(ast)) { new.listl(lapply(ast, function(a) EVAL(a, env))) |