home *** CD-ROM | disk | FTP | other *** search
/ minnie.tuhs.org / unixen.tar / unixen / PDP-11 / Trees / V7 / usr / src / libc / csu / fcrt0.s < prev    next >
Encoding:
Text File  |  1979-01-10  |  456 b   |  40 lines
  1. / C runtime startoff
  2. / with floating point interpreter
  3.  
  4. .globl    fptrap
  5. .globl    _exit
  6. .globl    _main
  7. .globl    _environ
  8. exit = 1.
  9. signal = 48.
  10.  
  11. start:
  12.     sys    signal; 4; fptrap
  13.     setd
  14.     mov    2(sp),r0
  15.     clr    -2(r0)
  16.     mov    sp,r0
  17.     sub    $4,sp
  18.     mov    4(sp),(sp)
  19.     tst    (r0)+
  20.     mov    r0,2(sp)
  21. 1:
  22.     tst    (r0)+
  23.     bne    1b
  24.     cmp    r0,*2(sp)
  25.     blo    1f
  26.     tst    -(r0)
  27. 1:
  28.     mov    r0,4(sp)
  29.     mov    r0,_environ
  30.     jsr    pc,_main
  31.     cmp    (sp)+,(sp)+
  32.     mov    r0,(sp)
  33.     jsr    pc,*$_exit
  34.     sys    exit
  35. .bss
  36. _environ:
  37.     .=.+2
  38. .data
  39.     .=.+2
  40.