diff options
| author | johnvg | 2006-01-04 14:59:12 +0000 |
|---|---|---|
| committer | johnvg | 2006-01-04 14:59:12 +0000 |
| commit | 04e6adfd4fe1667d2bcc98bf66c40f636c638b56 (patch) | |
| tree | 5947c4a95e3028016da4384f860e6613c6886d15 /backendC | |
| parent | use the same file for list all types and list exported types as for list (diff) | |
add function BEGetIntFromArray, will replace BECopyInts because copying
an array of integers in this way fails if the size of integers is not the same
in clean and c
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1583 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'backendC')
| -rw-r--r-- | backendC/CleanCompilerSources/backend.c | 6 | ||||
| -rw-r--r-- | backendC/CleanCompilerSources/backend.h | 2 |
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) |