mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-21 01:09:31 +02:00
* asmnode.get_position now inserts a marker
This commit is contained in:
parent
53e8350307
commit
96afb56699
@ -192,7 +192,8 @@ interface
|
||||
|
||||
TMarker = (NoPropInfoStart,NoPropInfoEnd,
|
||||
AsmBlockStart,AsmBlockEnd,
|
||||
InlineStart,InlineEnd,marker_blockstart);
|
||||
InlineStart,InlineEnd,marker_blockstart,
|
||||
marker_position);
|
||||
|
||||
{ Buffer type used for alignment }
|
||||
tfillbuffer = array[0..63] of char;
|
||||
@ -2139,7 +2140,10 @@ implementation
|
||||
end.
|
||||
{
|
||||
$Log$
|
||||
Revision 1.47 2003-10-23 14:44:07 peter
|
||||
Revision 1.48 2003-10-24 17:39:41 peter
|
||||
* asmnode.get_position now inserts a marker
|
||||
|
||||
Revision 1.47 2003/10/23 14:44:07 peter
|
||||
* splitted buildderef and buildderefimpl to fix interface crc
|
||||
calculation
|
||||
|
||||
|
@ -175,6 +175,8 @@ interface
|
||||
|
||||
if getposition then
|
||||
begin
|
||||
{ Add a marker, to be sure the list is not empty }
|
||||
exprasmlist.concat(tai_marker.create(marker_position));
|
||||
currenttai:=tai(exprasmlist.last);
|
||||
exit;
|
||||
end;
|
||||
@ -372,7 +374,10 @@ begin
|
||||
end.
|
||||
{
|
||||
$Log$
|
||||
Revision 1.45 2003-10-21 15:15:36 peter
|
||||
Revision 1.46 2003-10-24 17:39:41 peter
|
||||
* asmnode.get_position now inserts a marker
|
||||
|
||||
Revision 1.45 2003/10/21 15:15:36 peter
|
||||
* taicpu_abstract.oper[] changed to pointers
|
||||
|
||||
Revision 1.44 2003/10/10 17:48:13 peter
|
||||
|
Loading…
Reference in New Issue
Block a user