--- a/stage4/generate_c/generate_c_il.cc	Mon Nov 30 15:36:12 2009 +0100
+++ b/stage4/generate_c/generate_c_il.cc	Tue Dec 01 09:03:33 2009 +0100
@@ -826,13 +826,12 @@
         }
         if (param_value == NULL) ERROR;
         s4o.print("(");
-        if (search_expression_type->is_literal_integer_type(param_type) ||
-			search_expression_type->is_literal_real_type(param_type)) {
-			if (function_type_suffix == NULL) ERROR;
-			function_type_suffix->accept(*this);
-		}
-		else
-			param_type->accept(*this);
+        if (search_expression_type->is_literal_integer_type(param_type))
+          search_expression_type->lint_type_name.accept(*this);
+        else if (search_expression_type->is_literal_real_type(param_type))
+          search_expression_type->lreal_type_name.accept(*this);
+        else
+          param_type->accept(*this);
         s4o.print(")");
         print_check_function(param_type, param_value);
         nb_param++;
@@ -1208,13 +1207,12 @@
         }
         if (param_value == NULL) ERROR;
         s4o.print("(");
-        if (search_expression_type->is_literal_integer_type(param_type) ||
-			search_expression_type->is_literal_real_type(param_type)) {
-			if (function_type_suffix == NULL) ERROR;
-			function_type_suffix->accept(*this);
-		}
-		else
-			param_type->accept(*this);
+        if (search_expression_type->is_literal_integer_type(param_type))
+          search_expression_type->lint_type_name.accept(*this);
+        else if (search_expression_type->is_literal_real_type(param_type))
+          search_expression_type->lreal_type_name.accept(*this);
+        else
+          param_type->accept(*this);
         s4o.print(")");
         print_check_function(param_type, param_value);
 		nb_param++;