diff --git a/compiler/aasmtai.pas b/compiler/aasmtai.pas index 30edd804ad..7958060320 100644 --- a/compiler/aasmtai.pas +++ b/compiler/aasmtai.pas @@ -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 diff --git a/compiler/ncgbas.pas b/compiler/ncgbas.pas index 1a238a5fa2..7e91844147 100644 --- a/compiler/ncgbas.pas +++ b/compiler/ncgbas.pas @@ -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