--- a/stage4/generate_c/generate_c.cc	Wed Mar 26 13:20:45 2014 +0100
+++ b/stage4/generate_c/generate_c.cc	Thu Mar 27 09:52:13 2014 +0100
@@ -1326,6 +1326,7 @@
   /* (A) Function declaration... */
   /* (A.1) Function return type */
   s4o.print("// FUNCTION\n");
+  s4o.print("static ");
   symbol->type_name->accept(*this); /* return type */
   s4o.print(" ");
   /* (A.2) Function name */