* changed so it still fails now that you can take the address of some

    fields of bitpacked records

git-svn-id: trunk@7621 -

tests/webtbf/tw7438.pp

@@ -7,8 +7,8 @@ interface
 
 type
   tr = bitpacked record
-    l1: longint;
-    l2: longint;
+    l1: 0..15;
+    l2: 0..15;
   end;