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

+ Initial implementation

Browse Source
This commit is contained in:
michael 1998-03-28 09:47:18 +00:00
parent b170680325
commit a8cfe52ddf
1 changed files with 19 additions and 0 deletions

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

@ -0,0 +1,19 @@
.file "crt0.s"
.text
.globl __entry
__entry:
movel sp@(8),d0
movel d0,U_SYSLINUX_ENVP
movel sp@(4),d0
movel d0,U_SYSLINUX_ARGV
movel sp@,d0
movel d0,U_SYSLINUX_ARGC
jsr PASCALMAIN
movel U_SYSLINUX_EXITCODE,d1
done:
moveq #1,d0
trap #0
bras done