perl: Remove step 0.5.

[jackhill/mal.git] / ocaml / step4_if_fn_do.ml

diff --git a/ocaml/step4_if_fn_do.ml b/ocaml/step4_if_fn_do.ml
index f08aa55..0e0cbaf 100644 (file)
--- a/ocaml/step4_if_fn_do.ml
+++ b/ocaml/step4_if_fn_do.ml
@@ -21,6 +21,7 @@ let rec eval_ast ast env =
     | _ -> ast
 and eval ast env =
   match ast with
+    | T.List { T.value = [] } -> ast
     | T.List { T.value = [(T.Symbol { T.value = "def!" }); key; expr] } ->
         let value = (eval expr env) in
           Env.set env key value; value