stage4/generate_c/generate_c_st.cc
changeset 257 90782e241346
parent 202 da1a8186f86f
child 258 d7d92b2f87e9
--- a/stage4/generate_c/generate_c_st.cc	Thu Aug 27 16:29:23 2009 +0100
+++ b/stage4/generate_c/generate_c_st.cc	Wed Mar 30 19:53:32 2011 +0100
@@ -383,13 +383,13 @@
 }
 
 /* TODO: power expression... */
-void *visit(power_expression_c *symbol) {ERROR; return print_binary_expression(symbol->l_exp, symbol->r_exp, " ** ");}
+void *visit(power_expression_c *symbol) {
+  ERROR; 
+  return print_binary_expression(symbol->l_exp, symbol->r_exp, " ** ");
+}
+
 void *visit(neg_expression_c *symbol) {
-  symbol_c *exp_type = search_expression_type->get_type(symbol->exp);
-  if (search_expression_type->is_integer_type(exp_type) || search_expression_type->is_real_type(exp_type))
-    return print_unary_expression(symbol->exp, " -");
-  ERROR;
-  return NULL;
+  return print_unary_expression(symbol->exp, " -");
 }
 
 void *visit(not_expression_c *symbol) {