jget.s

Functions

jget              X

   1: f = r5
   2: .globl j,n
   3: .globl input
   4: .globl classtab
   5: .globl jget
   6: 
   7: jget:
   8:         inc     jgetc
   9: 3:
  10:         mov     j(f),r1
  11:         mov     r1,r0
  12:         bic     $inpt-1,r0
  13:         bic     r0,r1
  14:         cmp     r0,inpr
  15:         beq     1f
  16:         inc     readc
  17:         mov     r0,inpr
  18:         mov     input,r0
  19:         sys     seek
  20: inpr:           1;0
  21:         sys     read;inpb;inpt
  22: 2:
  23:         cmp     r0,$inpt
  24:         bge     1f
  25:         clrb    inpb(r0)
  26:         inc     r0
  27:         br      2b
  28: 1:
  29:         movb    inpb(r1),r0
  30:         asl     r0
  31:         bit     n(f),classtab(r0)
  32:         beq     1f
  33:         inc     j(f)
  34:         inc     r1
  35:         cmp     r1,$inpt
  36:         blt     1b
  37:         br      3b
  38: 1:
  39:         asr     r0
  40:         rts     pc
  41: inpt = 128.
  42: .bss
  43: inpb:   . = .+inpt
  44: .data
  45: jgetc:  0
  46: readc:  0

Defined functions

f defined in line 1; used 3 times

in line 10, 31-33(2)

inpr defined in line 20; used 2 times

in line 14-17(2)

inpt defined in line 41; used 5 times

in line 12, 21-23(2), 35, 43

jget declared in line 5; defined in line 7; used 9 times

in line 5
in /usr/source/tmg/tmgb/char.s line 4-9(2)
in /usr/source/tmg/tmgb/cstr.s line 1, 12
in /usr/source/tmg/tmgb/ctest.s line 3, 11
in /usr/source/tmg/tmgb/px.s line 4, 22

Defined variables

inpb defined in line 43; used 3 times

in line 21-29(3)

jgetc defined in line 45; used 1 times

in line 8

readc defined in line 46; used 1 times

in line 16

Last modified: 1975-05-14
Generated: 2016-12-26

Generated by src2html V0.67
page hit count: 392