Hello Merlin,
the optimiser calculates wrong addresses.
Please check it.
program Test;
Device = mega2560, VCC = 5;
Import;
Define
ProcClock = 16000000;
StackSize = 512, iData;
FrameSize = 512, iData;
implementation
{$IDATA}
type
Trx = record
padding : array[0..$8C] of byte;
data : array[0..3] of byte;
end;
var
rx : Trx;
begin
rx.data[0] := 1;
rx.data[1] := 2;
rx.data[2] := 3;
rx.data[3] := 4;
loop
endloop;
end.
Kind regards,
Thomas.AC
the optimiser calculates wrong addresses.
Please check it.
Code
program Test;
Device = mega2560, VCC = 5;
Import;
Define
ProcClock = 16000000;
StackSize = 512, iData;
FrameSize = 512, iData;
implementation
{$IDATA}
type
Trx = record
padding : array[0..$8C] of byte;
data : array[0..3] of byte;
end;
var
rx : Trx;
begin
rx.data[0] := 1;
rx.data[1] := 2;
rx.data[2] := 3;
rx.data[3] := 4;
loop
endloop;
end.
Kind regards,
Thomas.AC
You must be logged in or your permissions are to low to see this Attachment(s).