aboutsummaryrefslogtreecommitdiff
path: root/frontend/checksupport.dcl
diff options
context:
space:
mode:
authorjohnvg2004-04-02 12:00:33 +0000
committerjohnvg2004-04-02 12:00:33 +0000
commitbde39f2cbeef6e4ee07149d429ab90b8ef894d3e (patch)
treedf8bda341bb519b86aa4dc94e02c86e70b3dcbcd /frontend/checksupport.dcl
parentexport strictness of argument of empty_cache (diff)
implement foreign export with stdcall
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1483 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'frontend/checksupport.dcl')
-rw-r--r--frontend/checksupport.dcl4
1 files changed, 3 insertions, 1 deletions
diff --git a/frontend/checksupport.dcl b/frontend/checksupport.dcl
index 260ec66..6bcb119 100644
--- a/frontend/checksupport.dcl
+++ b/frontend/checksupport.dcl
@@ -100,12 +100,14 @@ cConversionTableSize :== 10
, icl_common :: !.CommonDefs
, icl_import :: !{!Declaration}
, icl_imported_objects :: ![ImportedObject]
- , icl_foreign_exports :: ![FunDefIndex]
+ , icl_foreign_exports :: ![ForeignExport]
, icl_used_module_numbers :: !NumberSet
, icl_copied_from_dcl :: !CopiedDefinitions
, icl_modification_time :: !{#Char}
}
+:: ForeignExport = {fe_fd_index :: !FunDefIndex, fe_stdcall :: !Bool}
+
:: DclModule =
{ dcl_name :: !Ident
, dcl_functions :: !{# FunType }