Skip to content

Commit

Permalink
io: remove macroexpand
Browse files Browse the repository at this point in the history
  • Loading branch information
asarhaddon committed Oct 25, 2024
1 parent 3b16c39 commit 965a518
Show file tree
Hide file tree
Showing 3 changed files with 0 additions and 6 deletions.
2 changes: 0 additions & 2 deletions impls/io/step8_macros.io
Original file line number Diff line number Diff line change
Expand Up @@ -92,8 +92,6 @@ EVAL := method(ast, env,
continue, // TCO
"defmacro!",
return(env set(ast at(1), EVAL(ast at(2), env) clone setIsMacro(true))),
"macroexpand",
return(macroexpand(ast at(1), env))
)
)

Expand Down
2 changes: 0 additions & 2 deletions impls/io/step9_try.io
Original file line number Diff line number Diff line change
Expand Up @@ -92,8 +92,6 @@ EVAL := method(ast, env,
continue, // TCO
"defmacro!",
return(env set(ast at(1), EVAL(ast at(2), env) clone setIsMacro(true))),
"macroexpand",
return(macroexpand(ast at(1), env)),
"try*",
if(ast at(2) == nil, return(EVAL(ast at(1), env)))
e := try(result := EVAL(ast at(1), env))
Expand Down
2 changes: 0 additions & 2 deletions impls/io/stepA_mal.io
Original file line number Diff line number Diff line change
Expand Up @@ -92,8 +92,6 @@ EVAL := method(ast, env,
continue, // TCO
"defmacro!",
return(env set(ast at(1), EVAL(ast at(2), env) clone setIsMacro(true))),
"macroexpand",
return(macroexpand(ast at(1), env)),
"try*",
if(ast at(2) == nil, return(EVAL(ast at(1), env)))
e := try(result := EVAL(ast at(1), env))
Expand Down

0 comments on commit 965a518

Please sign in to comment.