git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@8041 8c9fc860-2736-0410-a75d-ab315db34111
@@ -1,4 +1,4 @@
-MODULE ARMRuntime;
+MODULE Runtime;
IMPORT SYSTEM, FPE64;
CONST
@@ -685,4 +685,4 @@ TYPE
SYSTEM.MOVE(ADDRESSOF(source[0]), ADDRESSOF(destination[0]), sourceLength)
END CopyString;
-END ARMRuntime.
+END Runtime.
@@ -9,7 +9,6 @@ IMPORT
Trace = FALSE; (* general trace *)
- DefaultRuntimeModuleName = "ARMRuntime";
SupportMovW = TRUE; (* movw is only available on ARM from V6/V7, not on older platforms *)
None = -1;
@@ -3475,7 +3474,6 @@ TYPE
useFPU32 := FALSE;
useFPU64 := FALSE;
InitIntermediateBackend;
- SetRuntimeModuleName(DefaultRuntimeModuleName);
SetNewObjectFile(TRUE,FALSE);
system := NIL;
initLocals := TRUE;
@@ -534,7 +534,7 @@ TYPE ObjectFileFormat* = OBJECT (Formats.ObjectFileFormat)
END FoxIntermediateObjectFile.
SystemTools.FreeDownTo FoxIntermediateObjectFile ~
-FoxIntermediateObjectFile.Show TRMRuntime ~
+FoxIntermediateObjectFile.Show Runtime ~
(* test code to compare ..
backend: Backend.Backend;
TraceFixups = FALSE;
- DefaultRuntimeModuleName = "TRMRuntime";
HaltIRQNumber=8;
Registers = 8; None=-1;
Low=0; High=1;
@@ -2219,7 +2218,6 @@ TYPE
PROCEDURE &InitBackendTRM;
BEGIN
SetNewObjectFile(TRUE,TRUE);
myInstructionSet:=defaultInstructionSet;
SetHasLinkRegister;
@@ -464,14 +464,14 @@ FoxTRMTools.Test ~
Compiler.Compile -b=TRM --objectFile=Intermediate --activeCells --noRuntimeChecks --activeCellsSpecification=FoxAVSP6LX75T --patchSpartan6
oc/TRM.RS232.Mod
oc/TRM.Testing.Mod
-oc/TRM.TRMRuntime.Mod
+oc/TRM.Runtime.Mod
oc/TRM.TestNet.Mdf
~
Compiler.Compile -b=TRM --objectFile=Intermediate --activeCells --noRuntimeChecks --activeCellsSpecification=ML505