home *** CD-ROM | disk | FTP | other *** search
/ minnie.tuhs.org / unixen.tar / unixen / PDP-11 / Distributions / ucb / spencer_2bsd.tar.gz / 2bsd.tar / src / pascal / assubs / pcrt0.s < prev    next >
Encoding:
Text File  |  1980-02-17  |  369 b   |  34 lines
  1. / Modified C runtime startoff for pcx
  2. / with floating point interpreter
  3.  
  4. .globl    savr5
  5. .globl    fptrap
  6. .globl    _exit, _pxpbuf
  7.  
  8. .globl    _main
  9.  
  10. start:
  11.     br    1f
  12.     0
  13.     _pxpbuf
  14. 1:
  15.     sys    signal; 4; fptrap
  16.     setd
  17.     mov    sp,r0
  18.     mov    (r0),-(sp)
  19.     tst    (r0)+
  20.     mov    r0,2(sp)
  21.     jsr    pc,_main
  22.     cmp    (sp)+,(sp)+
  23.     mov    r0,(sp)
  24.     jsr    pc,*$_exit
  25.     sys    exit
  26.  
  27. .bss
  28. savr5:    .=.+2
  29. .data
  30. _info:
  31.     _info
  32.     1
  33.      _pxpbuf
  34.