aboutsummaryrefslogtreecommitdiff
path: root/backendC/CleanCompilerSources
diff options
context:
space:
mode:
Diffstat (limited to 'backendC/CleanCompilerSources')
-rw-r--r--backendC/CleanCompilerSources/backend.c6
-rw-r--r--backendC/CleanCompilerSources/backend.h2
2 files changed, 8 insertions, 0 deletions
diff --git a/backendC/CleanCompilerSources/backend.c b/backendC/CleanCompilerSources/backend.c
index 1b3cb0d..2a80569 100644
--- a/backendC/CleanCompilerSources/backend.c
+++ b/backendC/CleanCompilerSources/backend.c
@@ -3512,6 +3512,12 @@ BECopyInts (int cLength, int *ints, int *cleanArray)
return (!truncate);
} /* BECopyInts */
+int
+BEGetIntFromArray (int index, int *ints)
+{
+ return ints[index];
+}
+
static void
CheckBEEnumTypes (void)
{
diff --git a/backendC/CleanCompilerSources/backend.h b/backendC/CleanCompilerSources/backend.h
index 18e5b50..dc344c7 100644
--- a/backendC/CleanCompilerSources/backend.h
+++ b/backendC/CleanCompilerSources/backend.h
@@ -550,6 +550,8 @@ Clean (BEStrictPositions :: Int BackEnd -> (Int, Int, BackEnd))
int BECopyInts (int cLength, int *ints, int *cleanArray);
+int BEGetIntFromArray (int index, int *ints);
+
// temporary hack
void BEDeclareDynamicTypeSymbol (int typeIndex, int moduleIndex);
Clean (BEDeclareDynamicTypeSymbol :: Int Int BackEnd -> BackEnd)