From 2b66b7c5a2b12ec4d27ca84393e8077a4ab5d0da Mon Sep 17 00:00:00 2001
From: Yuichi Nishiwaki <yuichi.nishiwaki@gmail.com>
Date: Wed, 6 Aug 2014 15:53:54 +0900
Subject: [PATCH] allow arbitrary objects at codegen time

---
 src/codegen.c | 28 +---------------------------
 1 file changed, 1 insertion(+), 27 deletions(-)

diff --git a/src/codegen.c b/src/codegen.c
index b8023e5c..c1264dfb 100644
--- a/src/codegen.c
+++ b/src/codegen.c
@@ -796,35 +796,9 @@ analyze_node(analyze_state *state, pic_value obj, bool tailpos)
 
     return analyze_call(state, obj, tailpos);
   }
-  case PIC_TT_BOOL:
-  case PIC_TT_FLOAT:
-  case PIC_TT_INT:
-  case PIC_TT_NIL:
-  case PIC_TT_CHAR:
-  case PIC_TT_STRING:
-  case PIC_TT_VECTOR:
-  case PIC_TT_BLOB: {
+  default:
     return pic_list2(pic, pic_symbol_value(pic->sQUOTE), obj);
   }
-  case PIC_TT_CONT:
-  case PIC_TT_ENV:
-  case PIC_TT_PROC:
-  case PIC_TT_UNDEF:
-  case PIC_TT_EOF:
-  case PIC_TT_PORT:
-  case PIC_TT_ERROR:
-  case PIC_TT_SENV:
-  case PIC_TT_MACRO:
-  case PIC_TT_LIB:
-  case PIC_TT_VAR:
-  case PIC_TT_IREP:
-  case PIC_TT_DATA:
-  case PIC_TT_DICT:
-  case PIC_TT_RECORD:
-  case PIC_TT_BLK:
-    pic_errorf(pic, "invalid expression given: ~s", obj);
-  }
-  UNREACHABLE();
 }
 
 pic_value