diff --git a/src/toolsrc/drawl.pla b/src/toolsrc/drawl.pla
index 3337e66..041fddb 100644
--- a/src/toolsrc/drawl.pla
+++ b/src/toolsrc/drawl.pla
@@ -537,7 +537,7 @@ def natv_atom(atom)
 end
 
 def natv_eq(expr)
-  return eval_atom(eval_expr(expr=>car)) == eval_atom(eval_expr(expr=>cdr=>car)) ?? @pred_true :: @pred_false
+  return eval_expr(expr=>car) == eval_expr(expr=>cdr=>car) ?? @pred_true :: @pred_false
 end
 
 def natv_cons(expr)
@@ -688,9 +688,9 @@ end
 //
 
 def install_defaults#0
+  new_assoc(new_sym("NIL"), NULL)
   new_assoc(new_sym("T"),   @pred_true)
   new_assoc(new_sym("F"),   @pred_false)
-  new_assoc(new_sym("NIL"), @pred_false)
   sym_lambda = new_sym("LAMBDA")
   sym_quote  = new_sym("QUOTE")
   sym_quote=>natv         = @natv_quote)
@@ -802,6 +802,6 @@ parse_cmdline
 install_defaults
 while not quit
   putln; print_expr(eval_expr(readfn()))
-  gc_trigger--; if gc_trigger == 0; gc; gc_trigger = GC_RESET; fin
+  //gc_trigger--; if gc_trigger == 0; gc; gc_trigger = GC_RESET; fin
 loop
 done