paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-20 13:49:40 +02:00
Code Issues Packages Projects Releases Wiki Activity

* test for 32 bit targets fixed

Browse Source 
git-svn-id: trunk@48496 -
This commit is contained in:
florian 2021-02-01 21:14:19 +00:00
parent 3922926d17
commit 40b8bde305
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
tests/webtbs/uw38429.pp
View File

@ -11,7 +11,7 @@ uses
type type
TMyVar = packed record TMyVar = packed record
VType: TVarType; VType: TVarType;
Dummy1: array[0..Pred(SizeOf(Pointer) - 2)] of Byte; Dummy1: array[0..2] of Word;
Dummy2, Dummy2,
Dummy3: Pointer; Dummy3: Pointer;
procedure Init; procedure Init;