Browse Source

* changed so it still fails after today's changes

git-svn-id: trunk@4589 -
Jonas Maebe 19 years ago
parent
commit
056eb5b012
1 changed files with 2 additions and 2 deletions
  1. 2 2
      tests/test/tparray2.pp

+ 2 - 2
tests/test/tparray2.pp

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