aboutsummaryrefslogtreecommitdiff
path: root/gcc/m2/gm2-compiler/M2Preprocess.def
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/m2/gm2-compiler/M2Preprocess.def')
-rw-r--r--gcc/m2/gm2-compiler/M2Preprocess.def25
1 files changed, 23 insertions, 2 deletions
diff --git a/gcc/m2/gm2-compiler/M2Preprocess.def b/gcc/m2/gm2-compiler/M2Preprocess.def
index 0258580..0683018 100644
--- a/gcc/m2/gm2-compiler/M2Preprocess.def
+++ b/gcc/m2/gm2-compiler/M2Preprocess.def
@@ -32,7 +32,6 @@ DEFINITION MODULE M2Preprocess ;
*)
FROM DynamicStrings IMPORT String ;
-EXPORT QUALIFIED PreprocessModule ;
(*
@@ -43,9 +42,31 @@ EXPORT QUALIFIED PreprocessModule ;
If preprocessing occurs then a temporary file is created
and its name is returned.
All temporary files will be deleted when the compiler exits.
+ outputdep is the filename which will contain the dependency
+ info if -M, -MM is provided. outputdep can be NIL in which case
+ it is ignored.
*)
-PROCEDURE PreprocessModule (filename: String; isMain: BOOLEAN) : String ;
+PROCEDURE PreprocessModule (filename: String;
+ topSource, deleteDep: BOOLEAN;
+ outputDep: String) : String ;
+
+
+(*
+ MakeSaveTempsFileNameExt - creates and return the temporary filename.ext.
+ in the current working directory unless
+ SaveTempsDir = obj, when we put it in the dumpdir
+ if that is specified (or fallback to '.' if not).
+*)
+
+PROCEDURE MakeSaveTempsFileNameExt (filename, ext: String) : String ;
+
+
+(*
+ OnExitDelete - when the application finishes delete filename.
+*)
+
+PROCEDURE OnExitDelete (filename: String) : String ;
END M2Preprocess.