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

+ update to make it work

Browse Source
This commit is contained in:
carl 1998-08-14 12:02:18 +00:00
parent c1cf6d35ed
commit 268fc56902
1 changed files with 13 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
rtl/linux/m68k/prt0.as
View File

@ -1,4 +1,4 @@
.file "crt0.s"
.file "prt0.as"
.text
.globl __entry
__entry:
@ -10,10 +10,17 @@ __entry:
movel d0,U_SYSLINUX_ARGC
jsr PASCALMAIN
movel U_SYSLINUX_EXITCODE,d1
done:
.globl _haltproc
_haltproc:
moveq #1,d0
movel U_SYSLINUX_EXITCODE,d1
trap #0
bras done
bras _haltproc
.data
.align 4
.globl ___fpc_brk_addr
___fpc_brk_addr:
.long 0