--- a/stage4/generate_c/search_type_code.c Fri Jan 09 17:05:24 2009 +0100
+++ b/stage4/generate_c/search_type_code.c Wed Jan 14 19:47:41 2009 +0100
@@ -13336,7 +13336,7 @@
symbol_c *IN1_type_symbol = search_expression_type->get_type(IN1_param_value);
last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN1_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN1_type_symbol, last_type_symbol) : IN1_type_symbol ;
- if(search_expression_type->is_num_type(IN1_type_symbol))
+ if(search_expression_type->is_real_type(IN1_type_symbol))
{
{
@@ -25595,7 +25595,7 @@
symbol_c *IN1_type_symbol = param_data_type;
last_type_symbol = param_data_type;
- if(search_expression_type->is_num_type(IN1_type_symbol))
+ if(search_expression_type->is_real_type(IN1_type_symbol))
{
{