Added missing result handling procedures

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@6392 8c9fc860-2736-0410-a75d-ab315db34111

source/RPI.CPU.Mod

@@ -42,6 +42,18 @@ CODE
 	WFI
 END Halt;
 
+PROCEDURE -SaveResult-;
+CODE
+	STMDB	SP!, {R0, R1}
+END SaveResult;
+
+PROCEDURE -RestoreResultAndReturn-;
+CODE
+	LDMIA	SP!, {R0, R1}
+	ADD	SP, FP, #4
+	LDMIA	SP!, {FP, PC}
+END RestoreResultAndReturn;
+
 (* memory management *)
 CONST MemorySize* = 964 * MB; MB = 1024 * 1024;