allow arbitrary objects at codegen time

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