diff options
Diffstat (limited to 'backendC')
-rw-r--r-- | backendC/CleanCompilerSources/syntaxtr.t | 17 |
1 files changed, 13 insertions, 4 deletions
diff --git a/backendC/CleanCompilerSources/syntaxtr.t b/backendC/CleanCompilerSources/syntaxtr.t index e0e01a2..0c1d4a9 100644 --- a/backendC/CleanCompilerSources/syntaxtr.t +++ b/backendC/CleanCompilerSources/syntaxtr.t @@ -58,9 +58,13 @@ typedef enum { int_type, bool_type, char_type, real_type, file_type, string_type,world_type, procid_type, redid_type, - Nr_Of_Basic_Types, +#ifdef CLEAN2 + rational_denot, +#else + Nr_Of_Basic_Types, +#endif int_denot, bool_denot, char_denot, real_denot, - Nr_Of_Basic_Denots, +/* Nr_Of_Basic_Denots, */ integer_denot, string_denot, fun_type, array_type, strict_array_type, unboxed_array_type, list_type, tuple_type, empty_type, #ifdef CLEAN2 @@ -75,6 +79,10 @@ typedef enum { erroneous_symb } SymbKind; +#ifdef CLEAN2 +# define Nr_Of_Basic_Types rational_denot +#endif + STRUCT (state,State){ union { struct state * sd_args; /* for TupleState and ArrayState */ @@ -396,8 +404,9 @@ STRUCT (if_node_contents,IfNodeContents){ #define node_else_node_id_ref_counts node_contents.contents_if->if_else_u.u_node_id_ref_counts typedef enum { - IfNode, NormalNode, SelectorNode, NodeIdNode, UpdateNode, MatchNode, /* normal nodes */ - SwitchNode, CaseNode, DefaultNode, PushNode, GuardNode, TupleSelectorsNode, FillUniqueNode /* nodes in codegen */ + IfNode, NormalNode, SelectorNode, NodeIdNode, UpdateNode, MatchNode, + SwitchNode, CaseNode, DefaultNode, PushNode, GuardNode, OverloadedCaseNode, + TupleSelectorsNode, FillUniqueNode } NodeKind; #define SELECTOR_U 2 |