From 2fd410cd5333ac36e4cbc581a30aef6265abd34b Mon Sep 17 00:00:00 2001 From: ronny Date: Fri, 23 Feb 2001 13:07:34 +0000 Subject: temporary hack: redirect basic type Dynamic to DynamicTemp from StdDynamic git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@304 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d --- backendC/CleanCompilerSources/backend.dcl | 8 ++++++-- backendC/CleanCompilerSources/backend.h | 11 +++++++++-- 2 files changed, 15 insertions(+), 4 deletions(-) (limited to 'backendC/CleanCompilerSources') diff --git a/backendC/CleanCompilerSources/backend.dcl b/backendC/CleanCompilerSources/backend.dcl index c346245..af49d08 100644 --- a/backendC/CleanCompilerSources/backend.dcl +++ b/backendC/CleanCompilerSources/backend.dcl @@ -220,9 +220,13 @@ BEDefineImportedObjsAndLibs :: !BEStringListP !BEStringListP !BackEnd -> BackEnd // void BEDefineImportedObjsAndLibs(BEStringListP objs,BEStringListP libs); BESetMainDclModuleN :: !Int !BackEnd -> BackEnd; // void BESetMainDclModuleN(int main_dcl_module_n_parameter); -kBEVersionCurrent:==0x02000204; +BEDeclareDynamicTypeSymbol :: !Int !Int !BackEnd -> BackEnd; +// void BEDeclareDynamicTypeSymbol(int typeIndex,int moduleIndex); +BEDynamicTempTypeSymbol :: !BackEnd -> (!BESymbolP,!BackEnd); +// BESymbolP BEDynamicTempTypeSymbol(); +kBEVersionCurrent:==0x02000206; kBEVersionOldestDefinition:==0x02000204; -kBEVersionOldestImplementation:==0x02000204; +kBEVersionOldestImplementation:==0x02000206; kBEDebug:==1; kPredefinedModuleIndex:==1; BENoAnnot:==0; diff --git a/backendC/CleanCompilerSources/backend.h b/backendC/CleanCompilerSources/backend.h index 5756288..23d7b8c 100644 --- a/backendC/CleanCompilerSources/backend.h +++ b/backendC/CleanCompilerSources/backend.h @@ -1,8 +1,8 @@ /* version info */ -# define kBEVersionCurrent 0x02000205 +# define kBEVersionCurrent 0x02000206 # define kBEVersionOldestDefinition 0x02000204 -# define kBEVersionOldestImplementation 0x02000204 +# define kBEVersionOldestImplementation 0x02000206 # define kBEDebug 1 @@ -427,3 +427,10 @@ Clean (BEDefineImportedObjsAndLibs :: BEStringListP BEStringListP BackEnd -> Bac void BESetMainDclModuleN (int main_dcl_module_n_parameter); Clean (BESetMainDclModuleN :: Int BackEnd -> BackEnd) + +// temporary hack +void BEDeclareDynamicTypeSymbol (int typeIndex, int moduleIndex); +Clean (BEDeclareDynamicTypeSymbol :: Int Int BackEnd -> BackEnd) + +BESymbolP BEDynamicTempTypeSymbol (void); +Clean (BEDynamicTempTypeSymbol :: BackEnd -> (BESymbolP, BackEnd)) -- cgit v1.2.3