mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-11-03 00:09:47 +01:00
Needs a fix in gdb when referencing a location relative to a
global variable (an array element other than the first, a field
other than the first) on Mac OS X and when using external debug
info on Linux/Windows.
git-svn-id: trunk@12877 -
19 lines
150 B
ObjectPascal
19 lines
150 B
ObjectPascal
{ %fail }
|
|
|
|
{$ifdef fpc}
|
|
{$mode delphi}
|
|
{$endif}
|
|
|
|
type
|
|
ta = record
|
|
a: byte;
|
|
end;
|
|
pa = ^ta;
|
|
|
|
var
|
|
a: pa;
|
|
b: byte absolute a.a;
|
|
begin
|
|
end.
|
|
|