paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-14 01:59:32 +02:00
Code Issues Packages Projects Releases Wiki Activity

* changes from Olle to compile/link a simple program

Browse Source
This commit is contained in:
florian 2002-10-10 19:44:05 +00:00
parent 8ad5fe9533
commit 674d20ef5e
1 changed files with 20 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
rtl/macos/system.pp
View File

@ -36,19 +36,31 @@ procedure fpc_initializeunits;[public,alias:'FPC_INITIALIZEUNITS'];
begin begin
end; end;
procedure _restf14;[public,alias:'_restf14']; { This is a hack to make it work until powerpc.inc is fixed.
begin This function is never called directly, it's a dummy to hold the register save/
end; load subroutines
}
procedure _savef14;[public,alias:'_savef14']; procedure saverestorereg;
assembler;
begin asm
export ._restf14[PR]
csect ._restf14[PR]
._restf14:
mtlr r0
blr
export ._savef14[PR]
csect ._savef14[PR]
._savef14:
blr
end; end;
end. end.
{ {
$Log$ $Log$
Revision 1.1 2002-10-02 21:34:31 florian Revision 1.2 2002-10-10 19:44:05 florian
* changes from Olle to compile/link a simple program
Revision 1.1 2002/10/02 21:34:31 florian
* first dummy implementation * first dummy implementation
} }