소스 검색

* changed so it still fails after today's changes

git-svn-id: trunk@4589 -
Jonas Maebe 19 년 전
부모
커밋
056eb5b012
1개의 변경된 파일2개의 추가작업 그리고 2개의 파일을 삭제
  1. 2 2
      tests/test/tparray2.pp

+ 2 - 2
tests/test/tparray2.pp

@@ -3,13 +3,13 @@
 {$mode macpas}
 
 type
-  tba = array[0..7] of boolean;
+  tba = packed array[0..7] of boolean;
   tkeymap = packed array[0..3] of tba;
 
 var
   p: pointer;
   km: tkeymap;
 begin
-  p := @km[2];
+  p := @km[2][3];
 end.