From 142f3dc6cc3498bd8b135378a1ef4f4c94c2092e Mon Sep 17 00:00:00 2001 From: johnvg Date: Tue, 1 Mar 2011 15:31:44 +0000 Subject: git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1871 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d --- backend/backend.icl | 6 ++++++ 1 file changed, 6 insertions(+) (limited to 'backend/backend.icl') 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" -- cgit v1.2.3