home *** CD-ROM | disk | FTP | other *** search
- # ifndef yySemExp
- # define yySemExp
-
- # if defined __STDC__ | defined __cplusplus
- # define ARGS(parameters) parameters
- # else
- # define ARGS(parameters) ()
- # endif
-
- # ifndef bool
- # define bool char
- # endif
-
- # include "Tree.h"
- # include "Definiti.h"
-
- # line 26 "SemExp.puma"
-
-
- # define MAXLoops 20
-
- /*********************************************************************
- * *
- * Nest[0] DO I1 = ... *
- * Nest[1] DO I2 = ... *
- * ... *
- * Nest[Nesting-1] FORALL Ik = ... *
- * *
- * stmt : A(I1,I2,...,Ik) = .... *
- * *
- *********************************************************************/
-
- extern int Nesting; /* actual nesting depth */
- extern tTree Nest[MAXLoops]; /* actual loops of loop nesting */
-
-
-
- extern void SemExp ARGS((tTree t, int * ResultRank));
- extern void SemExpList ARGS((tTree t));
- extern void SemParamList ARGS((tTree t));
-
- extern void BeginSemExp ();
- extern void CloseSemExp ();
-
- # endif
-