Jelajahi Sumber

Hardcode runtime module in cooperative case

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@8040 8c9fc860-2736-0410-a75d-ab315db34111
negelef 7 tahun lalu
induk
melakukan
0f0687d9f6
1 mengubah file dengan 4 tambahan dan 4 penghapusan
  1. 4 4
      source/FoxIntermediateBackend.Mod

+ 4 - 4
source/FoxIntermediateBackend.Mod

@@ -1603,7 +1603,7 @@ TYPE
 		BEGIN
 			IF backend.cooperative THEN
 				Emit(Push(position,IntermediateCode.Immediate(sizeType,trapNo)));
-				CallThis(position,DefaultRuntimeModuleName,"Trap",1); 
+				CallThis(position,"Runtime","Trap",1); 
 			ELSE
 				Emit(Trap(position,trapNo));
 			END;
@@ -3485,7 +3485,7 @@ TYPE
 			ReleaseOperand(right);
 
 			IF backend.cooperative THEN
-				CallThis(position,DefaultRuntimeModuleName,procedureName, 4);
+				CallThis(position,"Runtime",procedureName, 4);
 			ELSE
 				CallThis(position,runtimeModuleName,procedureName, 4);
 			END;
@@ -3528,7 +3528,7 @@ TYPE
 			ReleaseOperand(right);
 
 			IF backend.cooperative THEN
-				CallThis(position,DefaultRuntimeModuleName,procedureName, 4);
+				CallThis(position,"Runtime",procedureName, 4);
 			ELSE
 				CallThis(position,runtimeModuleName,procedureName,4);
 			END;
@@ -7874,7 +7874,7 @@ TYPE
 				Designate(p0,s0);
 				Emit(Push(position,s0.op));
 				ReleaseOperand(s0);
-				CallThis(position,DefaultRuntimeModuleName,"Dispose", 1);
+				CallThis(position,"Runtime","Dispose", 1);
 			(* ---- GETPROCEDURE ----- *)
 			|Global.GetProcedure:
 				Designate(p0,s0);