1 /* srt0.c 4.3 12/17/80 */ 2 3 /* 4 * Startup code for standalone system 5 * Non-relocating version -- for programs which are loaded by boot 6 */ 7 8 .globl _edata 9 .globl _main 10 .globl __rtt 11 12 #if VAX==780 13 .set PHYSUBA,0x20006000 # uba 0 14 #endif 15 16 .set HIGH,31 # mask for total disable 17 18 .word 0x0 19 mtpr $HIGH,$IPL # just in case 20 movl $RELOC-0x2000,sp 21 #if VAX==780 22 movl $1,PHYSUBA+4 # init 23 ubic: 24 movl *$PHYSUBA,r0 # while ((up->uba_cnfgr & UBIC) == 0) 25 bitl $0x10000,r0 # continue; 26 jeql ubic 27 #endif 28 movab _edata,r0 29 clr: 30 clrl (r0)+ 31 cmpl r0,sp 32 jlss clr 33 start: 34 calls $0,_main 35 jmp start 36 37 __rtt: 38 .word 0x0 39 jmp start 40