util/ceg/defaults/pseudo/C_pro.c

   1 #define CODE_EXPANDER
   2 #include <em.h>
   3 #include "back.h"
   4
   5 extern int B_locals_created;
   6 extern int B_procno;
   7
   8 void
   9 C_pro( s, l)
  10 char *s;
  11 arith l;
  12 {
  13         swtxt();
  14
  15         symbol_definition( extnd_name( s));
  16         B_procno++;
  17         C_prolog();
  18         C_locals(l);
  19         B_locals_created = 1;
  20 }