소스 검색

fixed a bug with a missing calling convention type

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@6630 8c9fc860-2736-0410-a75d-ab315db34111
eth.morozova 9 년 전
부모
커밋
2c1e19dc36
1개의 변경된 파일1개의 추가작업 그리고 0개의 파일을 삭제
  1. 1 0
      source/FoxAMDBackend.Mod

+ 1 - 0
source/FoxAMDBackend.Mod

@@ -1309,6 +1309,7 @@ TYPE
 				emitter.Emit2(InstructionSet.opSUB,opSP,op1);
 			END;
 
+			cc := SHORT(instruction.op1.intValue);
 			IF (cc = SyntaxTree.WinAPICallingConvention) OR (cc = SyntaxTree.CCallingConvention) THEN
 				(* the winapi calling convention presumes that all registers except EAX, EDX and ECX are retained by the callee *)
 				emitter.Emit1(InstructionSet.opPUSH,opEBX);