--- a/stage3/visit_expression_type.cc	Mon Jul 04 15:27:09 2011 +0200
+++ b/stage3/visit_expression_type.cc	Wed Jul 06 12:01:46 2011 +0200
@@ -394,7 +394,7 @@
 }
 
 
-#define is_type(type_name_symbol, type_name_class)  (typeid(*type_name_symbol) == typeid(type_name_class))
+#define is_type(type_name_symbol, type_name_class)  ((type_name_symbol == NULL) ? false : (typeid(*type_name_symbol) == typeid(type_name_class)))
 
 
 #define sizeoftype(symbol) get_sizeof_datatype_c::getsize(symbol)