From 77cf79015846e4eec31b968d994fdb1420589bcb Mon Sep 17 00:00:00 2001
From: Alex Shinn <ashinn@users.noreply.github.com>
Date: Wed, 10 Jul 2013 06:58:20 +0900
Subject: [PATCH] Don't treat bare () as the entire repl input as a literal.

---
 main.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/main.c b/main.c
index 6e43e8ca..ef45f02f 100644
--- a/main.c
+++ b/main.c
@@ -199,7 +199,7 @@ static void repl (sexp ctx, sexp env) {
       sexp_print_exception(ctx, obj, err);
     } else {
       sexp_context_top(ctx) = 0;
-      if (!(sexp_idp(obj)||sexp_pairp(obj)))
+      if (!(sexp_idp(obj)||sexp_pairp(obj)||sexp_nullp(obj)))
         obj = sexp_make_lit(ctx, obj);
       tmp = sexp_env_bindings(env);
       res = sexp_eval(ctx, obj, env);