mach/vax4/libsysV_2/head_em.s

   1 #include "em_abs.h"
   2 .sect .text; .sect .rom; .sect .data; .sect .bss
   3 .sect .text
   4
   5         ! $Id: head_em.s,v 1.8 1994/06/24 13:53:06 ceriel Exp $
   6
   7 .define hol0
   8 .define .reghp
   9 .define .limhp
  10 .define .trppc
  11 .define .trpim
  12 .define EXIT,WRITE,BRK
  13
  14         ! run time startoff
  15         .data2  0
  16         bispsw  $0100           ! set FU(0100)
  17         movl    4(sp),r0
  18         clrl    -4(r0)
  19         movl    sp,r0
  20         movl    (r0)+,r1
  21         movl    r0,r2
  22 1:
  23         tstl    (r0)+
  24         bneq    1b
  25         cmpl    r0,(r2)
  26         blssu   2f
  27         tstl    -(r0)
  28 2:
  29         pushl   r0
  30         pushl   r2
  31         pushl   r1
  32         calls   $3,__m_a_i_n
  33 EXIT:
  34         movl    $Im2,ap
  35         movl    r0,6(ap)
  36         chmk    (ap)+
  37         halt
  38
  39 write = 4
  40 WRITE:
  41         .data2  0x0000
  42         chmk    $write
  43         bcc     1f
  44         jmp     cerror
  45 1:
  46         ret
  47
  48
  49 break = 17
  50
  51 BRK:
  52         .data2  0x0000
  53         chmk    $break
  54         bcc     1f
  55         jmp     cerror
  56 1:
  57         movl    4(ap),.limhp
  58         clrl    r0
  59         ret
  60
  61         .sect .data
  62 Im2:
  63         .data2  1
  64         .data4  1
  65         .data4  0
  66         .data2  0
  67 .reghp:
  68         .data4  __end
  69 .limhp:
  70         .data4  __end
  71 hol0:
  72         .space  8
  73 .trppc:
  74         .space  4
  75 .trpim:
  76         .data4  0