paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-18 17:19:32 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ added class TRelObjOutput

Browse Source 
git-svn-id: trunk@45195 -
This commit is contained in:
nickysn 2020-04-30 17:31:18 +00:00
parent 1a18805c96
commit c0ffa18ee2
1 changed files with 16 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
compiler/ogrel.pas
View File

@ -39,9 +39,15 @@ interface
type
{ TRelObjOutput }
TRelObjOutput = class(tObjOutput)
end;
{ TRelAssembler }
TRelAssembler = class(tinternalassembler)
constructor create(info: pasminfo; smart:boolean);override;
end;
implementation
@ -55,6 +61,16 @@ implementation
;
{*****************************************************************************
TRelAssembler
*****************************************************************************}
constructor TRelAssembler.create(info: pasminfo; smart: boolean);
begin
inherited;
CObjOutput:=TRelObjOutput;
end;
{*****************************************************************************
Initialize
*****************************************************************************}