diff options
| author | johnvg | 2011-03-01 15:31:44 +0000 |
|---|---|---|
| committer | johnvg | 2011-03-01 15:31:44 +0000 |
| commit | 142f3dc6cc3498bd8b135378a1ef4f4c94c2092e (patch) | |
| tree | 1e8927883ea7ab1bd83deca25ea81844fe62ba3f /backend/backend.icl | |
| parent | in BEConstructorSymbol store constructor index in symb_arity until BERecordTy... (diff) | |
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1871 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'backend/backend.icl')
| -rw-r--r-- | backend/backend.icl | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/backend/backend.icl b/backend/backend.icl index cb25dd1..ef0fe09 100644 --- a/backend/backend.icl +++ b/backend/backend.icl @@ -124,6 +124,12 @@ BETypeSymbol a0 a1 a2 = code { } // BESymbolP BETypeSymbol (int typeIndex,int moduleIndex); +BETypeSymbolNoMark :: !Int !Int !BackEnd -> (!BESymbolP,!BackEnd); +BETypeSymbolNoMark a0 a1 a2 = code { + ccall BETypeSymbolNoMark "II:p:p" +} +// BESymbolP BETypeSymbolNoMark (int typeIndex,int moduleIndex); + BEDontCareDefinitionSymbol :: !BackEnd -> (!BESymbolP,!BackEnd); BEDontCareDefinitionSymbol a0 = code { ccall BEDontCareDefinitionSymbol ":p:p" |