UNIX 6th Ed. - /usr/source/salloc/rewind.s

   1: .globl  rewind
   2: .globl  create
   3: .globl  fsfile
   4: .globl  w, r, a, l
   5: /
   6: /
   7: /	routine to rewind read pointer of string
   8: /	pointed to by r1
   9: /
  10: /	mov	...,r1
  11: /	jsr	pc,rewind
  12: /
  13: rewind:
  14:         mov     a(r1),r(r1)
  15:         rts     pc
  16: /
  17: /	routine to rewind write pointer of string
  18: /	pointed to by r1
  19: /
  20: /	mov	...,r1
  21: /	jsr	pc,create
  22: /
  23: create:
  24:         mov     a(r1),w(r1)
  25:         mov     a(r1),r(r1)
  26:         rts     pc
  27: /
  28: /
  29: /	routine to copy read pointer of string to end of string
  30: /
  31: /	mov	...,r1
  32: /	jsr	pc,fsfile
  33: /
  34: fsfile:
  35:         mov     w(r1),r(r1)
  36:         rts     pc

Defined functions