russell: C:/Users/Dennis/src/lang/russell.orig/src/pass3/fixup.c Source File

00001 # include "parm.h"
00002 
00003 # include "stree/ststructs.mh"
00004 
00005 /*
00006  *  Pass3 driver.  Call various small fix up passes in succession.
00007  */
00008 
00009 void fixup(p)
00010 NODE * p;
00011 {
00012         number(p);  /* pre- and postorder numbers */
00013         reorder(p); /* reorder type signatures and guarded commands */
00014         sigids(p);  /* fix up symbol table for certain kinds of ids */
00015 }