From 0e955b9297571bb083b51bd73096aea6ebf79f15 Mon Sep 17 00:00:00 2001 From: CSRG Date: Sun, 27 Mar 1983 03:40:07 -0800 Subject: [PATCH] BSD 4_3_Tahoe development Work on file usr/tmp/housel/franz/vax/crt0.s Work on file usr/src/ucb/lisp/franz/vax/crt0.s Synthesized-from: CSRG/cd2/4.3tahoe --- usr/src/ucb/lisp/franz/vax/crt0.s | 30 ++++++++++++++++++++++++++++++ usr/tmp/housel/franz/vax/crt0.s | 30 ++++++++++++++++++++++++++++++ 2 files changed, 60 insertions(+) create mode 100644 usr/src/ucb/lisp/franz/vax/crt0.s create mode 100644 usr/tmp/housel/franz/vax/crt0.s diff --git a/usr/src/ucb/lisp/franz/vax/crt0.s b/usr/src/ucb/lisp/franz/vax/crt0.s new file mode 100644 index 0000000000..2facc1a7d1 --- /dev/null +++ b/usr/src/ucb/lisp/franz/vax/crt0.s @@ -0,0 +1,30 @@ +# C runtime startoff +# $Header: /na/franz/franz/vax/RCS/crt0.s,v 1.1 83/03/27 18:39:57 jkf Exp $ + + .set exit,1 +.globl _exit +.globl start +.globl _main +.globl _environ + +start: + .word 0x0000 + subl2 $8,sp + movl 8(sp),(sp) # argc + movab 12(sp),r0 + movl r0,4(sp) # argv +L1: + tstl (r0)+ # null args term ? + bneq L1 + cmpl r0,*4(sp) # end of 'env' or 'argv' ? + blss L2 + tstl -(r0) # envp's are in list +L2: + movl r0,8(sp) # env +# movl r0,_environ # indir is 0 if no env ; not 0 if env + calls $3,_main + pushl r0 + calls $1,_exit + chmk $exit + .data +_environ: .space 4 diff --git a/usr/tmp/housel/franz/vax/crt0.s b/usr/tmp/housel/franz/vax/crt0.s new file mode 100644 index 0000000000..2facc1a7d1 --- /dev/null +++ b/usr/tmp/housel/franz/vax/crt0.s @@ -0,0 +1,30 @@ +# C runtime startoff +# $Header: /na/franz/franz/vax/RCS/crt0.s,v 1.1 83/03/27 18:39:57 jkf Exp $ + + .set exit,1 +.globl _exit +.globl start +.globl _main +.globl _environ + +start: + .word 0x0000 + subl2 $8,sp + movl 8(sp),(sp) # argc + movab 12(sp),r0 + movl r0,4(sp) # argv +L1: + tstl (r0)+ # null args term ? + bneq L1 + cmpl r0,*4(sp) # end of 'env' or 'argv' ? + blss L2 + tstl -(r0) # envp's are in list +L2: + movl r0,8(sp) # env +# movl r0,_environ # indir is 0 if no env ; not 0 if env + calls $3,_main + pushl r0 + calls $1,_exit + chmk $exit + .data +_environ: .space 4 -- 2.20.1