UNIX 6th Ed. - /usr/source/fort/rt2/nice.s

   1: /
   2: /
   3: 
   4: / fortran nice subroutine
   5: 
   6: .globl  nice.
   7: .globl  retrn, temp
   8: 
   9: nice.:
  10:         temp
  11:         .+2
  12:         mov     $16.,r0
  13:         tst     *2(sp)
  14:         beq     1f
  15:         mov     2(r3),r0
  16:         mov     2(r0),r0
  17: 1:
  18:         sys     nice
  19:         jmp     retrn

Defined functions