2.9BSD - /usr/src/ucb/pascal/utilities/fpdata/treen.s

   1: .data
   2: /
   3: / Routines to save space on tree calls
   4: /
   5: .globl _tree, _tree1, _tree2, _tree3, _tree4, _tree5
   6: /
   7: _tree1:
   8:         mov     (sp),trret
   9:         mov     $1,(sp)
  10:         br      1f
  11: _tree2:
  12:         mov     (sp),trret
  13:         mov     $2,(sp)
  14:         br      1f
  15: _tree3:
  16:         mov     (sp),trret
  17:         mov     $3,(sp)
  18:         br      1f
  19: _tree4:
  20:         mov     (sp),trret
  21:         mov     $4,(sp)
  22:         br      1f
  23: _tree5:
  24:         mov     (sp),trret
  25:         mov     $5,(sp)
  26: 1:
  27:         mov     $1f,-(sp)
  28:         jmp     _tree
  29: 1:
  30:         tst     (sp)+
  31:         jmp     *trret
  32: .bss
  33: trret:  . = .+2

Defined variables