소스 검색

Fixed retrieval of size of record

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@7334 8c9fc860-2736-0410-a75d-ab315db34111
negelef 8 년 전
부모
커밋
063b60828f
1개의 변경된 파일5개의 추가작업 그리고 1개의 파일을 삭제
  1. 5 1
      source/FoxIntermediateBackend.Mod

+ 5 - 1
source/FoxIntermediateBackend.Mod

@@ -9889,7 +9889,11 @@ TYPE
 					(* this is the only case where the destination can be dynamically smaller than the source 
 						in all other cases the dynamic size has to be taken
 					*)
-					MakeMemory(mem, tag, addressType, 0);
+					IF backend.cooperative THEN 
+						MakeMemory(mem, tag, addressType, system.addressSize);
+					ELSE
+						MakeMemory(mem, tag, addressType, 0);
+					END;
 					RETURN mem;
 				END;
 			END;