aboutsummaryrefslogtreecommitdiff
path: root/gcc/m2/gm2-compiler/M2Scaffold.def
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/m2/gm2-compiler/M2Scaffold.def')
-rw-r--r--gcc/m2/gm2-compiler/M2Scaffold.def10
1 files changed, 10 insertions, 0 deletions
diff --git a/gcc/m2/gm2-compiler/M2Scaffold.def b/gcc/m2/gm2-compiler/M2Scaffold.def
index f16575f6eb3..adf7effed48 100644
--- a/gcc/m2/gm2-compiler/M2Scaffold.def
+++ b/gcc/m2/gm2-compiler/M2Scaffold.def
@@ -23,6 +23,7 @@ DEFINITION MODULE M2Scaffold ;
VAR
+ linkFunction,
finiFunction,
initFunction,
mainFunction: CARDINAL ;
@@ -42,4 +43,13 @@ PROCEDURE DeclareScaffold (tokno: CARDINAL) ;
PROCEDURE DeclareArgEnvParams (tokno: CARDINAL; proc: CARDINAL) ;
+(*
+ PopulateCtorArray - assign each element of the ctorArray to the external module ctor.
+ This is only used to force the linker to pull in the ctors from
+ a library.
+*)
+
+PROCEDURE PopulateCtorArray (tok: CARDINAL) ;
+
+
END M2Scaffold.