1997-06-26 22:23:01 +00:00
|
|
|
/* Copyright (C) 1993, 1995, 1997 Free Software Foundation, Inc.
|
|
|
|
This file is part of the GNU C Library.
|
1995-03-10 01:56:19 +00:00
|
|
|
Contributed by Brendan Kehoe (brendan@zen.org).
|
|
|
|
|
1997-06-26 22:23:01 +00:00
|
|
|
The GNU C Library is free software; you can redistribute it and/or
|
|
|
|
modify it under the terms of the GNU Library General Public License as
|
|
|
|
published by the Free Software Foundation; either version 2 of the
|
|
|
|
License, or (at your option) any later version.
|
1995-03-10 01:56:19 +00:00
|
|
|
|
1997-06-26 22:23:01 +00:00
|
|
|
The GNU C Library is distributed in the hope that it will be useful,
|
|
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
|
|
Library General Public License for more details.
|
1995-03-10 01:56:19 +00:00
|
|
|
|
1997-06-26 22:23:01 +00:00
|
|
|
You should have received a copy of the GNU Library General Public
|
|
|
|
License along with the GNU C Library; see the file COPYING.LIB. If not,
|
|
|
|
write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
|
|
|
|
Boston, MA 02111-1307, USA. */
|
1995-03-10 01:56:19 +00:00
|
|
|
|
|
|
|
#include <sysdep.h>
|
|
|
|
|
1995-04-15 02:07:14 +00:00
|
|
|
#if 0
|
|
|
|
.sdata
|
|
|
|
.globl STARTFRM
|
|
|
|
STARTFRM = 0
|
|
|
|
#endif
|
1995-03-10 01:56:19 +00:00
|
|
|
|
|
|
|
.text
|
|
|
|
ENTRY(__start)
|
|
|
|
lda sp, -16(sp)
|
|
|
|
stq zero, 8(sp)
|
|
|
|
|
1995-04-15 02:07:14 +00:00
|
|
|
/* This branch puts the address of the current insn in t0. */
|
1995-03-10 01:56:19 +00:00
|
|
|
br t0, 10f
|
|
|
|
10:
|
1995-04-15 02:07:14 +00:00
|
|
|
/* We set the GP register by using the address of the ldgp */
|
|
|
|
/* (what we just put into t0). */
|
1995-03-10 01:56:19 +00:00
|
|
|
ldgp gp, 0(t0)
|
|
|
|
|
1995-04-15 02:07:14 +00:00
|
|
|
/* get argc */
|
1995-03-10 01:56:19 +00:00
|
|
|
ldl a0, 16(sp)
|
|
|
|
|
1995-04-15 02:07:14 +00:00
|
|
|
/* get argv */
|
1995-03-10 01:56:19 +00:00
|
|
|
lda a1, 24(sp)
|
|
|
|
|
1995-04-15 02:07:14 +00:00
|
|
|
/* move ahead to envp */
|
1995-03-10 01:56:19 +00:00
|
|
|
s8addq a0, a1, a2
|
|
|
|
addq a2, 0x8, a2
|
|
|
|
|
1995-04-15 02:07:14 +00:00
|
|
|
/* Store in environ. */
|
1995-03-10 01:56:19 +00:00
|
|
|
stq a2, environ
|
|
|
|
|
1995-04-15 02:07:14 +00:00
|
|
|
/* Clear out errno. */
|
|
|
|
/* ldgp gp, 0(t12) */
|
1995-03-10 01:56:19 +00:00
|
|
|
stl zero, errno
|
|
|
|
|
1995-04-15 02:07:14 +00:00
|
|
|
/* Call main. */
|
1995-03-10 01:56:19 +00:00
|
|
|
jsr ra, main
|
|
|
|
ldgp gp, 0(ra)
|
|
|
|
|
|
|
|
mov v0, a0
|
|
|
|
|
|
|
|
jsr ra, exit
|
|
|
|
ldgp gp, 0(ra)
|
|
|
|
|
|
|
|
.end __start
|