paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-11 18:49:14 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ InlineStat and InlineEnd amrker added

Browse Source
This commit is contained in:
pierre 2000-02-29 23:55:53 +00:00
parent 6bad578fb6
commit babef0ad6d
1 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
compiler/aasm.pas
View File

@ -287,7 +287,9 @@ unit aasm;
constructor init_end; constructor init_end;
end; end;
TMarker = (NoPropInfoStart, NoPropInfoEnd, AsmBlockStart, AsmBlockEnd); TMarker = (NoPropInfoStart, NoPropInfoEnd,
AsmBlockStart, AsmBlockEnd,
InlineStart,InlineEnd);
pai_marker = ^tai_marker; pai_marker = ^tai_marker;
tai_marker = object(tai) tai_marker = object(tai)
Kind: TMarker; Kind: TMarker;
@ -1048,7 +1050,10 @@ uses
end. end.
{ {
$Log$ $Log$
Revision 1.79 2000-02-28 17:23:56 daniel Revision 1.80 2000-02-29 23:55:53 pierre
+ InlineStat and InlineEnd amrker added
Revision 1.79 2000/02/28 17:23:56 daniel
* Current work of symtable integration committed. The symtable can be * Current work of symtable integration committed. The symtable can be
activated by defining 'newst', but doesn't compile yet. Changes in type activated by defining 'newst', but doesn't compile yet. Changes in type
checking and oop are completed. What is left is to write a new checking and oop are completed. What is left is to write a new