Trailing-Edge
-
PDP-10 Archives
-
SRI_NIC_PERM_FS_1_19910112
-
c/old/kc/cc82.fai
There are no other files named cc82.fai in the archive.
TITLE cc82
.LIBRARY C:CLIB
EXTERN .START
gretur:
ADJSP 17,2
MOVE 2,[-1]
MOVEM 2,-1(17)
MOVE 4,-3(17)
MOVE 3,4(4)
JUMPE 3,$1
MOVE 3,-3(17)
MOVE 2,4(3)
PUSH 17,2
PUSHJ 17,genstm
ADJSP 17,-1
MOVEM 0,-1(17)
MOVE 3,-3(17)
MOVE 2,4(3)
MOVE 4,(2)
CAIE 4,26
JRST $2
PUSH 17,-1(17)
SETZ 2,
PUSH 17,2
PUSH 17,[27]
PUSHJ 17,code0
ADJSP 17,-3
JRST $3
$2::
PUSH 17,-1(17)
SETZ 2,
PUSH 17,2
PUSH 17,[27]
PUSHJ 17,code0
ADJSP 17,-3
$3::
PUSH 17,-1(17)
PUSHJ 17,releas
ADJSP 17,-1
SETZB 2,-1(17)
$1::
MOVE 4,previo
MOVEM 4,(17)
MOVEI 3,1
MOVE 6,(17)
MOVE 5,1(6)
CAIN 5,57
SETZ 3,
JUMPN 3,$5
MOVE 11,optimi
MOVEI 10,1
JUMPE 11,.+2
SETZ 10,
JUMPE 10,$4
$5::
MOVE 13,maxaut
JUMPE 13,$6
MOVN 3,maxaut
PUSH 17,3
PUSH 17,[17]
PUSH 17,[4]
PUSHJ 17,code8
ADJSP 17,-3
$6::
PUSH 17,[17]
PUSH 17,[57]
PUSHJ 17,code5
ADJSP 17,-2
$4::
MOVE 0,-1(17)
ADJSP 17,-2
POPJ 17,
ADJSP 17,-2
POPJ 17,
gassig:
ADJSP 17,7
MOVE 3,-10(17)
MOVE 2,3(3)
MOVEM 2,-1(17)
MOVE 4,@-1(17)
CAIN 4,27
JRST $7
MOVE 3,-1(17)
MOVE 2,3(3)
MOVE 4,1(2)
PUSH 17,4
PUSHJ 17,charpo
ADJSP 17,-1
JRST $10
$7::
MOVE 3,-1(17)
MOVE 2,1(3)
PUSH 17,2
PUSHJ 17,charpo
ADJSP 17,-1
$10::
MOVEM 0,-3(17)
MOVEI 2,1
MOVEI 3,1
MOVE 5,-3(17)
JUMPE 5,$15
MOVE 4,@-10(17)
CAIE 4,24
JRST $14
$15::
MOVE 7,@-10(17)
CAIN 7,100
JRST $14
SETZ 3,
$14::
JUMPN 3,$13
MOVEI 11,1
MOVE 12,@-10(17)
CAIE 12,77
SETZ 11,
JUMPN 11,$13
MOVE 14,@-10(17)
CAIN 14,102
JRST $13
SETZ 2,
$13::
JUMPN 2,$12
MOVEI 4,1
MOVE 5,@-10(17)
CAIE 5,101
SETZ 4,
JUMPE 4,$11
$12::
PUSH 17,-10(17)
PUSH 17,-2(17)
SETZ 2,
PUSH 17,2
MOVE 6,-13(17)
MOVE 5,1(6)
PUSH 17,5
PUSH 17,[24]
PUSH 17,[3]
PUSHJ 17,defnod
ADJSP 17,-6
MOVEM 0,-1(17)
MOVE 2,@-10(17)
MOVE 3,2
SUBI 3,74
JUMPL 3,$31
CAIL 3,12
JRST $31
JRST @$32(3)
$32::
$20
$17
$21
$25
$26
$30
$27
$22
$24
$23
$17::
MOVEI 4,16
MOVEM 4,@-10(17)
JRST $16
$20::
MOVEI 5,14
MOVEM 5,@-10(17)
JRST $16
$21::
MOVEI 6,13
MOVEM 6,@-10(17)
JRST $16
$22::
MOVEI 7,7
MOVEM 7,@-10(17)
JRST $16
$23::
MOVEI 10,34
MOVEM 10,@-10(17)
JRST $16
$24::
MOVEI 11,32
MOVEM 11,@-10(17)
JRST $16
$25::
MOVEI 12,20
MOVEM 12,@-10(17)
JRST $16
$26::
MOVEI 13,6
MOVEM 13,@-10(17)
JRST $16
$27::
MOVEI 14,141
MOVEM 14,@-10(17)
JRST $16
$30::
MOVEI 2,142
MOVEM 2,@-10(17)
JRST $16
$31::
MOVE 2,$33
PUSH 17,2
PUSH 17,stderr
PUSHJ 17,fprint
ADJSP 17,-2
SETZ 2,
MOVE 0,2
ADJSP 17,-7
POPJ 17,
$16::
PUSH 17,-1(17)
PUSHJ 17,genstm
ADJSP 17,-1
MOVE 0,0
ADJSP 17,-7
POPJ 17,
$11::
MOVE 2,@-1(17)
CAIN 2,27
JRST $34
MOVE 3,-1(17)
MOVE 2,3(3)
MOVE 4,1(2)
PUSH 17,4
PUSHJ 17,charpo
ADJSP 17,-1
JRST $35
$34::
SETZ 0,
$35::
MOVEM 0,-3(17)
MOVE 3,-10(17)
MOVE 2,4(3)
PUSH 17,2
PUSHJ 17,genstm
ADJSP 17,-1
MOVEM 0,-5(17)
PUSH 17,-1(17)
PUSHJ 17,gaddre
ADJSP 17,-1
MOVEM 0,-4(17)
MOVE 2,@-10(17)
CAIN 2,24
JRST $36
MOVE 4,@-10(17)
MOVE 5,4
SUBI 5,74
JUMPL 5,$46
CAIL 5,12
JRST $46
JRST @$47(5)
$47::
$41
$40
$42
$46
$46
$46
$46
$43
$45
$44
$40::
PUSH 17,-5(17)
PUSH 17,-6(17)
PUSH 17,[110]
PUSHJ 17,code0
ADJSP 17,-3
$41::
$42::
$43::
$44::
$45::
PUSH 17,-4(17)
PUSH 17,-6(17)
MOVE 2,@-12(17)
PUSH 17,2
PUSHJ 17,code4
ADJSP 17,-3
PUSH 17,-4(17)
PUSHJ 17,releas
ADJSP 17,-1
MOVE 0,-5(17)
ADJSP 17,-7
POPJ 17,
$46::
MOVE 2,$50
PUSH 17,2
PUSH 17,stderr
PUSHJ 17,fprint
ADJSP 17,-2
$37::
$36::
MOVE 3,-3(17)
JUMPE 3,$51
PUSH 17,-4(17)
PUSH 17,-6(17)
PUSH 17,[40]
PUSHJ 17,code0
ADJSP 17,-3
JRST $52
$51::
PUSH 17,-5(17)
PUSH 17,-5(17)
PUSHJ 17,gistor
ADJSP 17,-2
$52::
PUSH 17,-4(17)
PUSHJ 17,releas
ADJSP 17,-1
MOVE 0,-5(17)
ADJSP 17,-7
POPJ 17,
ADJSP 17,-7
POPJ 17,
$50:: POINT 9,.+1,8
BYTE (9) 101,163,163,151
BYTE (9) 147,156,155,145
BYTE (9) 156,164,40,45
BYTE (9) 144,40,157,160
BYTE (9) 145,162,141,164
BYTE (9) 157,162,40,156
BYTE (9) 157,164,40,151
BYTE (9) 155,160,154,145
BYTE (9) 155,145,156,164
BYTE (9) 145,144,40,171
BYTE (9) 145,164,56,12
BYTE (9) 0
$33:: POINT 9,.+1,8
BYTE (9) 125,156,151,155
BYTE (9) 160,154,145,155
BYTE (9) 145,156,164,145
BYTE (9) 144,40,141,163
BYTE (9) 163,151,147,156
BYTE (9) 155,145,156,164
BYTE (9) 40,157,160,145
BYTE (9) 162,141,164,157
BYTE (9) 162,56,12,0
regfet:
ADJSP 17,1
PUSHJ 17,getreg
MOVEM 0,(17)
PUSH 17,-2(17)
PUSH 17,-1(17)
PUSH 17,[27]
PUSHJ 17,code4
ADJSP 17,-3
MOVE 0,(17)
ADJSP 17,-1
POPJ 17,
ADJSP 17,-1
POPJ 17,
gaddre:
ADJSP 17,7
MOVE 2,@-10(17)
MOVE 3,2
IDIVI 3,12
MOVM 4,4
CAME 2,$60(4)
JRST $53
JRST @$61(4)
$60::
106
-1
-1
27
-1
17
-1
115
-1
-1
$61::
$54
$53
$53
$57
$53
$55
$53
$56
$53
$53
$54::
MOVE 6,-10(17)
MOVE 5,3(6)
MOVE 7,(5)
MOVEM 7,-4(17)
MOVE 10,7
SUBI 10,111
JUMPL 10,$67
CAIL 10,4
JRST $67
JRST @$70(10)
$70::
$65
$66
$63
$64
$63::
PUSH 17,[1]
PUSH 17,[1]
PUSH 17,[111]
MOVE 6,-13(17)
MOVE 5,3(6)
PUSH 17,5
PUSHJ 17,incdec
ADJSP 17,-4
MOVE 0,0
ADJSP 17,-7
POPJ 17,
$64::
PUSH 17,[1]
PUSH 17,[1]
PUSH 17,[112]
MOVE 6,-13(17)
MOVE 5,3(6)
PUSH 17,5
PUSHJ 17,incdec
ADJSP 17,-4
MOVE 0,0
ADJSP 17,-7
POPJ 17,
$65::
$66::
PUSH 17,[1]
SETZ 3,
PUSH 17,3
PUSH 17,-6(17)
MOVE 6,-13(17)
MOVE 4,3(6)
PUSH 17,4
PUSHJ 17,incdec
ADJSP 17,-4
MOVE 0,0
ADJSP 17,-7
POPJ 17,
$67::
MOVE 3,-10(17)
MOVE 2,3(3)
PUSH 17,2
PUSHJ 17,genstm
ADJSP 17,-1
MOVE 0,0
ADJSP 17,-7
POPJ 17,
$62::
MOVE 0,-6(17)
ADJSP 17,-7
POPJ 17,
$55::
$56::
MOVE 2,@-10(17)
CAIE 2,115
JRST $71
MOVE 3,-10(17)
MOVE 2,3(3)
PUSH 17,2
PUSHJ 17,genstm
ADJSP 17,-1
JRST $72
$71::
MOVE 3,-10(17)
MOVE 2,3(3)
PUSH 17,2
PUSHJ 17,gaddre
ADJSP 17,-1
$72::
MOVEM 0,-6(17)
MOVEI 2,1
MOVEM 2,-3(17)
MOVE 4,-10(17)
MOVE 3,4(4)
MOVEM 3,(17)
$73::
MOVE 6,-3(17)
JUMPE 6,$74
MOVE 2,@0(17)
CAIN 2,17
JRST $77
CAIN 2,115
JRST $76
JRST $100
$76::
$77::
MOVE 4,(17)
MOVE 3,3(4)
MOVE 5,3(3)
MOVE 6,4(5)
MOVEM 6,-2(17)
MOVE 10,-2(17)
JUMPE 10,$101
PUSH 17,-2(17)
PUSH 17,-7(17)
PUSH 17,[14]
PUSHJ 17,code1
ADJSP 17,-3
$101::
MOVE 2,@0(17)
CAIE 2,115
JRST $102
PUSH 17,-6(17)
PUSH 17,-7(17)
PUSH 17,[27]
PUSHJ 17,code4
ADJSP 17,-3
$102::
MOVE 3,(17)
MOVE 2,4(3)
MOVEM 2,(17)
JRST $75
$100::
MOVE 5,(17)
MOVE 4,3(5)
MOVE 6,4(4)
MOVEM 6,-2(17)
MOVE 10,-2(17)
JUMPE 10,$103
PUSH 17,-2(17)
PUSH 17,-7(17)
PUSH 17,[14]
PUSHJ 17,code1
ADJSP 17,-3
$103::
SETZB 2,-3(17)
$75::
JRST $73
$74::
MOVE 3,-10(17)
MOVE 2,4(3)
MOVE 4,1(2)
PUSH 17,4
PUSHJ 17,charar
ADJSP 17,-1
JUMPE 0,$104
PUSH 17,[331100]
PUSH 17,-7(17)
PUSH 17,[5]
PUSHJ 17,code1
ADJSP 17,-3
$104::
MOVE 0,-6(17)
ADJSP 17,-7
POPJ 17,
$57::
PUSHJ 17,getreg
MOVEM 0,-6(17)
MOVE 3,-10(17)
MOVE 2,3(3)
MOVEM 2,-1(17)
MOVE 3,-10(17)
MOVE 2,1(3)
PUSH 17,2
PUSHJ 17,charar
ADJSP 17,-1
JUMPE 0,$105
MOVE 3,-1(17)
MOVE 2,3(3)
CAIN 2,7
JRST $110
CAIN 2,12
JRST $107
JRST $111
$107::
MOVE 3,-1(17)
MOVE 2,4(3)
SUB 2,stacko
ADDI 2,1
PUSH 17,2
PUSH 17,-7(17)
PUSH 17,[27]
PUSHJ 17,code13
ADJSP 17,-3
PUSH 17,[331100]
PUSH 17,-7(17)
PUSH 17,[5]
PUSHJ 17,code1
ADJSP 17,-3
JRST $106
$110::
MOVE 3,-1(17)
MOVE 2,4(3)
ADD 2,stacko
MOVN 2,2
PUSH 17,2
PUSH 17,-7(17)
PUSH 17,[27]
PUSHJ 17,code13
ADJSP 17,-3
PUSH 17,[331100]
PUSH 17,-7(17)
PUSH 17,[5]
PUSHJ 17,code1
ADJSP 17,-3
JRST $106
$111::
PUSH 17,[331100]
PUSH 17,-2(17)
PUSH 17,-10(17)
PUSH 17,[27]
PUSHJ 17,code9
ADJSP 17,-4
$106::
JRST $112
$105::
MOVE 3,-1(17)
MOVE 2,3(3)
CAIN 2,7
JRST $115
CAIN 2,12
JRST $114
JRST $116
$114::
MOVE 3,-1(17)
MOVE 2,4(3)
SUB 2,stacko
ADDI 2,1
PUSH 17,2
PUSH 17,-7(17)
PUSH 17,[27]
PUSHJ 17,code13
ADJSP 17,-3
JRST $113
$115::
MOVE 3,-1(17)
MOVE 2,4(3)
ADD 2,stacko
MOVN 2,2
PUSH 17,2
PUSH 17,-7(17)
PUSH 17,[27]
PUSHJ 17,code13
ADJSP 17,-3
JRST $113
$116::
PUSH 17,-1(17)
PUSH 17,-7(17)
PUSH 17,[27]
PUSHJ 17,code3
ADJSP 17,-3
$113::
$112::
MOVE 0,-6(17)
ADJSP 17,-7
POPJ 17,
$53::
ADJSP 17,-7
POPJ 17,
gistor:
ADJSP 17,1
MOVE 3,-2(17)
CAIG 3,17
JRST $117
PUSHJ 17,getreg
MOVEM 0,(17)
PUSH 17,-2(17)
PUSH 17,-1(17)
PUSH 17,[27]
PUSHJ 17,code0
ADJSP 17,-3
PUSH 17,(17)
PUSH 17,-4(17)
PUSH 17,[24]
PUSHJ 17,code4
ADJSP 17,-3
PUSH 17,(17)
PUSHJ 17,releas
ADJSP 17,-2
POPJ 17,
$117::
PUSH 17,-2(17)
PUSH 17,-4(17)
PUSH 17,[24]
PUSHJ 17,code4
ADJSP 17,-4
POPJ 17,
gconst:
ADJSP 17,2
PUSHJ 17,getreg
MOVEM 0,-1(17)
MOVE 2,@-3(17)
CAIE 2,137
JRST $120
PUSHJ 17,getlab
MOVEM 0,(17)
MOVE 3,(17)
MOVE 4,maxlit
IMULI 4,2
MOVEM 3,litera(4)
MOVE 5,-3(17)
MOVE 2,3(5)
MOVE 7,maxlit
AOS maxlit
IMULI 7,2
MOVEM 2,litera+1(7)
PUSH 17,(17)
PUSH 17,-2(17)
PUSH 17,[27]
PUSHJ 17,code6
ADJSP 17,-3
MOVE 0,-1(17)
ADJSP 17,-2
POPJ 17,
$120::
MOVE 3,-3(17)
MOVE 2,3(3)
PUSH 17,2
PUSH 17,-2(17)
PUSH 17,[27]
PUSHJ 17,code1
ADJSP 17,-3
MOVE 0,-1(17)
ADJSP 17,-2
POPJ 17,
ADJSP 17,-2
POPJ 17,
gident:
ADJSP 17,5
MOVEI 2,1
MOVE 3,@-6(17)
CAIE 3,17
SETZ 2,
JUMPN 2,$123
MOVEI 5,1
MOVE 6,@-6(17)
CAIE 6,115
SETZ 5,
JUMPE 5,$121
$123::
MOVE 11,-6(17)
MOVE 10,4(11)
MOVE 12,3(10)
JRST $122
$121::
MOVE 14,-6(17)
MOVE 12,3(14)
$122::
MOVEM 12,-1(17)
MOVEI 15,1
MOVE 3,previo
MOVEM 3,(17)
CAIN 3,0
SETZ 15,
JUMPE 15,$124
MOVE 4,@0(17)
CAIE 4,1
JRST $124
MOVE 5,(17)
MOVE 7,1(5)
CAIE 7,24
JRST $124
MOVE 12,optimi
JUMPE 12,$124
MOVE 3,(17)
MOVE 2,3(3)
CAME 2,-1(17)
JRST $125
MOVE 3,(17)
MOVE 2,2(3)
MOVEM 2,-3(17)
PUSH 17,2
PUSH 17,-1(17)
PUSHJ 17,unrele
ADJSP 17,-2
JUMPE 0,$126
MOVE 0,-3(17)
ADJSP 17,-5
POPJ 17,
$126::
$125::
$124::
MOVE 3,-6(17)
MOVE 2,1(3)
MOVE 4,(2)
MOVEM 4,-2(17)
PUSH 17,-6(17)
PUSHJ 17,gaddre
ADJSP 17,-1
MOVEM 0,-3(17)
MOVEI 2,1
MOVE 4,-2(17)
CAIE 4,127
SETZ 2,
JUMPN 2,$130
MOVEI 5,1
MOVE 7,-2(17)
CAIE 7,44
SETZ 5,
JUMPE 5,$127
$130::
MOVE 0,-3(17)
ADJSP 17,-5
POPJ 17,
$127::
PUSHJ 17,getreg
MOVEM 0,-4(17)
PUSH 17,-3(17)
PUSH 17,-5(17)
PUSH 17,[27]
PUSHJ 17,code4
ADJSP 17,-3
PUSH 17,-3(17)
PUSHJ 17,releas
ADJSP 17,-1
MOVE 0,-4(17)
ADJSP 17,-5
POPJ 17,
ADJSP 17,-5
POPJ 17,
glogic:
ADJSP 17,7
MOVE 2,@-10(17)
CAIN 2,117
JRST $134
CAIN 2,116
JRST $133
CAIN 2,3
JRST $132
JRST $135
$132::
MOVE 3,-10(17)
MOVE 2,3(3)
PUSH 17,2
PUSHJ 17,genstm
ADJSP 17,-1
MOVEM 0,-5(17)
PUSHJ 17,getreg
MOVEM 0,-4(17)
PUSH 17,[1]
PUSH 17,-5(17)
PUSH 17,[27]
PUSHJ 17,code1
ADJSP 17,-3
PUSH 17,[2]
PUSH 17,-6(17)
MOVE 3,@-12(17)
PUSH 17,3
PUSHJ 17,code7
ADJSP 17,-3
PUSH 17,-4(17)
PUSH 17,[21]
PUSHJ 17,code5
ADJSP 17,-2
PUSH 17,-5(17)
PUSHJ 17,releas
ADJSP 17,-1
MOVE 0,-4(17)
ADJSP 17,-7
POPJ 17,
$133::
PUSHJ 17,getreg
MOVEM 0,-5(17)
PUSHJ 17,getlab
MOVEM 0,-2(17)
PUSH 17,-5(17)
PUSH 17,[21]
PUSHJ 17,code5
ADJSP 17,-2
SETZ 2,
PUSH 17,2
PUSH 17,-3(17)
MOVE 5,-12(17)
MOVE 3,3(5)
PUSH 17,3
PUSHJ 17,gboole
ADJSP 17,-3
SETZ 2,
PUSH 17,2
PUSH 17,-3(17)
MOVE 5,-12(17)
MOVE 3,4(5)
PUSH 17,3
PUSHJ 17,gboole
ADJSP 17,-3
PUSH 17,[1]
PUSH 17,-6(17)
PUSH 17,[27]
PUSHJ 17,code1
ADJSP 17,-3
PUSH 17,-2(17)
PUSHJ 17,outlab
ADJSP 17,-1
MOVE 0,-5(17)
ADJSP 17,-7
POPJ 17,
$134::
PUSHJ 17,getreg
MOVEM 0,-5(17)
PUSHJ 17,getlab
MOVEM 0,-2(17)
PUSH 17,[1]
PUSH 17,-6(17)
PUSH 17,[27]
PUSHJ 17,code1
ADJSP 17,-3
PUSH 17,[1]
PUSH 17,-3(17)
MOVE 5,-12(17)
MOVE 3,3(5)
PUSH 17,3
PUSHJ 17,gboole
ADJSP 17,-3
PUSH 17,[1]
PUSH 17,-3(17)
MOVE 5,-12(17)
MOVE 3,4(5)
PUSH 17,3
PUSHJ 17,gboole
ADJSP 17,-3
PUSH 17,-5(17)
PUSH 17,[21]
PUSHJ 17,code5
ADJSP 17,-2
PUSH 17,-2(17)
PUSHJ 17,outlab
ADJSP 17,-1
MOVE 0,-5(17)
ADJSP 17,-7
POPJ 17,
$135::
PUSHJ 17,getreg
MOVEM 0,-5(17)
PUSH 17,[1]
PUSH 17,-6(17)
PUSH 17,[27]
PUSHJ 17,code1
ADJSP 17,-3
SETZ 2,
PUSH 17,2
PUSH 17,-11(17)
PUSHJ 17,gboolo
ADJSP 17,-2
PUSH 17,-5(17)
PUSH 17,[21]
PUSHJ 17,code5
ADJSP 17,-2
MOVE 0,-5(17)
ADJSP 17,-7
POPJ 17,
$131::
ADJSP 17,-7
POPJ 17,
INTERN gretur,gassig,gaddre,gistor,regfet,gconst,gident
INTERN glogic
EXTERN .iob,stdin,stdout,stderr,libpre,libpst,sprefi,spstfi
EXTERN tok,rw,map,errstr,module,input,output,symfna,in,out
EXTERN fsym,inc,mac,consta,nodes,csymbo,htable,symbol,isym
EXTERN deftyp,charty,deflab,scalar,ttable,types,tstack,line
EXTERN page,tline,scope,level,maclev,breakl,contle,eflag
EXTERN eof,minsym,maxsym,maxtyp,maxnod,maxlab,maxini,minloc
EXTERN maxaut,ncond,nelse,token,toksta,time,optimi,dump
EXTERN assemb,delete,vsym,syntax,.cpool,cpool,macptr,ch
EXTERN errlin,erptr,dec20o,codes,previo,litera,maxcod,mincod
EXTERN maxlit,stacko,regis,brklab,loopla,genstm,code0,releas
EXTERN code8,code5,charpo,defnod,fprint,code4,fprint,getreg
EXTERN incdec,code1,charar,code13,code9,code3,getlab,code6
EXTERN unrele,code7,gboole,outlab,gboolo
END