aboutsummaryrefslogtreecommitdiff
path: root/backendC/CleanCompilerSources/backend.h
diff options
context:
space:
mode:
Diffstat (limited to 'backendC/CleanCompilerSources/backend.h')
-rw-r--r--backendC/CleanCompilerSources/backend.h8
1 files changed, 7 insertions, 1 deletions
diff --git a/backendC/CleanCompilerSources/backend.h b/backendC/CleanCompilerSources/backend.h
index a9847d4..728aea4 100644
--- a/backendC/CleanCompilerSources/backend.h
+++ b/backendC/CleanCompilerSources/backend.h
@@ -127,7 +127,7 @@ enum {
BEIntType, BEBoolType, BECharType, BERealType,
BEFileType, BEStringType, BEWorldType, BEProcIdType,
BERedIdType,
- BENrOfBasicTypes,
+ BERationalDenot,
BEIntDenot, BEBoolDenot, BECharDenot, BERealDenot, BEIntegerDenot,
@@ -195,6 +195,9 @@ Clean (BEBindSpecialModule :: BESpecialIdentIndex Int BackEnd -> BackEnd)
void BEBindSpecialFunction (BESpecialIdentIndex index, int functionIndex, int moduleIndex);
Clean (BEBindSpecialFunction :: BESpecialIdentIndex Int Int BackEnd -> BackEnd)
+void BEBindSpecialType (int special_type_n,int type_index,int module_index);
+Clean (BEBindSpecialType :: Int Int Int BackEnd -> BackEnd)
+
BESymbolP BESpecialArrayFunctionSymbol (BEArrayFunKind arrayFunKind, int functionIndex, int moduleIndex);
Clean (BESpecialArrayFunctionSymbol :: BEArrayFunKind Int Int BackEnd -> (BESymbolP, BackEnd))
@@ -335,6 +338,9 @@ Clean (BESwitchNode :: BENodeIdP BEArgP BackEnd -> (BENodeP, BackEnd))
BENodeP BECaseNode (int symbolArity, BESymbolP symbol, BENodeDefP nodeDefs, BEStrictNodeIdP strictNodeIds, BENodeP node);
Clean (BECaseNode :: Int BESymbolP BENodeDefP BEStrictNodeIdP BENodeP BackEnd -> (BENodeP, BackEnd))
+BENodeP BEOverloadedCaseNode (BENodeP case_node,BENodeP equal_node,BENodeP from_integer_node);
+Clean (BEOverloadedCaseNode :: BENodeP BENodeP BENodeP BackEnd -> (BENodeP, BackEnd))
+
void BEEnterLocalScope (void);
Clean (BEEnterLocalScope :: BackEnd -> BackEnd)