add BEInsertForeignExport

backend/backend.dcl

@@ -277,6 +277,8 @@ BEExportFunction :: !Int !BackEnd -> BackEnd;
 // void BEExportFunction (int functionIndex);
 BEDefineImportedObjsAndLibs :: !BEStringListP !BEStringListP !BackEnd -> BackEnd;
 // void BEDefineImportedObjsAndLibs (BEStringListP objs,BEStringListP libs);
+BEInsertForeignExport :: !BESymbolP !BackEnd -> BackEnd;
+// void BEInsertForeignExport (BESymbolP symbol_p);
 BESetMainDclModuleN :: !Int !BackEnd -> BackEnd;
 // void BESetMainDclModuleN (int main_dcl_module_n_parameter);
 BEStrictPositions :: !Int !BackEnd -> (!Int,!Int,!BackEnd);

backend/backend.icl

@@ -758,6 +758,12 @@ BEDefineImportedObjsAndLibs a0 a1 a2 = code {
 }
 // void BEDefineImportedObjsAndLibs (BEStringListP objs,BEStringListP libs);
 
+BEInsertForeignExport :: !BESymbolP !BackEnd -> BackEnd;
+BEInsertForeignExport a0 a1 = code {
+	ccall BEInsertForeignExport "I:V:I"
+}
+// void BEInsertForeignExport (BESymbolP symbol_p);
+
 BESetMainDclModuleN :: !Int !BackEnd -> BackEnd;
 BESetMainDclModuleN a0 a1 = code {
 	ccall BESetMainDclModuleN "I:V:I"

backendC/CleanCompilerLib.mcp.exp

@@ -124,3 +124,4 @@ BEStrictPositions
 BECopyInts
 BEDeclareDynamicTypeSymbol
 BEDynamicTempTypeSymbol
+BEInsertForeignExport
\ No newline at end of file