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

* mention modified registers in assembler block

Browse Source 
* prevent writes beyond the end of the record

git-svn-id: trunk@31956 -
This commit is contained in:
Jonas Maebe 2015-10-05 21:17:41 +00:00
parent bfc85a73bd
commit e15c969cbc
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
tests/tbs/tb0320.pp
View File

@ -8,6 +8,7 @@ const
type
trec=record
a,b : longint;
c: longint;
end;
var
@ -27,5 +28,5 @@ begin
mov fs:[0468+trec.b],eax
mov fs:[046ch],eax
{$endif}
end;
end ['eax','esi'];
end.