瀏覽代碼

* start code of gcc adapted for FPC

mazen 23 年之前
父節點
當前提交
98a1b248e6
共有 1 個文件被更改,包括 10 次插入4 次删除
  1. 10 4
      rtl/linux/sparc/prt0.as

+ 10 - 4
rtl/linux/sparc/prt0.as

@@ -1,3 +1,4 @@
+#   $Id$
 /* Startup code for elf32-sparc
 /* Startup code for elf32-sparc
    Copyright (C) 1997, 1998 Free Software Foundation, Inc.
    Copyright (C) 1997, 1998 Free Software Foundation, Inc.
    This file is part of the GNU C Library.
    This file is part of the GNU C Library.
@@ -49,13 +50,18 @@ _start:
      address of the shared library termination function, which will be
      address of the shared library termination function, which will be
      registered with atexit().  If we are statically linked, this will
      registered with atexit().  If we are statically linked, this will
      be NULL.  */
      be NULL.  */
-	mov	%g1, %o5
+  mov	%g1, %o5
 
 
-  /* Let libc do the rest of the initialization, and call main.  */
-	call	__libc_start_main
-	 nop
+  /* Call the user program entry point.  */
+  call	PASCALMAIN
+  nop
 
 
   /* Die very horribly if exit returns.  */
   /* Die very horribly if exit returns.  */
 	unimp
 	unimp
 
 
 	.size _start, .-_start
 	.size _start, .-_start
+
+# $Log$
+# Revision 1.3  2002-11-18 19:03:46  mazen
+# * start code of gcc adapted for FPC
+#