|
@@ -122,8 +122,6 @@ interface
|
|
type
|
|
type
|
|
TAsmList = class(tlinkedlist)
|
|
TAsmList = class(tlinkedlist)
|
|
constructor create;
|
|
constructor create;
|
|
- constructor create_without_marker;
|
|
|
|
- function empty : boolean;
|
|
|
|
function getlasttaifilepos : pfileposinfo;
|
|
function getlasttaifilepos : pfileposinfo;
|
|
end;
|
|
end;
|
|
|
|
|
|
@@ -284,20 +282,6 @@ implementation
|
|
constructor TAsmList.create;
|
|
constructor TAsmList.create;
|
|
begin
|
|
begin
|
|
inherited create;
|
|
inherited create;
|
|
- { make sure the optimizer won't remove the first tai of this list}
|
|
|
|
- insert(tai_marker.create(mark_BlockStart));
|
|
|
|
- end;
|
|
|
|
-
|
|
|
|
- constructor TAsmList.create_without_marker;
|
|
|
|
- begin
|
|
|
|
- inherited create;
|
|
|
|
- end;
|
|
|
|
-
|
|
|
|
- function TAsmList.empty : boolean;
|
|
|
|
- begin
|
|
|
|
- { there is always a mark_BlockStart available,
|
|
|
|
- see TAsmList.create }
|
|
|
|
- result:=(count<=1);
|
|
|
|
end;
|
|
end;
|
|
|
|
|
|
|
|
|