瀏覽代碼

* 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.