Digital PDFs

AH-T711B-MC

July 1984

88 pages

Original

4.2MB

view download

OCR Version

4.2MB

view download

Document:	CZKDMB0 KDJ11-A KDJ11 CACHE MEM SYS JUL 1984 bw
Order Number:	AH-T711B-MC
Revision:	000
Pages:	88
Original Filename:	CZKDMB0__KDJ11-A__KDJ11_CACHE_MEM_SYS__AH-T711B-MC__JUL_1984_bw.pdf

OCR Text

KOJL11-R

kOJ11 CACHE MER 5¥5

_ CZKOMBO

FICHE 01 OF 01

USER OOCUMENTATION

KDJ1 1A MAC

O3-APR 84

MACY11
11:36

30A(1052)

O4 APR 84

10:38

PAGE

1
2
3

Bl
EQ 0001

REM £

5
6

;

IDENTIFICATION

PRODUCT COOE:

{é

PRODUCT NAME:

CZKDMBO KDJ11

PRODUCT DATE:

15-MAR -84

JiS

MAINTAINER:

DIAGNOSTIC ENGINEERING

AUTHORS :

HENRY ENMAN,

6
1;

1
19

22
23
24

T7108-MC
CACHE

MEMORY

JIM PITTMAN,

RESPONSIBILITY FOR ANY ERRORS

27
28

NO RESPONSIBILITY IS ASSUMED
FOR
SOFTWARE ON EQUIPMENT THAT IS NOT

gé
33
gg

BARRY

IRRGANG

THE INFORMATION IN THIS DOCUMENT IS
SUBJECT
TO
CMANGE WITHOUT
NOTICE
AND
SMOULD
NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL
EQUIPMENT CORPORATION.
OIGITAL EQUIPMENT CORPORATION ASSUMES NO

DIAGNOSTIC

AFFILIATED COMPANIES.

THAT

MAY

APPEAR

THE
USE
SUPPLIED

OR
BY

THMIS DOCUMENT.

RELIABILITY
DIGITAL
OR

DIGITAL

DEC

TRADEMARKS OF DIGITAL EQUIPMENT CORPORATION:

»DP

DECUS

UNIBUS

MASSBUS

DECTAPE

ITS

USER JUC
KDJ11A MAC

NTAT
l

H?g&&l

30A(1052)

Cl
APR 84

10:38

PAGF

43
44
45
46
47

48
49

50
51
52
53
54
55
56

HISTORY

OCY

FEB

REV.

FIRST

SEQ 0002

JREM &

RELEASE

CORRECYIONS MADE TO:
CORRECT VECTOR AREA MAINTENANCE PROBLEM
2. ALLOW DIAGNOSTIC TO EXECUTE PROPERLY IN APT
ENVIRONMENT,
5.

.
.

ALLOW DIAGNOSTIC TO BE EXECUTED IN SYSTEMS WITM
MXV11-A/8 MODULES. REQUIRES DELETION OF TESTS
WHICH CAUSE KDJ11 A CACHE PARITY ABORTS.
ENSURE THAT CPU ERROR REGISTER IS CLEARED AFTER

COMPLETION OF TEST THAT MIGHY CAUSE IT TO BE SE".
SAVE PC AND CONTENTS OF R6 ON UNEXPECTED INTERRUPTS
&

USER QOCUMENTAT

KDJ11A.MAC

[ON

03 APR 84 uf's&'

30A(105°)

t10

APR

;

10:38 PAGE 3

SEQ 0005

§9

.REM &

61
6€
63
o4
65

66
67
68
62
79

2
73

TABLE

1.0

1.1
1.2
1.3

1.4

1.5
2.¢

CONTENTS

GENERAL INFORMATION

PROGRAM ABSTRACT
SYSTEM REQUIREMENTS
RELATED DOCUMENTS AND STANDARDS

DIAGNOSTIC HIERARCHY

ASSUMP TIONS
OPERATING

PREREQUISITES

INSTRUCTIONS

74
75
76
;g

2.1
2.2
2.3
2.4

LOADING AND STARTING PROCEDURE
PROGRAM OPTIONS
OPERATION UNDER APT
EXECUTION TIMES

3.0

ERROR INFORMATION

4.0

PROGRESS REPORT

USER JDOCUMENTATION
MACY11
KDJ1.1A
O3-APR 84 11:36
MAC
84
85
86
8?
88
89
90
91
92
93
94

95
96
97
98
99
100

101
102
103
104
108
106
107
108
109

110
111
112

113

114
115
116
117
118
119
120
121
122
123

124
125

126

127
128
129
130
131
132
133
134
135
136
137

138
139

30A(1052)

APR

1.0

GENERAL

1.1

PROGRAM ABSTRACT

El
84

10:38

PAGE

SEQ 0004

.REM £

INFORMATION

THIS IS AN APT COMPATIBLE VERSION OF THE KDJ11 CACHE MEMORY
SYSTEM DIAGNOSTIC. IT FOCUSES ON TESTING THE FUNCTIONALITY
OF THE CACHE MEMORY SYSTEM, A SWITCH IS PROVIDED IN THE

SOF TWARE SWITCH REGISTER TO DISABLE 22 BIT ADDRESS GENERATION
IN 18 BIT QBUS SYSTEMS. THIS IS IMPLEMENTED BY
TO A ONE. DEFAWLT IS TO TEST 22 BIT ADDRESSES.

A SWITCH IS PROVIDED TO ENABLE THE EXECUTION OF
AND CACHE TAG RAM DATA RELIABILITY TESTS. THESE

SETTING BIT 08
IN ADDITION;

LONG AND MAY NOT BE DESIRED IN ALL APPLICATIONS.
ARE ENABLED BY

SETTING BIT 09 IN THE

(LOCATION 176) TO ONE.
1.2

SOF TWARE

THE CACHE DATA,
TESTS ARE VERY

THESE TESTS

SWITCH REGISTER

DEFAULT IS TO NOT EXECUTE THESE

TESTS.

SYSTEM REQUIREMENTS

KDJ11-A PROCESSOR MODULE

ENSURE THAT HALT TRAP OPTION IS DISABLED (JUMPER W9 INSTALLED)

32KW MEMORY
@-22 BACKPLANE (18 BIT QBUS MAY BE USED WITH REDUCED TEST COVERAGE)
SERIAL LINE UNIT AND CONSOLE TERMINAL (CONSOLE TERMINAL NOT REQUIRED FOR APT)

1.3

RELATED DOCUMENTS AND STANDARDS

KDJ11-A MODULE SPECIFICATION REV 2.2
POP11 MAINDEC SYSMAC PACKAGE

J11 CONTROL CHIP SPECIFICATION 21-17679-00
J11 DATA CHIP SPECIFICATION 21-17677-00
1.4

DIAGNOSTIC HIERARCY PREREQUISITES

THE KDJ1l

CPU,

MEMORY

MANAGEMENT

SHOULD RUN SUCCESSFULLY PRIOR
SYSTEM TESTS.

1.5

AND FLOATING POINT

TO RUNNING

THE

DIAGNOSTICS

CACHE MEMORY

ASSUMPTIONS

IT IS ASSUMED THAT THE DIAGNOSTIC OPERATOR IS FAMILIAR
THE XXDP+ OPERATING SYSTEM AND THE U1l MICRO ODT.

2.0

OPERATING INSTRUCTIONS

2.1

LOADING AND STARTING PROCEEDURE

LOAD PROGRAM INTO MEMORY USING STANDARD XXDP+

WITH

PROCEEDURES.

THE PROGRAM IS STARTED BY LOADING ADDRESS 200 AND USING
THE J11 MICRO-0DT G COMMAND TO START. THE PROGRAM

IOENTIFICATION MESSAGE WILL BE
OF THE COMPLETE PROGRAM,
2.2

PROGRAM OPTIONS

TYPED AFTER

THF

FIRST

PASS

USER DOCUMENTATION

KDJ11A.MAC

140

144
142
143
144
145
146
147
148

O3-APR 84

mlxcgl

30A{1052)

O04

APR 84

10:38

PAGE

THE FOLLOWING ASSIGNMENTS HAVE BEEN MADE FOR

811015

191
192
193

194
195

THE

11
.

KDJ1l

10
-6

9
-

DON' T
TEST
BEVENT

BRI

-8

8
-..&

18 BIT
EXTENDED
ADDRESS
CACHE
OMLY
TESTS
.

DEFAULT SETTINGS ARE TO TEST 22 8IT ADDRESSES AND NOT DO THE
EXTENDED CACHE TESTS.
PRIOR

TO EXECUTING

WILL BE DIRECTED

THE FIRST

TO SET

THE

PASS OF

THE

DIAGNOSTIC

SWITCH REGISTER

THE

OPERATOR

TO INDICATE WHETHER

THE KDJ11-A UNDER TEST IS IN A SYSTEM CONFIGURED FOR 18 OR 22 BIT
ADDRESSING AND WHETHER CACHE RAM DATA RELIABILITY TESTS ARE TO BE
EXECUTED. AN 18 BIT ADDRESS CONFIGURATION SHOULD BE INDICATED TF
ANY 18 ADDRESS BIT ONLY MEMORY BOARDS RESIDE IN THE SYSTEM OR IF
THE SYSTEM BACKPLANE DOES NOT SUPPORT 22 ADDRESS BITS. THE CACHE
RAM DATA RELIABILTY TESTS REQUIRE APPROXIMATELY 35 MINUTES TO

EXECUTE AND SHOULD ONLY BE SELECTED IF PROBLEMS WITH CACHE DATA
CORRUPTION OR RETENTION ARE SUSPECTED.

TO CHANGE THE SWITCH REGISTER; MALT THE PROGRAM AND RESTART
AT 200 ANSWERING THE INITIAL QUESTIONS.

2.3

OPERATION UNDER APT

OPERATION IN THE APY ENVIRONMENT REQUIRES SOME SPECIAL CONSIDERA
TIONS DUE TO THE ASYNCHRONOUS HALTS OF THE DIAGNOSTIC BY THE APT
MONITOR. IF THE EFFECTS OF THESE HALTS ARE NOT ANTICIPATED, FALSE
ERRORS MAY BE REPORTED. THEREFORE, WHEN OPERATING IN THE APT ENVIRON
EENLO}’E% FOLLOWING OIFFERENCES IN THE EXECUTION OF THE PROGRAM SHOWLD

181
182
183

184
185
186
187
188
189
190

SEQ 0005

DIAGNOSTIC SWITCH REGISTER BITS:

149

150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180

CERTAIN CACHE TESTS WHICH RECY ON THE

2.4
A.

INTEGRITY

OF DATA IN THE

HIT/MISS REGISTER OR THE WAY IN WHICH THE CACME IS ALLOCATED WILL
JUMP TO A SUB-ROUTINE IF AN ERROR IS ENCOUNTERED. THE SUBROUTIM:
ODETERMINES IF THE DIAGNOSTIC IS OPERATING IN APT ENVIRONMENT. IF
IT IS IN APT ENVIRONMENT IT MWILL RETRY THE FAILING TEST ONE TIME.
IF THE TEST PASSES ON THE SECOND ATTEMPT THE FIRST ERROR WILL BE
CONSIDERED TO BE APT INDUCED. IF IT FAILS ON THE SECOND ATTEMPT
THE ERROR ROUTINE WILL BE CALLED.

EXECUTION TIMES
THE

LONGEST

TEST

THE LONGEST TEST IS THE TAG RAM DATA RELIABILITY TEST WHICH TAKES
APPROXIMAELY 25 MINUTES TO EXECUTE. FOR THIS REASON THE DATA RELIABILiTY
TESTS ARE NORMALLY DE SELECTED.

B.
THE

FULL PASS
TIME

FOR

TIME
A

FULL

PASS

WITH

THE

DATA RELIABILITY

TESTS

SELECTED

(1
USER DOCUMENTATION
H?C;(l’l
03 APR 84 1

KDJ1 1A, MAC

19¢
197

198
199

200
201
202

203
204
205
206
207
208
209
210
211
212

213
214
215

30A(1052)

APR-84

1S APPROXIMATELY S SECONDS.

TAKES

ABOUT

35 MINUTES.

3.0

ERROR

INFORMATION

ERRORS WilLl CAUSE

10:38

WITH ALL

PAGE

SEQ 0006

TESTS SELECTED A FULL PASS

THE FOLLOWING ERROR MESSAGE

TO BE PRINTED:

CACHE SYSTEM ERROR
ERROR & = (UNIQUE ERROR NUMBER)
ERROR PC = (PC AT TIME OF ERROR)
THE ERROR WILL
WILL MALT,
4.0
AT

THEN BE REPORTED

TO APT

AND

THE PROGRAM

PROGRESS REPORT
THE

END

EACH PASS

THE

DIAGNOSTIC

NAME

AND

PASS

COUNT

ARE

PRINTED.

PROGRAM HE ADER

MACY11

KDJ11A,.MAC
216

APR

10:38

PAGE

SEQ 0007

.TITLE PROGRAM HEADER AND TABLES
.SBTTL
PROGRAM HEADER

217
218
219
220
221
222
223
224
229
226
227
228
229
230
231
232
233
234
235
236
237
238
239

LMCALL
.MCALL
LMCALL
.MCALL
-MCALL
JMCALL
-MCALL
.MCALL
.MCALL
MCALL
.MCALL
MCALL
.MCALL
.MCALL
.MCALL
.MCALL
+MCALL
MCALL
MCALL
MCALL
JMCALL
.MCALL

40
241
242
243
244
245
246

.TITLE

ETXTL, ETXT2,ETX
,ETXTS, ETXT6,ET
T3,
XT7,ETXT
ETX
8,ETXTY
T4
ETXT10,ETXT11,ETXT12,ETXT13, ETXT14,ETXT1S,ETXT16,ETXTL7
ETXT18,ETXT19,ETXT20,ETXT21 ,ETXT22,ETXT23,ETXT24 ,ETXT2S

ETXT26,ETXT27 ,ETXT28 ,ETXT29 ,ETXT30,ETXT31,ETXT32,ETXT33
ETXT34 ,ETXT35,ETXT36,ETXT37 ,ETXT38,ETXT39,ETXT40,ETXTA1

ETXT42 ,ETXT43,ETXTA4 ,ETXTAS ,ETXT46 ,ETXTA7 ,ETXTA8,ETXT49

ETXTSO,ETXTS1,ETXTS2,ETXTS3 ,ETXTS4,ETXTSS,ETXTS6,ETXTS?
ETXTS8,ETX
. ETXT60,ETXT61,ETXT62
TS9
ERRF1,ERRF2 ,ERRF3,ERRF4 ,ERRFS,ERRF6 ,ERRF 7
ERRF8,ERRF9,ERRF10,ERRF11 ,ERRF12,ERRF13,ERRF14 ,ERRF1S
ERRF16 ,ERRF17 ,ERRF18,ERRF19,ERRF20,ER
,ERRF22,E
RF21
RRF23
ERRF 24 ,ERRF 25 ,ERRF26 ,ERRF 27 ,ERRF 28 ,ERRF 29, ERRF 30, ERRF 31
ERRF 32 ,ERRF 33 ,ERRF 34 ,ERRF 35,ERRF 36, ERRF 37, ERRF 38, ERRF 39
ERRFA40,ER
,ERRF43
RFA41
,ERRF44 ,ERRF45,ERRF
,ERRF
46,ERRF47
42
ERRF48,ERRF49,ERRFS50,ERRFS1 ,ERRFS2,ERRFS3,ERRFS4 ,ERRFSS
ERRF 56 ,ERRFS57 ,ERRF58,ERRFS59,ERRF60,ERRF61,ERRF62,ERRF63
ERRF64 ,ERRF65,ER
,ERRFO1,ERR
RF66,
FO2 ERRF6
,ERRF 03, ERRF04
7
ERRFO5,ERRFO06
,ERRF08 ,ERRF09,SFTERR
,ERRFO7
,EXITST
NEWTST,ERRDEF, .EQUAT, .KT11,.$40CAT, . $EOP, . $APTBLS,SETUP

. $TYPE, . $TYPDEC,ERRDF ,BGNTST ,ENDTST,BGNMOD , ENDMOD , CKLOGP

.HEADER, . SETUP, . $ TRAP ,BGNSUB,ENDSUB
. $ACT11, . $APTHDR
,
.$A
. $ERROR,
PTY
. $TYPOCT,
PE,
. SREAD

KDJ11-A CACHE MEMORY

;*COPYRIGHT (C) MARCH, 1984
;¢OIGITAL EQUIPMENT CORP.

247

: #MAYNARD,

248
249

250
251
e52
253
254

30A(1052)

MASS.

SYSTEM TEST

01754

R
HE

:sTHIS PROGRAM WAS ASSEMBLED USING THE PDP 11 MAINDEC
: sPACKAGE (MAINDEC-11-DZQAC C3), JUAN 19, 1377.
1

000001
160000

SYSMAC

$TN=1
$SWR=160000

i sHALT

ON ERROR,

LOOP

TEST,

INMIBIT

ERROR

TYPOUT

GLOBAL

AREAS

KDJ1.1A
MAC

MACY11 30A(1052)
O3-APR 84
36

APR 84

10:38

PAGE

PROGRAM HEADER

SEQ 0008

255
256

.TITLE GLOBAL AREAS
.SBTTL
GLOBAL EQUATES

258
259

257

HESJ

260
261
262

274

275
276
277
278
279
280
281
282
082
284
285
286
287

288
289
290
291
292
293
294
295
296
297
298
299
300
301
302

303
304
305

306
307
308
309
310

THE GLOBAL

ARE

"SBTTL

263

264
265
266
267
268
269
270
_271
272
273

SECTION

001000

000011
000012

000015

000200
177776

USED

EQUATES

IN MORE

1000
EMT,ERROR
I0T,SCOPE

LF=
CR=

CRLF =

: sBASIC DEFINITION OF ERROR CALL
: sBASIC DEFINITION OF SCOPE CALL
; :CODE FOR HORIZONTAL

; :PROCESSOR

.EQUIV
PS,PSW
STKLMT= 177774

17757¢C

177570
177570

: sCODE FOR CARRIAGE RETURN-LINE FEED
STATUS

Rl=
R2=
R3=

R4 =
RS=
R6=
R7=

SP=

PC=

o]
2
3

%4
o<
so
-7

INTERRUPT REQUEST

s ; HARDWARE SWITCH REGISTER
: tHARDWARE DISPLAY REGISTER
: itGENERAL REGISTER

; ;GENERAL REGISTER
; iGENERAL REGISTER
; i1GENERAL REGISTER
s s GENERAL REGISTER
; :GENERAL REGISTER
: sGENERAL REGISTER
: ;GENERAL REGISTER
$ :STACK POINTER
: tPROGRAM COUNTER

s «PRIORITY LEVEL DEFINITIONS
PRO=
(]
: tPRIORITY LEVEL O

PR1=
PR2=

40
100
140
200
240
300
340

;iPRIORITY
1 sPRIORITY
::PRIORITY
:sPRIORITY
; :PRIORITY
: stPRIORITY
; sPRIORITY

3¢"SWITCH REGISTER"

SWITCH DEFINITIONS

PR3~
PR4=
PRS=
PR6=
PR7=

SW1S5=
SW1l4-

100000
40000

SWll-

4000

SW13=
SWig=

SW10=
SW09 -

20000
10000
2000
1000

WORD

;s STACK LIMIT REGISTER

; s PROGRAM

; *GENERAL PURPOSE REGISTER DEFINITIONS

RO=

TAB

177776

200

DSWR=
ODISP=

100000
040000
020000
010000
004000
002000
001000

THAT

1000 #+as

; :CODE FOR LINE FEED
: :CODE FOR CARRIAGE RETURN

177772

000000
000040
000100
000140
000200
000240
000300
000340

THE STACK PNINTER #ee

12
15

PIRG=

000000
000001
000002
000003
000004
000005
000006
000007
000006
000007

TEST,

; sMISCELLANEQUS DEFINITIONS

HT=

177774
177772

177570

ONE

BASIC DEFINITIONS

s¢INITIAL ADDRESS OF

STACK=
.EQUIV
LEQUIV

SECTION CONTAINS PROGRAM EQUATES

THAN

LEVEL 1
LEVEL 2
LEVEL
LEVEL
LEVEL
LEVEL
LEVEL

3
4
5
6
7

GLOBA:

AREAS

MACY11

KDJ11A.MAC

03 APR 84

311
312
313
314
315
316

000400
000200
000100
000040
000020
000010
000004
000002
000001

317

318
319
320
321
322
323

324

325
326
327
328
329
330
331
332
333
334
335
336
337
338
339

340
341

342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359

360
361
362
363
364
365
366

100000
040000
020000
010000
004000
002002
001000
000400
000200
000100
000040
000020
000010
000004
000002
000001

000004
000010
000014
000014
000014
000020
00C024

30A(1052)

11:36

APR-84
10 :38
PAGE 9
BASIC O EF INITIONS

SW08=
SWO7=
SWO06
=
SuW05+
SW04
=
SWO3»
SW02
=
SWO1=
SWOO0=
.EQUIV
.EQUIV
.EQUIV
.EQULV
LEQUIV
LEQUIV
.EQUIV
.EQUIV
.EQUIV
.EQUIV

J1
SEQ 0009

400

200
100

20
10

2
1
SW09, SW9
SWO8, SW8

SWO7,5W7
SWO6, SW6
SWOS, SWS
, SWa
SWO4
SWO3,SW3
SWo2, SWe

SWO1,SW1
SWOO, SWO

; #DATA BIT

DEFINITIONS (BITOO TO BIT1S)
100000

BIT15=
BIT14=
BIT13»
8IT12=
BIT11BIT10=
BIT09=
8IT08=
BIT078IT06=
BITOS=
8IT04=
8IT03=
8IT02=
8IT01-=
8IT00~
.EQULV
.EQUIV
.EQUIV
.EQUIV
.EQUIV
.EQUIV
.EQUIV
.EQUIV
.EQUIV
.EQUIV

B81I704,8174
B8I703,8IT73
81702,81T72
8I701,BIT1
BIT00,BITO

: #BASIC

“CPU’'

40000

20000
10000

4000

2000
1000
400

200
100

20
10

2
1
81I709,.8I79
8I708,8I78

BIT07,B177
B81706,8IT6
8IT05,81I75

ERRVEC» 4
RESVEC= 10
TBITVEC=14
TRTVEC= 14

BPTVEC= 14
IOTVEC= 20
PWRVEC=

TRAP VECTOR ADDRESSES

:: TIME OUT AND OTHER ERRORS
:3R$SES¥$D AND ILLEGAL INSTRUCTIONS
“"

: ; TRACE

TRAP

: sBREAKPOINT

TRAP (BPT)

; s INPUT/0UTPUT TRAP (IOT) #4SCOPEse

: ;POWER FAIL

GLOBAL AREAS
KDJ1.1A
MAC

367
368
369

379
z/1
372
373
374
375
376
377
378
379
380
381
382
383

384

385
386

387
388
389

390
391
392
393
394
395
396
397
398
399

400

401

402

403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
321
422

MACY11 30 ?(1052)
03 APR 84 11:36
000030
000034
000060
000064
000240

APR 84

10:38

PAGE

BASIC DEFINITIONS
EMTVEC=

SEG 00i0
: sEMULATOR

TRAPVEC=34

;i "TRAP”

TKVEC=
60
TPVEC=
64
PIRQVEC=240

.SBTTL

"1
TRAP (EMT)

TRAP

:37TY KEYBOARD VECTOR
;:T7TY PRINTER VECTOR
; sPROGRAM INTERRUPT REQUEST

MEMORY MANAGEMENT DEFINITIONS

:#KT11 VECTOR ADDRESS
000250

1778572
177574
177576
172516

MMVEC=

250

;#KT11

STATUS

SRO=
SR1=
SR2=
SR3=

ADDRESSES

177572
177574
177576
172516

;#USER “I“ PAGE DESCRIPTOR REGISTERS
177600
177602
177604
177606
177610
177612
177614
177616

UIPDRO=
UIPDR1=
UIPDR2=
UIPDR3=
UIPOR4=
UIPDRS=
UIPDR6=
UIPDR7=

177600
177602
177604
177606
177610
177612
177614
177616

s#USER “D” PAGE DESCRIPTOR REGISTORS
177620
177622
177624
177626
177630
177632
177634
177636

UDPDRO=
UDPDR1=
UDPDR2=
UDPDR3=

177620
177622
177624
177626

UOPDR4= 177630
UDPORS5= 177632
UDPDR6= 177634
UDPDR7= 177636

;sUSER "I“ PAGE ADDRESS REGISTERS
177640
177642
177644
177646
177650

177652

177654
177656

UIPARO=
UIPAR1=
UIPAR2=
UIPAR3=
UIPAR4=
UIPARS=
VIPAR6=
UIPAR7=

177640
177642
177644
177646
177650
177652
177654
177656

;#USER D" PAGE ADDRESS REGISTERS
177660
177662
177664

UDPARO=
UDPARL=
UDPAR2=

177660
177662
177664

&sERRORs4«

VECTOR

GLOBAL AREAS
KDJ11A
. MAC
423
424
425
426

427

428

429
430
431
432
433
434
a3s
436
437
438
439
440

MACY11

03 APR 84

177666
177670
177672
177674
177676

444
445
446
437
448
449

450
45}
452
453

454
455
456
457

458
459
460
461
462
463
464
465
466

467

468
469
470
471
472
473

474
475
476
477
478

11:36

APR 84
10: 38
PAGE 1}
MEMORY MANAGEMENT DEF INITIONS

UDPAR3Z
=
=
UDPARA4
UDPARS=
UDPARG
=
=
UDPART

177666
177670
177672
177674
177676

;#SUPERVISOR

172200
172202
172204
172206
172210
172212
172214
172216

SIPORO=
SIPDR1-=
SIPDR2=
SIPDR3=
=
SIPDR4
SIPDRS=
SIPDR6=

SIPDR7=

"I” PAGE DESCRIPTOR REGISTERS

172200
172202
172204
172206
172210
172212
172214
172216

s ¢SUPERVISOR "D“ PAGE DESCRIPTOR REGISTERS

341

442
443

30A(1052)

172220
172222
172224
172226
172230
172232
172234
172236

SOPDRO=
SDPDR1=
SC7DR2=
SOPDR3
=
=
SOPDR4
SOPDRS=
SDOPDR6=
SDPOR7+

172220
172222
172224
172226
172230
172232
172234
172236

;#SUPERVISOR "“I” PAGE ADDRESS REGISTERS
172240
172242
172244
172246
172250
172252
172254
172256

SIPARO=
SIPAR]=
SIPAR2=
SIPAR3=
=
SIPAR4
SIPARS=
SIPAR6=
SIPAR7=

172240
172242
172244
172246
172250
172252
172254
172256

;¢SUPERVISOR "D PAGE ADDRESS REGISTERS
172260
172262
172264
172266
172270
172272
172274
172276

SDPARO=
SDPAR1
=
SDPAR2=
SDPARS=
=
SDPAR4
SDPARS
=
SDPAR6=
=
SOPAR7
H ‘KER*L

172300
172302
172304
172306

KIPDRO=
KIPDR1~=
KIPDR2=
KIPOR3=

172260
172262
172264
172266
172270
172272
172274
172276
"I PAGE DESCRIPTOR REGISTERS
172300
172302
172304
172306

SEQ 0011

GLOBAL

AREAS

MACv11

KDJ1.1A
MAC

O3-APR 84

479
480
481
482
483
484
485
486

172310
172312
172314
172316

487
488
489
490
491
492
493
494

495
496
497
498
499

500
501
502
503
504
505
506
S07
508
S09
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534

172320
172322
172324
172326
172330
172332
172334
172336

30A(1052)

11:36

04 APR-84
10:38
PAGE 12
MEMORY MANAGEMENT DEFINITIONS
KIPDR4=

172360
172362
172364
172366
172370
172372
172374
172376
000000
000001
000002
000003
000004
000005
000006
000007

172312
172314

KIPOR7=

172316

; sKERNEL

“D”

KDPDRO=
KOPDR1=
KOPDR2=
KOPDR3=
KDPDR4=

172320
172322
172324
172326
172330

:*KERNEL
172340
172342
172344
172346
172350
172352
172354
172356

172310

KIPDRS=
KIPDR6=

KDPDRS=
KDPDR6=
KOPDR7=

s #KERNEL

~D"

KDPARO=
KDPARL=

172360
172362

KDPAR7=

REGISTERS

“I” PAGE ADDRESS REGISTERS
172340
172342
172344
172346
172350
172352
172354
172356

KOPAR3=
KDPAR4=
KOPARS=
KDPAR6=

DESCRIPTOR

172332
172334
172336

PAGE

ADDRESS

REGISTERS

172364

172366
172370
172372
172374
172376

; THESE ARE FLOATING POINT ACCUMULATOR EQUATES

ACO=

RC2=
AC3=
AC4=
ACS=
AC6=

%2
%3
%4
%5
%6

000244

FPVEC=

244

177746

CCR=

177744
177752
177766

PAGE

KIPARO=
KIPAR1=
KIPAR2=
KIPAR3=
KIPAR4=
KIPARS=
KIPARG6+
KIPAR7=

KOPAR2=

SEQ 0012

ACl1-=

AC7-=

; THESE ARE CACHE REGISTER EQUATES

MSER=
HITMIS=
CPEREG=

177746

177744
177752
177766

sCACHE CONTROL REGISTER

+MEMORY SYSTEM ERROR REGISTER
sHIT/MISS REGISTER

;CPU ERROR REGISTER

GLOBAL

AREAS

KDJ11A.MAC

535
536
537
538
539
540
541
542
543
544
545
546
547
548
549

552

589
590

1 1:36

O©04

APR 84
10:38
PAGE 13
MEMORY MANAGEMENT DEF INITIONS

SEQ 0013

;MISCELANFOUS DEFINITIONS

BEVENT=

RCSR=
RBUF =
XCSR=

177546

;BEVENT

CONTROL REGISTER

177560
177562
177564

XBUF =

177566

ERRTN=
HALT
$TSTNU=1
ERRNUM= 1
ASWREG= 2000

; INITIALIZE ERROR NUMBER COUNTER
;SWR FOR APT
NO BEVENT TESTING

; THIS EQUATE DEFINES
ASECT
STBOT=
1000

001000
000000

.SBTTL

THE BOTTOM OF

THE PROGRAM STACK POINTER

TRAP CATCHER

000000

553
S$54
555
356
557
558

584
585
286
587
588

30A(1052)

177546
177560
177562
177564
177566
000000
000001
000001
002000

550
551

559
560
361
562
563
364
565
566
567
568
569
570
571
572
573
574
S75
376
577
578
579
580
S581
582
583

MACY11l

03-APR -84

.=0

;¢ALL UNUSED LOCATIONS OF THE VECTOR AREA CONTAIN
;oA “,+2, TOT” SEQUENCE TO CATCH AND PROCESS ILLEGAL

;#TRAPS AND

INTERRUPTS

THAT

MIGHT

OCCUR.

;oTHE IOT TRAP WHICH IS TAKEN ON THE ILLEGAL TRAP/INT

;sTRAPS

THE

$SCOPE ROUTINE WHICH

(IF

THE

RETURN PC

;oLESS THAN 1002) JUMPS TO THE SERROR ROUTINE.

;aTHE
e

SERROR ROUTINE WILL REPORT THE ERROR
PCaYYYYYY UNEXPECTED TRAP TO XXX

FOLLOWS:

;#AND RETURN TO THE PROGRAM AT PCaYYYYYY.2
; SWHERE

:#NOTE:
;e
000000
000002

000000
000737

000004
000006
000174
000176

001716
000340
000174
000000
000000

000200

000137

$40CAT:

XXX=LOCATION OF
YYYYYY=PC

.SBTTL

TRAP

HALT

s sHALT

B8R

.-100

“BTASE? TO 177700 & TIME OUT (NOT ON

.WORD

STARTY

;s VECTOR TO STARTING ADDRESS

DISPREG: .WORD
001716

ILLEGAL

TIME

IF THE PROCESSOR IS NOT AN 11/05 THE PROGRAM
CAN BE STARTED AT ADDRESS O AS WELL AS ADDRESS 200.

.Uggg
SWREG:
.SBTTL

340

.WORD
O
STARTING ADDRES(ES)
JMP
@OSTART ; ;GO
ACT11 HOOKS

s:ll/

;s WITH PRIORITY

LEVEL

; ; SOF TWARE DISPLAY REGISTER
; sSOF TWARE

SWITCH REGISTER

TO START OF PROGRAM

$508808880085004088080000088000340800000000004008000000800000008008080¢

000046
000052

000204
00{046
011034
000052
000000
000204

;HOOKS REQUIRED BY
ssxpcs.
=46
.

ACT1t

seggno

MORD

.SBTTL

;SAVE

:31)SET LOC.46 TO ADDRESS OF

.=8SVPC
APT PARAMETER BLOCK

$ENDAD

:32)SET LOC.S2 10 ZERO
:;

RESTORE PC

$i00840380408048000008808840008000080008040000808000000000804800000000¢

sSET LOCATIONS 24 AND 44 AS REQUIRED FOR APT

IN .S$EOP

GLOBAL

AREAS

KDJ11R,MAC

591
592
593

594
595
596
597

598
599
600
601
002

603
604
605
606
607
608

609

010
611
612
613
614
615

000024
000044

MACY11 30A(1052)
03 APR 84 11:36
000204
000024
000200
000044
000204
000204

APR 84
APT

10:38

Beh]
PAGE

PARAM TER

SEQ 0014

BLOCK

1500066800000 00000000808004000000004008070048400408000000

L8N
.=c4

200

00000000000¢

1 $SAVE CURRENT LOCATION
13SET POWER FAIL TO POINT

1:FOR APT START WP

. =44
$APTHDR

11POINT
; ;POINT

LI ) 4

1 tRESET LOCATION COUNTER

TO APT
TO APT

TQ START

PROGRAM

INDIRECT ADDRESS PNIR,
HEADER BLOCK

3300060000000 0000000604000004000000000808004008000000

1SETUP APT PARAMETER BLOCK AS DEFINED IN

s INTERFACE SPEC.

000204
000204
000206
000210
000212
000214
000216
000002

001000
000001
000000
000014
000204
000002
000004
000204
001000

$APTHD
:
$HIBIS:
$MBADR:
$TSTM:
$PASTM:
SUNITM:
.. 8X
.2

.'.&);o
.1

.WORD
.WORD
_WORD
_WORD
.WORD

. WORD

O
$MAIL
1
4
O

000000000800800

THE APTY-PDP11 OIAGMOSTIC

31 TWO HIGH BITS OF 18 BIT MAILBOX ADDR.
1 sADDRESS OF APT MAILBOX (BITS 0-15)
1iRUN TIM OF LONGEST TEST
+iRUN TIME IN SECS. OF 1ST FASS ON 1 UNIT (QUICK VERIFY)
: tADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL

SETEND $MAIL/2 ;;LENGTH MAILBOX-ETABLE(WORDS)
$ SAVE CURRENT LOCATION ZOUNT

:SET

SOME

VECTORS

;RESTORE LOCATION COUNT

UNIT

ARE

MACY1]

os"abRtda Y142

30A(1052)

APR

ct0eal%9A%a SEETIAR
‘

.SBTTL

;

SEQ 001

GLOBAL DATA SECTION

THE GLOBAL DATA SECTION CONTAINS DATA THAT ARE USED
IN MORE

.SBTTL

THAN ONE

TEST.

APT MAILBOX-ETABLE

;;.“‘..““““0‘.‘..““‘.“.0“““‘0‘.‘.“““..“0.‘

001000

635
636
637
638
639

640
641
642

001000
001002
001004
001006
001010
001012
001014
001016

000000
000000
000000
000000
000000
000000
000000
000000

001020
001021
001022

000
000
002000

001020

001024

001026

000000

650
651
652
653
654
655
656
657
658
6359
660
661
662
663
664
665

667
668
669
670
671

SMAIL :

.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD

AMSGTY
AFATAL
ATESTN
APASS
ADEVCT
AUNIT
AMSGAD
AMSGLG

SENV:
$SENVM:
$SWREG:

.BYTE
.BYTE
.WORD

ARENV
:+ tENVIRONMENT BYTE
AENVM ; ;ENVIRONMENT MODE BITS
ASWREG
;;APT SWITCH REGISTER

SETABLE :

SUSWR:

$CPUOP:
ie

_WORD

.WORD

AUSWR

ACPUOP

e
i»
is
$SETEND:
JMEXIT

001030

1 1APT MAILBOX

$MSGTY:
SFATAL:
$TESTN:
$PASS:
$DEVCT:
SUNIT:
$MSGAD:
$MSGLG:

i
i

643

644
645
646
647
648
649

0.....‘0

.EVEN

;;MESSAGE TYPE CODE
;;FATAL ERROR NUMBER
;;TEST NUMBER
;;PASS COUNT
;;DEVICE COUNT
;;I/0 UNIT NUMBER
; ;MESSAGE ADDRESS
; ;MESSAGE LENGTH

+ tAPT ENVIRONMENT TABLE

;;USER

SWITCHES

;;CPU TYPE,OPTIONS
BITS 15-11+CPU TYPE
BIT
BIT
B8IT

11/04201,11/05=02.11720203,11/40=04,11/45205
11/70-06,PD@+07,Q+10

10<REAL TIME CLOCK
9~FLOATING POINT PROCESSOR
8«MEMORY MANAGEMENT

: THESE LOCATIONS ARE USED IN MORE THAN ONE TEST TO STORE VECTOR DATA
iWHEN THE TEST NEEDS TO HAVE AN ERROR CONDITION RESPOND DIFFERENTLY
;FROM

THE

DEFAULT

RESPONCE.

001030
001032

000000
000000

SLOCOO:
SLOCOL:

001034
001036
001040
001042
001044
001046
001050
001052

000000
000000
000000
000000
000000
177570
177570
000000

EXPDAT: .WORD
RECOAT: .WORD
COUNT:
.WORD
FLAG:
.WORD
ERRCNT: .WORD
SWR :
.WORD
OISPLAY: WORD
$ERFLG: .WORD

)
©
O
O
O
DSWR
ODDISP
O

001054
001056
001060
001062
001064

000000
000000
000000
000000
000000

DCOUNT:
ALLCTR:
LOOPIN:
SAVSP1:
SAVSP2:

o
]
O
O
O

.WORD
.WORD

s THESE LOCATIONS ARE USED IN MORE THAN ONE TEST TO STORE WORKING DATA.

; THESE LOCATIONS ARE

.WORD
_WORD
.WORD
.WORD
.WORD

1STORES EXPECTED (GOOD) DATA FOR COMPARISONS
1STORES RECIEVED DATA TO BE VERIFIED
:ERROR INDICATOR FOR FLOATING POINT TESTS
sUSED TO STORE “FLAG" CONDITIONS
1STORAGE FOR ERROR COUNT
$STORAGE FOR SWITCH REGISTER ADORESS
1STORAGE FOR DISPLAY REGISTER ADDRESS
1ERROR FLAG

USED BY MORE

TmAN ONE

TEST

AS LOOP

1STORAGE FOR UNEXPECTED
;
'

COUNTERS

TRAP DATA

SN AIES os"BEARSPIESD) 0% APRBY AP OIS
TM

672
673
674
675
676
677
678
679
680
681
682
©83
684
ggz

001066
001070
001072
001074
001076
001100
001102
001104
001106
001110
001112
001114
001116
001120

s€a oois

000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000

FWOSEQ:
ADDLSB:
RITEDA:
NEWDAT:
CURDAT:
FSTADD:
LSTADD:
CURADD:
LOWADD:
GOODAD:
TSTADD:
NEWADD:
SOFTER:
SOFTRE:

000020

s1ITIATHIS IS IT. THE PROGRAM TEST LOCATION AND WRITE BUFFERI!IISTSIIEIIIGEIIITYIY
TSTLOC:
.BLKW
20

.WORD
.WORD
.WORD
WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD

0
O
O
©
©
¢
©
©
©
©
O
O
O
0

tUSED TO INDICATE DIRECTION OF ADDRESSING
1STORES LEAST SIGNIFICANT BIT FOR RAM TESTS
1STORES WRITE DATA FOR RAM TESTS
1DATA STORE FOR RAM TESTS
sDATA STORE FOR RAM TESTS
1STORES FIRST ADDRESS IN ADDRESSING SEQUENCE
1STORES LAST ADDRESS IN ADDRESSING SEQUENCE
1STORES CURRENT ADDRESS FOR RAM TESTS
s STORES LOW ADDRESS FOR RAM TESTS
3 STORES GOOD ADDRESS FOR RAM TESTS
$ADDRESS STORE FOR RAM TESTS
$ADDRESS STORE FOR RAM Tr.ST
sUSED TO STORE SOFT ERROY COUNT
tUSED TO HOLD RETRY ADDRESS ON SOFT ERRORS

687
688
€89
690
691

694
695

696

001122
001122

GLOBAL AREAS
KOJL1R . MAC

MACY11 30A(1052)
O3-APR 84 11:36

04 APR-84
10:38
PAGE 17
GLOBAL TEXT SECTION

697
698

.SBTTL

699

701
702

;s
:

703

705

704

;8?

709
710
711
712
713

001162
001170
001176
001204
001212

715

001224

714

716
717
718

719
720

001220

001232
001240
001246

001254
001262

005015
044502
020075
020122
052111
042524

005015

044502
020075
020122

020105
047101

042523
020124
020061
034061
051440
000115

042523

020124
020061
040503

.ASCIZ

<CR><LF>/SET BIT 9 =

020115
040524

724

001312

044514

054524

052040

727

001332

051505
015

042510

728
729
730
731
732
733
734

001360
001366
001374
001402

020122
005015
020122
000

736

001410

000

735

737

001340
001346
001352

001403

042524
047522
005015

015

001412

051524
041412

051440

1 FOR

18 BIT

051531

020115
000122
051105
020043
051105
041520

047522
000075
047522
036440

020012

020040

ERRMSG::.ASCIZ

<CR><LF>/CACHE

ERR1:

ASCIZ

<CR><LF>/ERROR &

ERR2:

LASCIZ

<CR><LF>/ERROR PC

S$CRLF:

.ASCIZ

<CR><LF>/

SYSTEM ERROR/

0513105

LEVEN

SYSTEM/

1 FOR CACHE RAM AND TAG RAM DATA RELIABILITY

044502

000
041501

CALLS

OPMSG3:

020115
051040

001320
001325

IN PRINT

020124

020071
047506
044103

040522
040524

725
726

USED

<CR><LF>/SET BIT 8

040522
020104
040511

STATEMENTS

.ASCIZ

020107
040504

046105

FORMAT

INFORMATION THAT ARE USED

OPMSG2:

001270
001276

001304

THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS,

MESSAGES, AND ASCII
MORE THAN ONE TEST.

020124
020070
047506
041040
051531

721
722

723

TEXT SECTION

3ee

700

708

GLOBAL

SEQ 0017

TESTS/

GLOBAL

AREAS

KDJ11A MAC

MACY11

O3-APR 84

30A(1052)
11:36

e
04 APR-84

10:38

PAGE

GLOBAL ERROR REPORT

SEQ 0018

SECTION

7:6

.SBTTL

740

XXy

741
;4%
4
744

s THE GLOBAL ERROR REPQORT SECTION CONTAINS MESSAGE PRINTING AREAS
;s USED By MORE THAN TEST TO OUTPUT ADDITIONAL ERROR INFORMATION.
:--

739

GLOBAL ERROR REPORT

SECTION

GLOBAL

AREAS
KDJ1.1A
MAC

MACY1l SOA(§252)
03 -APR - 84 11:

745
746
74
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762

773
774

778
776
777

778
779
780
781
782
783
784
785
786
787
788
789
790
791

APR-84

G2
PAGE

GLOBAL & Rout?Ne% SECTION
10;3

.SBTTL

SEQ 0019

GLOBAL SUBROUTINES SEC)ION

;

THE GLOBAL SUBROUTINES SECTION CONTAINS THE SUBROUTINES

THAT

ARE

USED

IN MORE

THAN ONE

TEST.

HER4

i
:

FUNCTIONAL DESCRIPTION:
SUBROUTINE TO INITIALIZE ALL

INPUTS:

OUTPUTS:

SUBORDINATE ROUTINES USED:

763

764
765
766
767
768
769
770
771
772

THE MMU REGISTERS

NONE
NONE
LOAD PARS
LOARD

PDRS

; FUNCTIONAL SIDE EFFECTS: NONE
:
001412
001416
001422
001426
001432
001436
001442
001446

001452
001456
001462
001466
001472
001476
001502
001506
001512
001516
001522
001526
001532
001536
001542
001546
001552

012701
004767
012701
004767
012701
004767
012701
004767
012701
004767
012701
004767
012701
004767
012701
004767
012701
004767
012701
004767
012701
004767
012701
004.67
000207

172240
000132
172260
000122
172340
000112
172360
000102

177640

000072
177660
000062
177600
000102
177620
000072
172300
000062
172320
000052
172200
000042
172220
000032

CALLING SEQUENCE:

INITMM:

MOV
JSR
MOV
JSR
MOV
JSR
MOV
JSR
MOV

JSR
MOV
JSR
MOV
JSR
MOV
JSR

MOV
JSR
MOV

JSR

MOV
JSR

RTS

JSR

9172240,R1
PC,
LDPARS
4172260,R1
PC,
LDPARS
2172340,R1
PC,
LDPARS
2172360,R1
PC,
LDOPARS
9177640,R1
PC,
LOPARS
#177660,R1
PC,
LDPARS
9177600,R1

PC,
LDPORS
2177620,R1
PC,
LOPDRS

#172300,R1
PC,
LDPDRS

4172320,R1
PC,
LDPDRS

PC,INITMM
:BASE ADDRESS OF SIPARS
sBASE ADDRESS OF

SOPARS

:BASE ADDRESS OF KIPARS

:BASE ADDRESS OF KDPARS
:BASE

ADDRESS OF UIPARS

:BASE ADDRESS OF UDPARS

:BASE ADDRESS OF UIPDRS
:BASE ADDRESS OF UDPDRS
;BASE ADDRESS OF KIPDRS

:BASE

ADDRESS OF KDPDRS

+BASE

ADDRESS OF

SIPDRS

:BASE ADDRESS OF

SOPDRS

;RETURN

GlLOBAL AREAS
K DJ11A.MAC

MACY11

30A(1052)

PNE PRECRS¥

792

He
02

APR 84

PAGE

SEQ 0020

793

: FUNCTIONAL DESCRIPTION:
SUBROUTINE

794
795
796
797
798
799

TO INITIALIZE ALL

THIS ROUTINE

SUPPL TED BY

WILL

THE MMU PAGE ADDRESS REGISTERS (PARS).

INITIALIZE

8 PARS

THE CALLING ROUTINE.

STARTING AT

A BASE

ADDRESS

PARS O 5 WILL BE MAPPED FROM

ADDRESS O TO ADDRESS 137777 (0-24K). PAR 6
ADgRESS 200000 TO 217777 AND PAR 7 WILL BE
PAGE
.

800
801
80¢
803

804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819

10 :38

6L 0BAL 5 Rour?nes20 SECTION

WILL BE MAPPED FROM
MAPPED TO THE I/0

INPUTS:

R1 CONTAINS

QUTPUTS:

THE BASE

FUNCTIONAL

001554
001560
001562
001564
001570
001572
001576
001602

012702
005003
010321
062703
077204
012721
012711
000207

¢00006

000200
002000

177600

SIDE

EFFECTS:

CALLING SEQUENCE:

LOPARS:

MOV

1$:

MOV
ADD
508
MOV
MOV
RTS

CLR

THE

8 PARS

INITIALIZED

NONE

SUBORDINATE ROUTINES USED:

;

ADDRESS

a6,

NONE

JSR
R

R3,
(R1).
0200,
R3
R2,
13
02000,
(R1).
2177600,(R1)
PC

PC,.LDPARS
;LET LOOP COUNTER COUNT FIRST 6 PARS

s INITIALIZE INDEX VALUE

;LOAD PARS
s INDEX IN 4K

INCREMENTS

sLOAD FIRST SIX PARS
sLET PAR6 MAP TO 200000
sLET PAR7 MAP TO I/0 PAGE
;RETURN

842

843
844

845
846

03-APR 84

30A(1052)

11:36

APR-84
10:38
PAGE 21
GLOBAL SUBROUTINES SECTION

FUNCTIONAL

SEG 0021

DESCRIPTION:

SUBROUTINE

TO INITIALIZE ALL

THIS ROUTINE WILL

* L4

SUPPLIED By

W
84
Ss

INPUTS:

OUTPUTS:

CONTAINS

SIDE

THE BASE

EFFECTS:

: CALLING SEQUENCE:
177406
077406
077406

STARTING AT

A BASE

PDRS 0-S5 WILL BE

ADDRESS

INITIALIZED

LOPDRS:
1¢:

MOV
MOV
508
MOV
MOV

RTS

ADDRESS OF

THE

8 PORS

TO BE

INITIALIZED

NONE

FUNCTIONAL

012702
012721
077203
012721
012711
000207

8 PDRS

THE CALLING ROUTINE.

SUBORDINATE ROUTINES USED:

001604
001610
001614
001616
001622
001626

THE MMU PAGE DECRIPTOR REGISTERS (PDRS).

INITIALIZE

4K READ/WRITE BYPASS AND PDRS 6 AND 7 WILL BE INITIALIZED TO
4K READ/WRITE NO BYPASS,
NOTE:
THERE IS NO NEED TO BYPASS ON I/Q PAGE REFERENCES BECAUSE
THE CACHE DOES NOT ALLOCATE ANY OF THESE REFERENCES.

®s

820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841

MACY11l

GLOBAL AREAS
KDJ11A,MAC

NONE

JSR

6,
R2
0177406,(R1).
R2,
13
477406, (R1).
477406, (R1)

NONE

PC,LDPARS
sLET LOOP COUNTER COUNT FIRST
:LOAD PDRS WITH 4K READ/WRITE
;LOAD FIRST SIX PDRS
;LET PAR6 BE 4K READ/WRITE NO
;:LET PAR7 BE 4K READ/WRITE NO
s RETURN

6 PARS
BYPASS
BYPASS
BYPASS ALSO

GLOBAL AREAS
KDJU11A
. MAC

MACY11l

03 APR 84

847

11:36

O4-APR 84

10:38

PAGE 22

SEQ 0022

GLOBAL SUBROUTINES SECTION
:00

848

FUNCTIONAL

849
850
851
852

DESCRIPTION:

SUBROUTINE TO HANDLE PARITY ERROR ABORTS FROM THE RAM STORE RAM TESTS.
INPUTS:
MEMORY

853
854
855
856
857
858
859
860
861
862
863
864

865
866
867
868
869
870
871

30A(1052)

QUTPUTS:

SYSTEM ERROR REGISTER CONTAINS BITS

INDICATING FAILURE

NONE

SUBORCINATE ROUTINES USED:
FUNCTIONAL

SIDE

EFFECTS:

NONE

CALLING SEQUENCE: CALLED BY PARITY ABORT
MOV
80114,
SLOCOO
;SAVE CONTENTS OF PARITY ABORT VECTOR
MOV

#DSPAR,

ae¢114

;LET

VECTOR POINT

TO PARITY

ABORT ROUTINE

(CACHE PARITY ERROR OCCURS)
001630
001630
001632
001634

104000
000001
001325

001636

000002

RAMPAR:

ERROR

.WORD
. WORD
RTI

1
ERRMSG

sALL ERRORS

TRAP

TO EMT

;UNIQUE ERROR NUMBER
;sADDRESS OF ERROR MESSAGE
;RETURN

VECTOR

;:CACHE SYSTEM ERROR

GLOBAL

AREAS

KDJ11A.MAC

MAC¥11

03 APR 84

K&
30A(1052)

11:36

APR 84
10:38
PAGE 23
GLOBAL SUBROUTINES SECTION
‘e

FUNCTIONAL

®s

872
873
874
875
876
877
878
879
880
881
882
883
884
88s
886

DESCRIPTION

SUBROUTINE TO HANDLE SOFT ERRORS THAT MAY BE CAUSED BY

APT

SYSTEM MONITORING DURING

MODIFIED. WHEN THE TEST RESUMES,
THE CORRUPTED HIT/MISS REGISTER.

TEST.

FOR EXAMPLE:

A FALSE ERROR MAY BE CAUSED Bf
LIKEWISE, A TEST MAY INITIALIZE

CACHE TO A KNOWN STATE (ALLOCATED/NOT ALLOCATED); AN APT
BREAK MAY CAUSE CACHE STATE TO ALTER AND THE TEST TO FAIL.

;OUTPUTS:

894
895
896
897
898
899
900
901
902
903

;CALLING SEQUENCE:

sFUNCTIONAL SIDE EFFECTS:

001640
001646
001650
001654
001656
001662
001666
001672
001676
001702
001710
001714

122767
001022
005767
001017
062706
005267

005037
005037

005037
012737
000177
000207

000001

177152

APTSFT:

TST
BNE
ADD
INC
CLR
CLR

000002
177230

177744

177572
177766
000400
177204

CMPB

BNE

177242

CLR

177746
1$:

TEST

.4 T0O

NONE

; SUBORDINATE ROUTINES USED:

893

908

CACHE

: INPUTS
H
SOFTRE CONTAINS RETURN ADDRESS TO BEGINNING OF
i
TEST AGAIN ON ERROR

887

907

THE

IF A TEST IS USING THE HIT/MISS REGISTER TO MONITOR CACHE
ACTIVITY, AND APT BREAKS IN, THE HIT/MISS REGISTER WILL BE

888
889
890
891
892

904
905
906

SEQ 0023

MOV
JHP
RTS

NONE

JSR

SAPTENV, SENV

SOFTER
13
42,R6
SOF TER

NONE

SOMSER
80SRO
84CPEREG
48IT08,30CCR
aSOF TRE
PC

PC,APTSFT

;ARE WE

IN APT MODE?

tNO SOFT ERRORS IF NOT IN APT MODE

sHAS A SOFT ERROR ALREADY

OCCURRED?

:IF YES GO TO ERROR
;CLEAN UP THE STACK TO RETRY TEST
: INCREMENT THE SOFT ERROR COUNTER

;CLEAR THE MSER

;TURN OFF MMU
:CLEAR THE CPU ERROR REGISTER
;FLUSH THE CACHE, CLEAR THE CCR
sRETRY

TEST

:Gu TO ERROR.

: THAN ONCE

ERROR OCCURRED MORE

OR NOT

IN APT

MODE.

GLOBAL

AREAS

KDJ11A.MAC

909
910
911
912
913
914

915

916
917

918

919
920
921
922

923
924
925
926
927
928
929
930
931
932
933
934

ggg

937
938
939
940
941
942
943
944
945
946

g:;

001716
001716

MACY11

03-APR 84

012737

30A(1052)
11:36

000014

001724

012706

001000

001730
001736

012737
012737

013314
000340

001744
001752

012737
012737

012766
000340

001764
001772

016767
105067

007012
177054

001776
002002
002010
002016
002024
002032

013746
012737
012767
012767
022777
001012

000004
002036
177570
177570
177777

002034
002036
002042
002044

000403
012716
000002
012767

001760

002052

002060

005067

012767

012637

177022

000176
000174

000004

10:38

GLOBAL

177746

000030
000032
000034
000036
007002

MOV
214 ,80CCR
;SET CACHE TO FORCE MISS
INITIALIZE THE COMMON TAGS
MOV
@STACK, SP
; ;SETUP THE STACK POINTER
;s INITIALIZE A FEW VECTORS
MOV
@$ERROR, ROEMTVEC ;;EMT VECTOR FOR ERROR ROUTINE

883{82

005067
132767
001403

012767

176723

001022

176740

002106
002114
002122
002126
002132

012737
012737
005037
104401
104401

013314
000340
177766
001162
001224

955
956
957
958
959
960
961
962
963
964

002136
002142
002144
002152
002154
002162
002164
002166
002170
002176

005737
001012
126727
001406
026727
001005
104406
000403
112767

000042

000020
000022

176666

000176

000001

010566

TRAP CALLS

;i sCLEAR THE PASS COUNT

MOV
MOV
MOV
MOV
cMP
BNE

S0ERRVEC, -(SP)
0644 ,80ERRVEC
2DSWR , SWR
oDDISP,DISPLAY
2-1,85WR
668
65%
965%,(SP)

65$:

BR
MOV
RTI
MOV

;;SAVE ERROR VECTOR
;;SET UP ERROR VECTOR
:3SETUP FOR A HARDWARE SWICH REGISTER
;;AND A HARDWARE DISPLAY REGISTER
13 TRY TO REFERENCE HARDWARE SWR
$ :BRANCH IF NO TIMEOUT TRAP OCCURRED
:sAND
THE HARDWARE SWR IS NOT =
1
: :BRANCH IF NO TIMEOUT
;3SET UP FOR TRAP RETURN

664 :

MOV

(SP)+ ,80ERRVEC

67%:

.SBTTL
000001

;;LEVEL

$PASS

TYPE

176650

9340, 80EMTVEC+2

@$TRAP ,80TRAPVEC ;;TRAP VECTOR FOR
0340, 80TRAPVEC +2;LEVEL 7

CLR

$ARGL
:
LENDM

176716
000200

MOV

MOV
MOV

MOV
$ENDCT,$EOPCT
;;SETUP END OF -PROGRAM COUNTER
CLRB
$ERFLG
; iCLEAR THE ERROR FLAG
::SIZE FOR A HARDWARE SWITCH REGISTER. IF NOT FOUND OR IT IS
:sEQUAL TO A "-1", SETUP FOR A SOF TWARE SWITCH REGISTER.

.MACRO

002064
002070
002076

SEQ 0024

SECTION

.SBTTL

644
176774
176770

PAGE 24

SUBROUTINES

START:

000004
177030
177024
177014

002044

949
950
951
952
953

954

04 APR 84

68$:
694
:

MOV

OSWREG, SWR
; sPOINT
#0ISPREG,DISPLAY

TO SOF TWARE

SWR

;;RESTORE ERROR VECTOR

$$SETMAIL
2$ARG1
CLR
$PASS
BIT8
®APTSIZE,$ENVM
8EQ
$ARG1
MOV
@$SWREG, SWR

: ;CLEAR PASS COUNT
;;TEST USER SIZE UNDER APT
;s YES,USE NON-APT SWITCH
: sNO,USE APT SWITCH REGISTER

$S$SETMAIL
CLR
$PASS
8ITB
QAPTSIZE,$ENVM
BEQ
67

1 ;CLEAR PASS COUNT
;;TEST USER SIZE UNDER APT
: s YES,USE NON-APT SWITCH

MOV

@3$SWREG, SWR

: sNO,USE APT SWITCH REGISTER

MOV
9$ERROR, 80IOTVEC
;:SET UP IOT VECTORS
MOV
9340,80I0TVEC+2
1:T0O GO TO ERROR ROUTINE
CLR
80177766
;:CLEAR CPU ERROR REGISTER
,0PMSG2
;OPERATOR MESSAGE 2
TYPE
,OPMSG3
$OPERATOR MESSAGE 3

GET VALUE FOR SOFTWARE SWITCH REGISTER

TST
BNE
cMPB
8EQ
cMP
BNE
GTSWR
BR
MOVB

8042
68$
$ENV, 01
688
SWA , 9SWREG
693
693
01, $AUTOB

1 sARE WE RUNNING UNDER XXDP/ACT?
: iBRANCH IF YES
: 1ARE WE RUNNING UNDER APT?
; ;BRANCH IF YES
1+ 1 SOF TWARE SWITCH REG SELECTED?
: i1BRANCH IF NO
; 1GET SOFT-SWR SETTINGS

::SET AUTO-MODE

INDICATOR

G LOBAL AREAS
K DJ11A.MAC

95
%6
967
968
969

002176
002202

OB-AgR é4 11:%6
MAC¥11

005067
012737

30A(1052)

176602
000014

APR-84

177746

PAGE

(.R

MOV

S€Q 0025

SWITCH REGISTER

$TESTN

sRESET

#14,80CCR

STESTN TO ZERQ

:SET CACHE

TO FORCE MISS

CACHE REGISTER

00000048004

ACCESS

TEST

PIBAAAAARARAARELAL0R0RRAANAACAAAAAREAANRRRERRAEALE0LL0

A000000044

:CHECK REGISTER ACCESS - THIS TEST WILL VFRIFY EACH OF THE THREE
;CACHE MEMORY SYSTEM REGISTERS CAN BE ACCESSED WITHOUT A TRAP T0
:ggc#ggggo4gggN-EXISTANT ADDRESS TRAP) OCCURRING. THE REGISTERS TO
:

H
:

CACHE CONTROL

MEMORY SYSTEM ERROR
HIT/MISS

17777746

17777744
17777752

:EACH REGISTER WILL BE ACCESSED WITH A WRITE CYCLE<.

:BGNTST
; SAVE CONTENT OF LOCATION 4
;LET LOCATION 4 POINT TO ERROR ROUTINE
; TEST THE CACHE REGISTERS
;RESTORE CONTENTS OF LOCATION 4
sEXIT

TST

;CACHE RECISTER ADDRESSES

988
989
990
991
992
993
994
995

1000
1001
1002
1003
1004
100S
1006
1007
1008
1009
1010
1011
1012
1013
1014
1015
1016
1017
1018
1019
1020

RESTART:

;oTEST

987

997
998
999

10:38

VALUE FOR SOF TWARE

FiAAAAAALAANAEALEEREAAEEALARAANANAAARRRNRAS040444400440

970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986

996

GET

:
:
:

CCR=
MSER=

HITMIS=

17777746
17777744
17777752

sERROR ROUTINE: ERROR IN CACHE SYSTEM
:

RETURN

sENDTST

002210
002210
002214
002222
002230
002234
002242
002246
002252
002256
002262
002266
002272
002276

H g“““t““““‘t..‘.tttlt‘tt‘.‘“#‘ttt‘tttttt#“‘tt““‘t“tt‘

005267
013767
012737
013704
012737
005037
005037
005037
010437
005037
005037
005037
000167

176570

000114
001630
000004
002302

177746
177744
177752
000004
177744
177766

TST1:

176606

000114

000004

INC
MOV
MOV
MOV
MOV
CLR

$TESTN
82114,5L0C00
ORAMPAR, 80114
804 R4
OERROUT , 804
80CCR

; INCREMENT TEST NUMBER
; SAVE PARITY INTERRUPT VECTORS
;SET UP TRAP CATCHER FOR PARITY ERRORS.
:SAVE CONTENTS OF VECTOR 4
;LET VECTOR 4 POINT TO ERROR ROUTINE
; TEST ACCESS TO CACHE CONTROL REG

CLR
MOV
CLR
CLR

BOHITMIS
R4 ,504
SOMSER
B0CPEREG

; TEST ACCESS TO HIT MISS REGISTER
;RESTORE VECTOR
;CLEAR THE MEM SYS ERROR REG
;:CLEAR THE CPU ERROR REGISTER

CLR

001116
000010

JMP

S80MSER

S0SOF TER
TST2

;TEST ACCESS TO MEMORY SYSTEM ERR REG

;CLEAR THE SOFT ERROR COUNT

; JUMP OVER DATA TABLES OR SUBROUTINES
;:TO NEXT

002302
002302
002304
002306

104000
000002
001325

002310

000002

ERROUT
;

ERROR
.MORD
.WORD

RTI

ERRMSG

TEST

;ALL ERRORS TO TRAP TO EMT VECTOR
;:UNIQUE ERROR NUMBER
;ADDRESS OF ERROR MESSAGE

;CACHE SYSTEM ERROR

;CONTINUE FROM ERROR

AREAS
GLOBA
KDJ11A, MAC

1021
1022

1023

MACY11

O3-APR 84

30A(}L 052)

11:36

002312

;*TEST

1055
1056
1057
1038
1059
1060
1061
1062
1063
1064
10653
1066
1067
1068
1069
1070
1071
107¢
1073

1074
10°%
167,

TEST

0000000000000000

CACHE

CNTRL

REG BITS

1180666000000 000000000000000800000000000000000008

0000000000000006

+CCR REGISTER BIT TEST - THIS TEST WILL VERIFY THAT EACH READ/WRITE BIT OF
s THE CACHE CONTROL REGISTER CAN BE SET AND CLEARED INDIVIDUALLY AND THAT
$1BITS 15 - 11 AND BIT 8 ARE ALWAYS READ AS ZEROS.
i

1BGNTST
s INITIALIZE GOOD DATA TO #1
+CLEAR CCR
100 UNTIL ALL BITS TESTED
A

HR
i,

i
e
.
R
i

1044
1045
1046

1051
1052
1053
1054

SEQ 002¢

1100000008000 000000800000000000000000000000000000

1033
1034
1035
1036
1037
1038
1039
1040
1041
1042
1043

1049
1050

CACHE REGISTER ACCESS TEST

crsT2:

1024
1025
1026
1027
1028
1029
1030
1031
1032

1047
1048

N [all

APR 84
131

WRITE GOOD DATA TO CCR

READ CCR

IF CCR NOT EQUAL TO GOOD DATA THEN
.
IF CCR EQUAL TO ZERO THEN
.
IF GOOD DATA NOT EQUAL
ERROR IN CACHE SYSTEM
.
ENDIF
ELSE
ERROR IN CACHE SYSTEM
ENOIF
.

TO BITS<15-11>

OR BIT 8

THEN

ENDIF
‘.
.
UPDATE TO NEXT BIT
s ENODQ
sENDTST

002312
002312

002316
002322
002326
002332
002336
002340
002344
002346
002352

002354
002356
002360

1008800000000 000000000000A08000000000040000000008000000000000000

005267
012701
005067
010167
026701

001415
005767
001007
032701
001007

TST2:

176466
000001
175420

175414
175410

1¢:

175402

000003
001325

104000
000004
001325

002372
<400
002402

022737
001003
0127%7

00c410
002412

006101

000403

10334

CCR
R1,
CCR,
43

BNE

BITY

174400

000400

177746

5%:

CCR

0174400,R1

: INCREMENT

TEST NUMBER

s INITIALIZE GOOD DATA

TO #1

1CLEAR CCR
;WRITE GOOD DATA TO CCR
:IF CCR NOT EQUAL GOOD DATA
1 THEN
1 IF

CCR EQUAL

TO ZERO

: THEN

s IF GOOD DATA NOT BITS<15-11> OR 8

3
ERRMSG

: 1HEN
sALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE

B8R

1ENODIF

IUNIQUE ERROR NUMBER
1WAS

ERROR

WORD

177746

BNE
ERROR
. WORD
.WORD

. WORD

002000

$TESTN

a1,

CLR
MOV
cMe
BEQ
TST

104000

002362
002364
002364
002366
002370

INC

MOV

ERRMSG

cHp

02000,86CCR

BNE
MOV

S
9400, 84CCR

ROL

8ccC

tALL

1CACHE SYSTEM ERROR

ERRORS

TRAP

TO EMT

VECTOR

1ADDRESS OF ERROR MESSAGE
j1CACHE SYSTEM ERROR
LAST

FUNCTION WRITE

WRONG

TAG PAR?

1IF NOT GO SHIFT LEFT AND DO NEXT
1¥LUSH CACHE TO GET RID OF WRONG
t TAG PARITY
tUPDATE TO NEXT BIT

100 UNTIL ALL

BITS TESTED

TEST,

GLOBAL

ARE RS

KDJ11A MAC

1077
1078
1079
1080
1081
1082
1083
1084
1085
1086
1087
1088
1089
1090
1091
1092
1093
1094
1095
1096
1097
1098
1099
1100
1101

MACYil

03-APR 84

30A(1052)

11:36

04 APR 84
T2

002414

SEQ 002/

CTST3:
$10000000400000008000000000000000000080000000000060040000000080086

soTEST 3

TEST FORCE MISS FUNCTION

550000460006000000000000000000400000004800000000006800000000000000

sFORCE MISS TEST - THIS TEST WILL VERIFY THAT ALL REFERENCES MADE

iWITH EITHER BIT<3> OR BIT<2> OF THE CCR SET CAUSE A CACHE MISS AND
sLEAVE THE CACHE ENTRY UNCHANGED. FIRST WRITE A TEST AODRESS WITH

1BIT7S¢3:2> CLEARED TO ALLOCATE CACHE AND SET A KNOWN DATA PATTERN
$1INTO THE CACHE. THEN SET BIT<2> AND REWRITE THE SAME ADDRESS WITH

sNEW DATA. NEXT CLEAR BITS<3:2> AND READ THE TEST ADDRESS, THE DATA
$SHOULD EQUAL TO PATTERN 1. FINALLY READ THE TEST ADDRESS WITH BIT<«3>

sSET,

THE DATA SHOUWLD EQUAL PATTERN 2.

A LAST WRITE MUST BE DONE WITH

$s80TH FORCE BITS CLEARED BECAUSE THE CACHE AND MAIN MEMORY HAVE
iDIFFERENT DATA,
H

1BGNTS
tWRITE TEST ADDRESS WITH PATTERN 1
1GET CCR BITS<3:2> = 0,1
tWRITE

TEST ADDRESS WITH PATTERN 2

sCLEAR CCR BIT<¢3>
sREAD TEST ADDRESS

1SAVE HIT/MISS REGISTER DATA

;COMPARE RECEIVED DATA TO PATTERN 1
:IF DATA NOT EQUAL THEN

1102
1103
1104

i,
ERROR IN CACHE SYSTEM
sENDIF
$SET CCR<3:2> = 1,0

1105
1106
1107

sREAD TEST

ADDRESS

$SAVE HIT/MISS REGISTER DATA
;COMPARE RECEIVED DATA TO PATTERN 2
:IF DATA NOT EQUAL THEN
.
ERROR IN CACHE SYSTEM
sENDIF
sCLEAR CCR<3:2»

tWRITE

sENDTST

TEST ADDRESS

o o

oy o 0 s b e o o g
o pe o s o et gt Pt pn e

10:38
PAGE 27
TEST CACHE CNTRL REG BITS

1120
1121

1122
1123
1124
1125
1126
1127
1128
1129
1130
1131
1132

‘3.““..‘.“..““‘..“0‘“‘..O‘.“..“““‘.“...‘0.“““‘.“.

002414
002414
002420
002426

005267
012737
005037

176364
002550
001122

002432
002440

012767
012737

000004
177777

002446

012767

000200

002454
002460

013701
005701
001403
104000
000005
001325

001122

002462
002464

002466
002470

TST7S:

$TESTIN

$ INCREMENT TEST NUMBER

CLR

80TSTLOC

175306

001122

MOV
MOV

081102, CCR
@177777,80TSTLOC

tWRITE TEST LOCATION WITH PATTERN 1
tALLOCATES CACHE AND MEMORY WITH 2EROS

175272

MOV

@200,

000114

INC

MoV

MOV

TS7Y

BEQ
ERROR
LWORD
. WORD

OFMPARR, 80114

CCR

30TSTLOC,RL

R1
1s

S
ERRMSG

$;SETUP PARITY

VECTOR

TO POINT

TO HANDLER

$1SET CCR BITS<3:2> » O,1(FORCE CACHE
sWRITE TEST LOCATION WITH PATTERN 2

iWRITES MEMORY WITH ONES,

CACHE STILL ZEROS

sCLEAR CCR BIT7 3 (CLZIAR FORCE MISS)
tAND SET PARITY ABORTS
tREAD TEST ADDRESS (SHOUWLD READ ZEROS

tCOMPARE RECEIVED DATA TO PATTERN |
1 IF DATAS NOT EQUAL THEN
tALL ERRORS TO TRAP TO EMT
tUNIQUE ERROR NUMBER
t ADDRESS OF ERROR MESSAGE

MISS)

VECTOR

IN CACHE

GLOBAL ARE A%
KDJ11A,MAC

h)PC)OCDNS:U

[ XX
nNdw

o "
o

pn 1t

s oo

s g

::::rowunnva
(VL LV X
17§71

1133
1134

1146

1147

1148
1149
1150

1151
1152
1153
1154

1155
1156
1157
1158
1159
1160
1161
1162
1163
1164
1165
1166
1167
1168
1169
1170
1171
1172
1173
1174
1175
1176
1177
1178
1179
1180
1181
1182
1183
1184
1185
1186
1187
1188

MALYL]

O3-APR 84

002472
002500
002504
002510
002512
002514
002516

052767
013701
020127
001403
104000
000006
001325

002520
002524
002530
002534
002540
002544

005067
005037
005037
005037
005037
000167

02550
002550
002552
002554

104000
000007
001325

son(igsz)

G+

000010
001122
177777

175246

11:

APR g

175222

?ESTP98£CEBHISS FUNCTION

10:

1$:

2%:

001122

177744
177766

001116
000006

FMPARR:

002556

8IS
MOV
cMp
BEQ
ERROR
.WORD
.WORD

6
ERRMSG

CLR
CLR
CLR
CLR
CLR
JMP

CCR
84TSTLOC
SeMSER
80CPEREG
80SOF TER
TST4

ERROR
.WORD
.WORD

SEQ 1008

tCACHE SYSTEM ERROR

oBITO03, CCR
807TSTLOC,R1

R1,

1SET CCR BITS <3:2>

1READ

17771717

TEST

1,0(FORCE CACHE MISS)

LOCATION (SHOUWLD READ

ONES

sCOMPARE RECEIVED DATA TQ RATTERN 2

s IF DATAS NOT EQUAL
sALL ERRORS TO TRAP

THEN
TO EMT

IN MEMORY
)

VECTOR

tUNIQUE ERROR NUMBER
sADDRESS OF ERROR MESSAGE
sCACHE SYSTEM ERROR

tCLEAR CCR BITS<3:2>

tWRITE

TEST

ADDRESS

tCLEAR THE MEM SYS ERROR REG
1CLEAR THE CPU ERROR REGISTER
tCLEAR THE SOFT ERROR COUNT

;3JUMP OVER DATA
s 7O NEXT TEST
tPARITY

TABLES OR SUBROUTINES

ERROR ON FORCE MISS

sALL ERRORS TO TRAP T0O EMT VECTOR
tUNIQUE ERROR NUMBER
sADDRESS OF ERROR MESSAGE

ERRMSG

CTST4:
1508808000400 00008

;oTEST 4

1000400480800 0080000000800000080480088000000008040006

TEST HIT MISS REGISTER

15000000000800000000004000000000000004000000005000080000400000004800

sHIT/MISS REGISTER

TEST PART

THIS

TEST

WILL

VERIFY

THAT

THE HIT/MISS

tREGISTER CORRECTLY LOGS HITS AND MISSES.FIRST WRITE A TEST ADDRESS WITH
iBI7S<¢3:2> CLEARED TO ALLOCATE CACHE AND SET A KNOWN DATA PATTERN INTO
sTHE CACHE. THEN SET BIT<2> AND REWRITE THE SAME ADDRESS WITH NEW DATA.
tNEXT CLEAR CCR BITS<3:2> AND READ THE TEST ADDRESS, THE HIT/MISS REGISTER
:SHOULD HAVE LOGGED A HIT. FINALLY READ THE TEST ADDRESS PLUS 20000(8) THE

sMIT/MISS REGISTER SHOULD HAVE LOGGED A MISS.

:BGNTST

tWRITE TEST ADORESS WITH PATTERN 1
$SET CCR BYTS5¢3:2>» = 0,1
sWRITE TEST ADDRESS WITH PATTERN 2
sCLEAR CCR BIT«3»
iREAD TEST ADDRESS
s IF HIT/MISS REGISTER BIT 3 NOT SET
i,
ERROR IN CACHE SYSTEM
:ENDIF
sREAD TEST ADDRESS « 20000(8)

;sIF MIT/MISS REGISTER BIT 3 SET
i,
ERROR IN CACHE SYSTEM

THEN

sENDIF
sENDTST
H

002556
002556
002562
002570

1500000884800 400038800040408000003004800008000080000000000000000000

005267
012737
005037

176222
002702

001122

1574

000114

INC

MOV

CLR

$TESTN

s INCREMENT TEST NUMBER

80TSTLNC

WRITE

OHMPARR, 80114

1SETUP PARITY VECTOR TC POINT

TO HANDLER

TEST LOCATION WITH PATTERN

GLOBAL

AREAS

KDJL1A .MAC

1189
1190
1191
1192
1193
1194
1195
1196
1197
1198
1199
1200
1201
1202
1203
1204
1205
1206
1207
1208
1209
1210
1211
1212
1213
1214
1215
1216
1217
1218
1219
1220
1221

1222
1223
1224
1225
1226
1227
1228
1229
1230
1231
1232
1233
1234
1235
1236
1237
1238
1239
1240
1241
1242
1243
1244

MACY11

O3-APR 84

30A(10S52)

11:36

APR-84
14

10:38
PAGE 29
TEST HIT MISS REGISTER

SEQ N02%

002574
002602

012767
012737

000004
177777

175144
001122

MOV
MOV

e8I102, CCR
@177777,80TSTLOC

002610

012767

000200

175130

MOV

0200,

002616
002622
002630
002632
002634
002636

013701
032737
001003
104000
000010
001325

001122
000010

177752

MOV

801STLOC,R1

002640
002644
002652

013701
032737
001403
104000
000011
001325

021122
000010

005037
005037
005037
000167

177744
177766
001116

002654

002656

002660

002662
002662
002666
002672

002676

177752

1s:

2%:

tMEMORY

CCR

-1,

tREAD

TEST

10
ERRMSG

s ADDRESS OF

MOV

80TSTLOC.8192.
,R1

sREAD

081703,
1s

CACHE STILL ZEROD

$CLEAR CCR BIT 3 (CLEAR FORCE “MISS)
s AND SET PARITY ABORTS

8IT
BNE
ERROR
. WORD
. WORD

@OHITMIS

ADDRESS

(SHOW
D BE CACHE

z%:E:IT/HISS REGISTER BIT
3

sALL

ERRORS

TRAP

tUNIQUE ERROR NUMBER

81T
BEQ
ERROR
.WORD
.WORD

11
ERRMSG

CLR
CLR
CLR

BMSER
80CPEREG
80SOFTER

JMP

000006

tWRITE CACHE ANL MEMORY WITH ZEROS
iSEYT CCR BITS¢3:2> = 0,1(FORCE CACHE MISS)
sWRITE TEST LOCATION WITH PATTERN 2

OBITO3,
2%

SOHITMIS

TO EMT

HIT)

VECTOR

ERROR MESSAGE

1 CACHE SYSTEM ERROR

TEST LOCATION

20000(8)

s IF HIT/MISS REGISTER BIT
: THEN
sALL ERRORS

3 NOT SET

TRAP

3 SET

TO EMT

SHOWD MISS

VECTOR

sUNIQUE ERROR NUMBER
; ADDRESS OF ERROR MESSAGE
;CACHE SYSTEM ZRROR

:CLEAR THE MEM SYS ERROR REG
:CLEAR THE CPU ERROR REGISTER
;:CLEAR THE SOFT ERROR COUNT

1ST5

3 JUMP OVER DATA TABLES OR SUBROUTINES

sTO NEXT TEST

002702
002702
002704
02706

002710

104000
000012
001325

HMPARR
:

ERROR
. WORD
.WORD

sPARITY

ERROR DURING HMIT/MISS REGISTER

tALL ERRORS TO TRAP TQ EMT VECTOR
tUNIQUE ERROR NUMBER
:ADDRESS OF ERROR MESSAGE

12
ERRMSG

CTSTS:
5380000080000 00000000 00000000008 00000008000000046400000000800408008

1oTEST

TEST HIT MISS REGISTER BITS

$10680080000600800000000000400040840000040000000008000000000000004

sHIT/MISS REGISTER TEST

THIS

TEST WILL

VERIFY

;REGISTER CORRECTLY LOGS CACHE HITS AND MISSES.

s THAT EACH BIT OF

THE REGISTER

sFLOATING A ZERO THROUGH
3BY EXECUTING A TST 80HM
+REGISTER) AT SUCCESSIVE
:OF THE 1/0 PAGE ADDRESS
$MISS TO BE RECORDED.

IS UNIQUE.

THAT

THIS WILL BE DONE BY

A FIELD OF ONES, THE ROTATING WILL BE DONE
(WHERE MM IS THE ADDRESS OF THE HIT/MISS
POSITIONS IN A SET OF FOUR NOPS., THE READ
OF THE MIT/MISS REGISTER SHOULD CAUSE A

sBGNTST
s INITIALIZE LOOP INDICATOR
s INITIALIZE EXPECTED DATA
;00 UNTIL LOOP INDICATOR = SEVEN

i.
P.
i
N

PUT BACKGROUND DATA INTO EXECUTION BUFFER
PUT TST INSTRUCTION INTO TEST LOCATION
JUMP TO EXECUTE BUFFER
IF EXPECTED DATA NE RECEIVED DATA THEN
ERROR

THE HIT/MISS

IT WILL ALSO VERIFY

IN CACHE

SYSTEM

TEST

GLOBAL ARE AS
KDJ11A.MAC

MACY11

O3-APR 84

30A(1052)

11:36

APR 84

1245
1246
1247
1248
1249
1250
1251
1252
1253
1254
1255

10:38

.
A
s ENDODO
sEXIT

PAGE

5EQ 0030

TEST HIT MISS REGISTER BITS

ENDIF

INCREMENT LOOP INDICATOR
UPDATE EXPECTED DATA

TST

;BACKGROUND DATA:
H
H
H
H
H
:

1256
1257
1258

1259
1260
1261
1262
1263
1264
1265
1266
1267
1268
1269
1270
1271
1272
1273
1274
1275
1276
1277
1278
1279
1280
1281
1282
1283
1284
1285
1286
1287
1288
1289
1290
1291
1292
1293
1294
1295
1296
1297
1298
1299
1300

NOP
NOP
NOP
NOP
MOV
RTS

sENDTST

80HM,RS
PC

3 0 84820 808 400880840800000
00800040000
04800
00 00400
0400004000040048
0

002710
002710
002714
002722
002726
002732
002736
002744
002746
002752
002756
002762
002764
002766
002772
002774
003000
003002
003004
003010
003012
003012
003020
003024
003026
003030

000013
001325

003032
003032
003036
003042
003046

005037
005037
005037
000167

005267
012737
005067
012703
012704
026727
001432
012705
012701
012702
012122
077502
005763
005723
004767
022405
001003
005267
000752
012737
004767
104000

176070
001630
176132
020000
003070
176116

TSTS:

000114

000007

000007
003052
001122

1$:

2%:

001122
176122

176050
002714
176614

177744
177766
001116
000034

38
001120

ENDHRT
;

INC
MOV
CLR
MOV
MOV
ce
BEQ
MOV
MOV
MOV
MOV
S08
TST
ST
JSR
cP
BNE
INC
B8R

$TESTN
#RAMPAR, 30114
LOOPIN
#20000,R3
QEXPTBL
R4
LOOPIN, &7
ENDHRT
07,.RS
OBACDAT ,R1
@TSTLOC ,R2
(R13+,
(R2).
RS,
2s
TSTLOC(R3)
(R3).
PC,
TSTLOC
(R8).,
RS
3¢
LOOPIN
is

MOV
JSR
ERROR

#7S75.4,80S0F
TRE
PC,APTSFT

.WORD
. WMORD

13
ERRMSG

CLR
CLR
CLR
JMP

SOMSER
CPEREG
JASOF TER
1576

s INCREMENT

s INITIALIZE LOOP INDICATOR
:LOAD R3 WITH 1ST ADDR IN 2ND BANK OF MEM,

;GET ADDRESS OF EXPECTED DATA TABLE

;00 UNTIL LOOP INDICATOR EQUALS 7
s THEN EXIT
tLOAD R2 WITH 7

sPUT BACKGROUND DATA

000240
000240
000240
000240
013705
000207

BACDAT:

177752

,WORD
. WORD
. WORD
. WORD
MOV
RTS

NOP
NOP
NOP
NOP
SOHITMIS,
RS
PC

INTO

sEXECUTION BUFFER

sLOOP FOR SEVEN WORDS

sSETUP MISS ON FETCH OF

:INC R3 BY 2

INSTRUCTION

:GO EXECUTE TEST CODE
sIF EXPECTED DATA NOT EQUAL
sRECEIVED DATA THEN
: INCREMENT LOOP COUNTER

:MOVE RETRY ADDRESS TO SOFT RETURN
:GO TO SOFT ERROR SUBROUTINE

sALL ERRORS

TO TRAP

TO EMT

VECTOR

tUNIGQUE ERROR NUMBER
sADDRESS OF ERROR MESSAGE
sCACHE S¥STEM ERROR

s:CLEAR THE MEM SYS ERROR REG
tCLEAR THE CPU ERROR REGISTER

sCLEAR THE SOFT ERROR COUNT
3 JUMP OVER DATA TABLES OR SUBROUTINES

;TO NEXT

003052
003054
003056
003060
003062
003066

TEST NUMBER

:SET UP VECTOR FOR UNEXPECTED PARITY ERROR

TEST

§SAVE CONTENTS OF

HIT/MISS REGISTER

GLOBAL

AREAS

KDJ11A
. MAC

1301

1302

1303

1304
1305
1306
1307
1308
1309
1310
1311
1312
1313
1314
1315
1316
1317
1318
1319
1320
1321
1322
1323
1324
1325
1326
1327
1328
1329
1330
1331
1332
1333
1334
1335
1336
1337
1338
1339

1340

1341
1342
1343
1344
1345
1346
1347
1348
1349
1350
1351
1352
1353
1354
135S
1356

003070
003072

003074

003076
003100
003102
003104

003106

MACY11

O3-APR 84
000077
000037

30A( igSZ)

11:

I3
APR‘gd

10:¥25T

EXPTBL:

pfi§§ g}ss REGISTER BITS

.WORD
.WORD

000057

LWMORD

000067
000073
000075
000076

.WORD
. WORD
. WORD
.WORD

SEQ 0031

77
37

67
73
75
76

CTST6:
F0AKRARASL00ALA00ARARAASA0R004000000000000000

;+TEST

00000000000004000

TEST

BYTE

ALLOCATION OF

CACHE

300R000AAAAALLALANELA000400004000000008005800400400400000004

:BYTE ALLOCATION TEST- THIS TEST WILL VERIFY THAT THE CACHE SYSTEM CORRECTLY
¢HANDLES BYTE ACCESSES. THE TEST WILL FIRST CHECK THAT A WRITE ACCESS WHICH
:IS A MISS DOES NOV UPDATE THE CACHE. THIS WILL BE DONE BY FIRST ASSURRING
iA MISS AT A TEST LOCATION. THEN A WRITE BYTE ACCESS WILL BE DONE. FINALLY
:THE LOCATION WILL BE READ. THE WRITE BYTE SHOULD NOT HAVE ALLOCATED THE
;ADDRESS. NEXT THE TEST WILL VERIFY THAT IF A WRITE BYTE ACCESS IS A MIT

:THAT

THE CACHE LOCATION IS UPDATED.

THE

iWITH A PATTERN TO ALLOCATE THE ADDRESS.

:JO THE HIGH BYTE OF

THE

TEST LOCATION.

TEST WILL FIRST WRITE

TEST LOCATION

THEN A SECOND PATTERN WILL BE WRITTEN

THE

TEST LOCATION WILL

THEN BE READ.

:IF THE HIGH BYTE OF THE TEST LOCATION IS EQUAL TO THE SECOND PATTERN THEN THE
;kggg;ggg WAS UPDATED. THE SECOND TEST WILL BE REPEATED TO TEST LOW BYTE

sBGNTST
sSAVE VECTOR 114
sLET VECTOR 114 POINT YO BYTE PARITY ROUTINE
sSET PARLTY ABORT BIT

IN CACHE CONTROL REGISTER

:READ TEST LOCATION + 4K

sWRITE LOW BYTE

TO TEST ADDRESS

sREAD LOW BYTE OF TEST ADDRESS
; IF HIT/MISS REGISTER BIT 3 SET THEN
.
ERROR IN CACHE SYSTEM
sENCIF
sWRITE PATTERN 1 TO TEST LOCATION

:WRITE BYTE PATTERN 2

TEST LOCATION»1

sIF BIT1 NOTSETIN MIT/MISS REGISTER THEN
:

ERROR IN CACHE SYSTEM

;.
;.
o

READ TEST LOCATION
IF RECEIVED DATA NOT EQUAL TO EXPECTED DATA THEN
ERROR IN CACHE SYSTEM

sELSE

sWRITE PATTERN 1 TO TEST LOCATION
:WRITE BYTE PATTERN 2 TO TEST LOCATION LOW BYTE
:IF BIT1 NOTSETIN MIT/MISS REGISTER THEN
:é SE
ERROR IN CACHE SYSTEM
sEL

i
e

READ TEST LOCATION
If RECIEVED DATA NOT EQUAL

HA
_—
;END

ERROR

IN CACHE

TO EXPECTED DATA
SYSTEM

THEN

G L OBAL ARE AS
K 0 J11A
. MAC

1357
1358
1359
1360
1361
1362
1363
1364
1365
1366
1267
1368
1369

1370

1371
1372
1373
1374
1375
1376
1377
1378
1379
1380
1381
1382
1383
1384
1385
138¢
1387
1388
1389
1390
1391
1392
1393
1394
1395
1396
1397
1398
1399

1400

1401
1402
1403
1404
1405
1406
1407
1408
1409
1410
1411
1412

MACY11l

03 APR B84

30A(1052)

11:36

APR

84
T6

10:38
PAGE 3
TEST BYTE

sLLOCATION OF CACHE

SEQ 0032

$+CLEAR CACHE CONTROL REGISTER

;RESTORE

SEXIT

VECTOR

TST

114

;BYTE PARITY ROUTINE:
:

sENDTST

003106
003106
003112
003120
003126

003132
003136
003142
003150
003152
003160
003164
003166
003170

SAVE MSER
RE TURN

H ;““.“““.‘“‘.““.0“‘.“.““t“‘..“““““‘“.

005267
012737
012767
005767

105067
105767
032737
001410
012737
004767
104000

175672
003374

000200
015770

175764
175760

000114
174620

000010

177752

003112
176454

001120

005067
152737
032767
001011

000015
001325

003234
003236
003244
003246
003254
003260
003262
003264

000414
022737
001410
012737
004767
104000
000016
001325

003266
003272
003300
003306

005067
152737
032767
001011

012737
004767

104000

003310
003316
003322
003324
003326

012737
004767
104000
000017
001325

003330
003332

000407
022737

175724
000377
000010
003112
176412

177400
003112
176360

175630
000377
000010
003112
176316

000377

001123
174540

1%:

es:

TSTLOC
TSTLOC
08ITO3,

MOV
JSR
ERROR
- WORD
.WORD

0TST6+4,80SOFTRE
PC.APTSFT

CLR
81S8
BIT

TSTLOC
0377,
#BITO3,

B8R

B8EQ

MOV
JSR
ERROR
. WORD
.WORD

3s:

001120

001122

CLRB
1578
8IT

MOV
JSR
ERROR
.WORD
.WORD

001120

001122
174444

$TESTN
OBYPARR, 80114
08IT07, CCR
TSTLOC.8192.

BNE

001120

001122

INC
MOV
MOV
TST

B8EQ

000014
001325

003172
003176
0032924
003212
003214
003222
003226
003230
003232

“.‘.“t‘

TSTE:

4 :

CLR

sON NEXT ACCESS OF
sWRITE LOW BYTE OF

FOHITMIS

TRAP

TO EMT

VECTOR

sUNIQUE ERROR NUMBER
;sADDRESS OF ERROR MESSAGE
;CACHE SYSTEM ERROR

80TSTLOC+1
HITMIS

4T1S76+4,30S0F
TRE
PC.APTSFT

sWRITE PATTERN 1
sWRITE PATTERN 2

TO TEST LOCATION
TO HIGH BYTE

:%F BIT3 NOTSETIN HIT/MISS REGISTER
;s

THEN

15
ERRMSG

;MOVE RETRY ADDRESS TO SOFT RETURN
;GO TO SOFT ERROR SUBROUTINE
sALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
;:ADDRESS OF ERROR MESSAGE

sEL

sPATTERN 2

ELSE

€177400,84TSTLOC

@1ST6+4,8050F
TRE
PC,APTSFT
16
ERRMSG
TSTLOC

8ISB
BIY
BNE

2377,
OBITO03,
43

MOV
JSR
ERROR
. WORD
.WORD

#75716+4,8050
TRE
F
PC,APTSFT

B8R

cMP

TSTLOC
TEST LOCATION

sREAD LOW BYTE OF TEST LOCATION
:IF BIT3 OF HIT/MISS REGISTER NOT SET
s THEN BRANCH
:MOVE RETRY ADDRESS TO SOFT RETURN
sGO TO SOFT ERROR SUBROUTINE

sALL ERRORS

14
ERRMSG

s INCREMENT TEST NUMBER
sLET VECTOR 114 POINT TO ABORT ROUTINE
:SET PARITY ABORT BIT IN CCR
sREAD TEST LOCATION + 4K TO CAUSE MISS

807T57L0C
HITMIS

SYSTEM ERROR

+IF TEST LOCATION NOT EQUAL TO
THEN

;MOVE RETRY ADDRESS TO SOFT RETURN
;GO TO SOFT ERROR SUBROUTINE
sALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
;ADDRESS OF ERROR MESSAGE
sCACHE SYSTEM ERROR

sWRITE PATTERN 1

TO TEST LOCATION

:WRITE PATTERN 2 TO LOW BYTE
;+IF BITO3 SET IN HIT/MISS REGISTER

s THEN BRANCH;

17
ERRMSG
0377,

;CACHE

:ELSE

WE GOT

A HWIT,

:MOVE RETRY

ADDRESS

TO SOFT RETURN

;ALL ERRORS

TO EMY

;GO TO SOFT ERROR SUBROUTINE
TRAP

VECTOR

tUNIQUE ERROR NUMBER
; ADDRESS OF ERROR MESSAGE
;CACHE SYSTEM ERROR

QeTSTLOC

:IF

TEST LOCATION NOT EQUAL TO

GLOBAL AREAS
KDJ11A
. MAC

1413
1414
1415
1416
1417
1418
1419
1420
1421
1422
1423
1424
1425
1426
1427
1428
1429
1430
1431
1432
1433
1434
1435
1436
1437
1438
1439
1440
1441
1442
1443
1444
1445
1446
1447
1448
1449

1450
1451
1452
1453
1454

1455
1456
1457
1458
1459
1460
1461
1462
1463
1464
1465
1466

1467
1468

MACY11l

03-APR 84 11:&6

003340
003342
003344
003346

001403
104000
000020
001325

003350
003354
003360
003364
003370

005067

003374
003374
003376
003400

003402

H3
30A(1052)

005037
005037
005037
000i67

104000
000021
001325

174372

177744
177766
001116
000006

APR

10:38

PAGE

TEST BYTE ALLOCATION NF CACHE

S$:

5€@ 0033

BEQ
ERROR
.WORD
.WORD

20
ERRMSG

{PATTERN 2 THEN
;ALL ERRORS TO TRAP TQ EMT VECTOR
tUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE

CLR

CCR

1CLEAR CCR BEFORE EXIT

CLR
CLR

CLR
JHP

;CACHE SYSTEM ERROR

SMSER
¢CPEREG

iCLEAR
:CLEAR

84SOFTER

1CLEAR THE SOFT ERROR COUNT

TST7

1 JUMP OVER DATA TABLES OR SUBROUTINES

: TO NEXT TEST

BYPARR:

ERROR
LWORD
.WORD

THE MEM SYS ERROR REG
THE CPU ERROR REGISTER

;PARITY

ERROR DURING BYTE

sALL ERRORS TO TRAP TO EMT
sUNIQUE ERROR NUMBER
; ADDRESS OF ERROR MESSAGE

21
ERRMSG

ALLOCATION

VECTOR

TEST

CT1577:
$I8804
8000880000
000
040 8 000000004
880
0000
080
0RA40R04RRN
80
ALRRSS

;oTEST

TEST

CACHE

BYPASS

{MMU)

P304 00448080000 0000000000400 RRRRRRAREARRRRAR0040AA0EE000044

:PDR BIT15 (3YPASS)

TEST

THIS

TEST WILL

VERIFY

THAT WHEN BIT<15>

IS SET

:IN A PDR AND AN ACCESS IS MADE TO A LOCATION MAPPED BY THE SELECTED PDR

: THAT WOULD NORMALLY CAUSE

A CACHE ACCESS,

THE CACHE

IS BYPASSED

(I.E.

THE

sCACHE LOCATION IS INVALIDATED AND A MAIN MEMORY IS READ. THIS WILL BE DONE
iBY FIRST WRITING A TEST LOCATION WITH A KNOWN PATTERN TO ALLOCATE THE ADDRESS.
:THEN THE LOCATION WILL BE WRITTEN AGAIN WITH THE MMU ENABLED AND BIT <15> SET
:IN THE CONTROLING POR WITM A NEW PATTERN, THE LOCATION WILL THEN BE READ
;AND A MISS SHOULD BE LOGGED IN THE HIT/MISS REGISTER. THIS READ WILL ALSO
:BRING VALID DATA INTO CACHE FROM MEMORY. THE MMU WILL AGAIN BE ENABLED

iWITH BIT

<15>

SET AND A READ CYCLE DONE.

THIS

SHOULD

INVALIDATE

THE CACHE.

sNEXT THE MMU WILL BE DISABLED AND THE LOCATION READ FOR A THIRD TIME.
;WILL BE DONE WITH BIT<15>

STILL

SET.

A MISS

SHOULD ALSQ BE LOGGED.

THIS

LASTLY

:8IT<15> WILL BE CLEARED AND THE MMU ENABLED AND THE LOCATION AGAIN READ.
;THIS TIME A CACHE HIT SHOUW.D BE LOGGED.
sBGNTST

;SETUP MMU REGISTERS

sWRITE

TEST LOCATION WITH PATTERN

sSET BIT<1S> IN PDR FOR TEST LOCATION
;ENABLE MU
sWRITE TEST LOCATION WITH PATTERN 2
iDISABLE MMU AND CLEAR BIT<15> IN PDR
;READ TEST LOCATION
;sIF HIT/MISS REGISTER BIT<1>

SET

THEN

i
ERROR IN CACHE SYSTEM
sENDIF
;SET BIT<15> IN PDR FOR TEST LOCATION
;ENABLE MMU
;READ TEST LOCATION (SHOULD INVALIDATE CACHE)
;DISABLE MMU
sREAD TEST LOCATION
;IF HIT/MISS REGISTER BIT<i> SET THEN

GLOBAL ARERS
KDJ11A.MAC

4ACv11

03-APR 84

3CA(1052)

11:36

APR 84
17

1469
1470
1471
1472

10:38

;ENDIF

TEST

PAGE

CACHE

BYPASS

ERROR IN CACHE SYSTEM

;CLEAR BIT<15> IN PDR

; TURN ON MMU

1473

sREAD TEST LOCATION

1474
1475

s IF HIT/MISS REGISTER BIT<1> NOT

1477

s TURN OFF MMU

1476

1478
1479
1480
1481
1482
1483
1484
1485
1486
1487
1488
1489
1490
1491
1492
1493
1494
1495
1496
1497
1498
1499
1500
1501
1502
1503
1504
1505
1506
1507
1508
1509
1510
1511
1512
1513
1514
1515
1516
1517
1518
1519
1520
1521
1522
1523

1524

5€Q 0034

(MMU)

sENDIF

ERROR

IN CACHE

SYSTFM

SET

THEN

sENDTST

10 8408 82042

003402
003402
003406
003414
003420
003424
003432
003440
003446
003452
003460
003464
003472
003474
003502
003506
003510
003512

005267
012737
004767
005037
052767
052737
012737
005067
042767
013701
032767
001410
012737
004767
104000
000022
001325

003514
003522
003530
003534
003542
003546
003552
003560
003562
003570
003574
003576
003600

052767
052737
005767
042767
005067
005737
032767
001410
012737
004767
104000
000023
001325

100000
000001
175366
100000
174024
001122
000010

003602
003610

052737
005737

000001
001122

177572

003614
003622
003624
003630
003636
003642
003644

032767
001012
005067
012737
004767
104000
000024

000010

174130

175376

001630

175772
001122
100000
000001
177777
174120
100000
001122
000010
003406

176132

003406
176044

173742
003406
175776

000 0808048000000 088888080800 8000840008400 0000008400

TS717:

INC
MOV

000114

JSR
CLR
BIS
81S
MOV
CLR
8IC
MOV
8IT
BEQ
MOV
JSR
ERROR
.WORD
. WORD

166646
177572
001122
166620

174260
001120

166556
177572

28:

166536

174172
001120

001120

3s:

8IS
8IS
TST
8IC
CLR
TST
44
-3
BEQ
MOV
JSR
ERROR
.WORD
. WORD

BIS

$TESTN
ORAMPAR, 80114
PC,
INITMM
80TSTLOC
981715, KIPDRO
481T00,80SRO
0177777 ,86TSTLOC
SRO

BIT15, KIPDRO

86TSTLOC,R1

gBITOS.

HITMIS

$
9TST7+4,80S0F
TRE
PC.APTSFT

22
ERRMSG

0BIT1S, KIPDRO
4B81I700,80SR0

TSTLOC
IT15, KIPDRO
SRO
S80TSTLOC

§21T03.

HITHIS

@1ST7.4,80S0F
TRE
PC,APTSFTY

23
ERRMSG
#BI7100,80SR0

1ST

80TSTLOC

BIT
BNE
CLR
MOV
JSR

081703,

SRO
2TST7+4,84S0F
TRE
PC,APTSFT

.WORD

ERROR

HITMIS

; INCREMENT TEST NUMBER
;SET UP FOR UNEXPECTED PARITY ERROR

;sSETUP MEMORY MANAGEMEMT REGISTERS
;WRITE

TEST LOCATIOM WITH PATTERN

;SET BIT1S IN PDR FOR TEST LOCATION
s TURN ON MEMORY MAJAGEMENT

sWRITE TEST LOCATIUN WITH PATTERN 2
: TURN OFF MEMORY MANAGEMENT
sCLEAR BIT1S IN PDOR FOR TEST LOCATION
;READ TEST LOCATION
:%:E:IT/HISS REGISTER BIT 3 SET
:MOVE RETRY ADDRESS TO SOFT RETURN
;G0 TO SOFT ERROR SUBROUTINE
sALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
;ADDRESS OF ERROR MESSAGE
;CACHE SYSTEM ERROR
3SET BIT1S IN PDR FOR TEST LOCATION
s TURN ON MEMORY MANAGEMENT
sREAD TEST LOCATION, BYPASS CACHE
; TURN OFF CACHE BYPASS ON KERNEL PAGE 0.
s TURN OFF My

;READ TEST LOCATION-SHOMLD BE CACHE MISS
3¥:E:IT/HISS REGISTER BIT 3 SET

s+MOVE RETRY

ADDRESS TO SOFT RETURN

sALL ERRORS

TO TRAP

;GO TO SOFT ERROR SUBROUTINE

TO EMT VECTOR

sUNIQUE ERROR NUMBER
sADDRESS OF ERROR MESSAGE
;CACHE SYSTEM ERROR
s TURN ON
MORY MANAGEMENT

+READ TEST LOCATION ONE MORE TIME.
{PREVIOUS READ SHOWLD HAVE ALLOCATED

3CACHE SO WE'RE EXPECTING A CACHE HIT
l%FE:IT/HISS REGISTER BIT 3 NO/ SET
s

s TURN OFF MMU BEFORE ERROR ROUTINE.

1MOVE RETRY ADDRESS TO SOFT RETURN
:GO TO SOFT ERROR SUBROUTINE
;ALL

ERRORS

TRAP

sUNIQUE ERROR NUMBER

TO EMT

VECTOR

GLOBAL AREAS
KDJ11A,MAC

1525
1526
1527
1528

1529
1530
1531
1532

1533
1534
1535
1536
1537
1538
1539
1540
1541
1542
1543
1544
1545
1546
1547
1548
1549
1550
1551
1552
1553
1554
1555
1556
1557
1558
1559
1560
1561
1562
1563
1564
1565
1566
1567
1568
1569
1570
1571
1572
1573
1574
1575
1576
1577
1578
1579
1580

MACY11

O03-APR 84

003646

001325

003650
003656
003662
003666
003672

042767
005037
005037
005037
000167

30A(.052)

11:36

000001

177744
177766
001116

APR;?d

173714

10:38
PAGE 35
TEST CACHE BYPASS

4s3:

ERRMSG

8IC
CLR
CLR

#8IT00, SRO
SOMSER
84CPEREG

JMP

SEQ

(MMU)

.WORD

CLR

003676

J3
+ADDRESS OF ERROR MESSAGE

sCACHE SYSTEM ERROR
;sTURN OFF MMy
sCLEAR THE MEM SYS ERROR REG
s:CLEAR THE CPU ERROR REGISTER

80SOFTER

sCLEAR THE SOFT ERROR COUNT

TST10

;JUMP OVER DATA TABLES OR SUBROUTINES
:TO NEXT TEST

CTsT10:
FitRARALA4A0040
00008800000
40008
00 40040080000
004R0
00800000000
08
0000

s+TEST 10

TEST CACHE FLUSH

§I088880000 0400000408000 0048000 0000000800400 00000008400000004004

;FLUSH CACHE TEST - THIS TEST WILL VERIFY THAT WHEN CCR BIT<8> IS
:SET, THE ENTIRE CACHE IS INVALIDATED. FIRST 8K BYTES OF ADDRESSES
iWILL BE READ TO ALLOCATE CACHE. THEN THE CACHE WILL BE FLUSHED.
;THE SAME SET OF ADDRESS WILL THEN BE READ AND THE HIT/MISS REGISTER
;CHECKED AFTER EACH READ FOR A MISS TO BE LOGGED.

sBGNTST
:GET FIRST ADDRESS OF 8KB BUFFER
sINITIALIZE LOOP COUNTER TO 4KWORD COUNT
;D0 UNTIL LOOP COUNTER = O
i

READ 3ADDRESS:

READ BADDRESS+
IF HIT/MISS REGISTER BIT<1>

: ENDDO
sGET FIRST ADDRESS OF 8KB BUFFER
s INITIALIZE LOOP COUNTER TO 4KWORD COUNT
s INITIALIZE MISS COUNT
sFLUSH CACHE
100 UNTIL LOOP COUNTER = 0O
.

ENDIF

DECREMENT MISS COUNT

s IF MISS COUNT NOT EQUAL TO 4096.
:

;ENDIF
;ENDTST

ERROR IN CACHE SYSTEM

SET

THEN

003676
003676
003702
003706
003712
003716
003722
003730
003732
003734
003740
003744
003750
003756

1088808048008

005267

004767
005067
012701
012702
032737
005721
077202
012701
012702
012703
012767
005721

175102
175504
166442
140000
010000

000001

140000
010000
010000
000400

TST10:

INC
JSR

$TESTN
PC,

MOV
MOV
8IS
TST

#140000,R1
€4096., R2
#8IT00,84SR0
(R1).

:GET ADDRESS OF 8K BYTE BWFFER
s INIT LOOP COUNTER TO 4K WORD COUNT
;ENABLE MU
sREAD ADDRESS TO ALLOCATE CACHE

2140000,R1
#4096., R2
€4096., R3
2400,
CCR

sGET ADDRESS OF 8K BYTE BUFFER
sINIT LOOP COUNTER TO 4K WORD COUNT
sPRE -LOAD MISS COUNT WITH 4096,
sFLUSH CACHE

CLR

177572

173770

1%:

2%:

0000 8800008000080 000000000004000080804000000400080000

KIPARG

sSo8

R2,

TST

(R1).

MOV
MOV
MOV
MOV

INITMM

s INCREMENT TEST NUMBER
sINITIALIZE MMU

sLET PAR6 POINT TO LOW 4K

00 UNTIL ALL LOCATIONS ALLOCATED

;READ

ADDRESS

0025,

GLOBAL

ARE AS

30A(1052)

003760

032737

000010

177752

003766

001401

003770
003772

005303
077207

KDJ11A, MAC

1581
1582
1583
1584
1585
1586
1587
1588
1589
1590
1591
1592
1593
1594
1595
1596
1597
1598
1599
1600
1601
1602
1603
1604

1605
1606
1607
1608
1609
1610
1611
1612
1613
1614
1615
1616
1617
1618
1619
1620
1621
1622
1623
1624
1625
1626
1627
1628
1629

1630
1631
1632
1633
1634
1635
1636

IK3

MACY11

O3-APR 84

11:36

APR 84

Ti0

10:38

PAGE

TEST CACHE

3%:

SEQ 0036

FLUSH

BIT

#BITO3, AHITHIS

BEQ

DEC
so8

R3
R2,

tSHOULDN'T GET HITS AT (R1)
+IF BITO3 IN HIT/MISS REG INDICATES A MISS
;s THEN

sBRANCH TO 3%
DON'T DECREMENT THE MISS COUNT
sELSE
1DECREMENT MISS COUNT IF WE GET A WIT

sLOOP UNTIL ENTIRE
tFALLING

003774
004000
004004

005067
022703
001410

173572
010000

CLR
cMP
BEQ

THROUGH

CACHE

SOB8

012737
004767
104000
000025
001325

003702
175620

004026
004032
004036
004042
004046

005037
005037
005037
005037
000167

177572
177744
177766
001116
000000

004052

001120

5%:

SRO
#4096.,
S

s TURN OFF

25
ERRMSG

CLR
CLR
CLR
CLR
JMP

84SRO
86MSER
80CPEREG
84SOF TER
TST11

@75710+4,30STRE
OF
PC.APTSFT

INDICATES

THAT

TO 4096.

NOT

ADDRESS

TO SOFT RETURN

;ALL ERRORS

TO EMT VECTOR

TRAP

sUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE
;CACHE SYSTEM ERROR
:TURN OFF MMU
;CLEAR THE MEM SYS ERROR REG
;CLEAR THE CPU ERROR REGISTER
s;CLEAR THE SOFT ERROR COUNT
;JUMP OVER DATA TABLES OR SUBROUTINES
:TO NEXT TEST

TEST UNCONDITIONAL CACHE BYPASS

FI00000084000000000808000800000000000000008808004000000000000000

sUNCONDITIONAL BYPASS TEST - THIS TEST WILL VERIFY THAT WHEN CCR
:8IT<9> IS SET, A MEMORY REFERENCE IS FORCED TO MAIN MEMORY. THIS
;WILL ALSO VERIFY THAT READ AND WRITE HIT
;LOCATIONS WHEN BYPASS IS SET,

1BGNTST

INVALIDATE

sREAD TEST LOCATIONS TO SETUP POSSIBILITY OF HIT
sSET CCR BIT<9>
TEST LOCATION

sIF HIT/MISS REGISTER BIT<1> NOT SETV THEN
ERROR

IN CACHE

SYSTEM

sWRITE SECOND TEST LOCATION

:IF HIT/MISS REGISTER BIT<1> NOT SET
ERROR IN CACHE SYSTEM

{ENDIF

sCLEAR CCR BIT«9>
sREAD FIRST LOCATION
:IF HIT/MISS REGISTER BIT<l> SET

{ENDIF
:READ

ERROR

IN CACHE

SYSTEM

SECOND LOCATION

s IF HIT/MISS REGISTER BIT<1> SET
P -

ERROR IN CACHE

SYSTEM

CACHE

:GO TO SOFT ERROR SUBROUTINE

FINMAAA0ALLARMM0AEE0ARAAEEARARARAALAERS0A00A0
000000 RAREL
R0

;ENDIF

ALL

sMOVE RETRY

CTST11:

sREAD FIRST

ALL

MMU

:IF MISS COUNT NOT EQUAL

;THEN

MOV
JSR
ERROR
.WORD
.WORD

$#TEST 11

THAT

;CACHE LOCATIONS MAVE BEEN CHECKED.

;LOCATIONS WERE FLUSHED
004006
004014
004020
004022
004024

CHECKED

INDICATES

THEN

THE CACHE

GLOLAL AREAS
KD. 11A.MAC

1637
1638
1639
1640
1641
1642
1643
1644
1645
1646
1647
1648
1649
1650
1651
1652
1653

1654
1655

1656
1657
1658
1659
1660
1661
1662
1663
1664
1665
1666
1667
1668
1669
1670
1671
1672
1673
1674
1675
1676
1677
1678
1679
1680
1681
1682
1683
1684
1685
1686
1687
1688
1689
1690
1691
1692

MACY11l

O3-APR 84

30A(1052)

11:36

04 APR-84
T11

10:38
PAGE 37
TEST UNCONDITIONAL

L3
SEQ 0017

CACHE BYPASS

;ENDIF
;ENDTST
;
150 08 4840

004052
004052
004056
004062
004066
004074
004100
004106
004110
004116
004122
004124
004126

005267
005737
005737
052767
005737
032767
001010
012737
004767
104000
000026
001325

174726
001122
001124
001000
001122
000010

005037
013703
012704
012702
042704
042702
020204
001004
032703
001014
000403
032703

001124

004056
175516

004130
004134
004140
004144
004150
004154
004160
004162
004164
004170
004172
004174
004200
004202
004202
004210
004214
004216
004220

012737
004767
104000
000027
001325

004056
175424

004222
004226
004234
004236
004244
004250
004252
004254

005737
032767
001410
012737
004767
104000
000030
001325

001122
000010

004256
004262
004266
004272
004276
004302
004306
004310
004312

005037
016703
012704
012702
042704
042702
020204
001004
032703

001124
173464
004262
001124

001010

TST1l:

173652

173644

18:

001120

2%:

177752
004134
001124
177701
177701

100$:

000010
000004

004056
175370

177701
177701

000010

101%;
001120

173516

102%:

3s:

001120

2004:

8400488880840 08480008880 040 008800400008 88000000000

004040

INC
TST
TST
8IS
TST
BIT
BNE
MOV
JSR
ERROR
.WORD
.WORD

CLR
MOV
MOV
MOV
BIC
8IC
cHP
B8NE
817
BNE
B8R
BIT
8NE
MOV
JSR
ERROR
.WORD
.WORD
TST

BIT
8EQ
MOV
JSR
ERROR
. WORD
. WORD
CLR
MOV

MOV
MOV
BIC
8IC

CMP
BNE
BIT

$TESTN
847TS5TLOC
86TSTLOC.2

#81T09, CCR
80TSTLOC
gBITOS. HITMIS

$
2TST11+4,80SOFTRE
PC.APTSFT

1+ INCREMENT TEST NUMBER
tALLOCATE FIRST TEST LOCATION
;ALLOCATE SECOND TEST LOCATION
1SET CCR BIT 9 (CACHE BYPASS)
$READ FIRST TEST LOCATION
‘¥:E:IT/"ISS REG. BIT 3 NOT

:MOVE RETRY ADDRESS YO SOFT RETURN
:GO TO SOFT ERROR SUBROUTINE
;ALL ERRORS TO TRAP TO €EMT VECTOR
sUNIQUE ERROR NUMBER

26
ERRMSG

sADDRESS OF

80TSTLOC.2
SOHITMIS
,R3

;WRITE SECOND LOCATION
;SAVE CONTENTS OF HIT MISS

€100¢ R4
@TSTLOC+2,R2
0177701,.R4
9177701 ,R2
R2,R4
1018

08ITO3, R3
3s
102¢
#81702,R3
34

#75T11+4,8050F
TRE
PC.APTSFT

27
ERRMSG

80TSTLOC
0?1T03. HITMIS

975711+4,86STRE
0F
PC,APTSFT

30
ERRMSG
B4TSTLOC2
HITMIS,R3
#200¢ ,R4
#TSTLOC.2,R2
2177701 ,R4
8177701 .R2
R2,R4
2014
481703, R3

SET

ERROR MESSAGE

s CACHE SYSTEM ERROR

:MOV ADDR OF MOV INST TO R4
:

:STRIP OFF UNNEEDED BITS

sARE THEY EQUAL?
;BRANCH IF NOT

;s IF HIT/MISS REG.

;s THEN

:IT WAS A MISS,

; TEST BITO2

BIT

3 NOT

SET

GO TO ERROR

;BRANCH IIF IT WAS A HIT
:MOVE RETRY ADDRESS TO SOFT RETURN
;GO TO SOFT ERROR SUBROUTINE
sALL ERRORS TO TRAP TO EMT VECTOR
;UNIGUE ERROR NUMBER
sADDRESS OF ERROR MESSAGE
sCACHE SYSTEM ERROR
;READ FIRST TEST LOCATION
:%:E:IT/HISS REG. BIT 3 SET

:MOVE RETRY ADDRESS TO SOFT RETURN
:GO TO SOFT ERROR SUBROUTINE
tALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
;ADDRESS OF ERROR MESSAGE
;CACHE SYSTEM ERROR
;WRITE SECOND LOCATION
$SAVE CONTENTS OF HIT MISS REG
i

1ARE THEY EQUAL

:BRANCH IF NOT
s IF HIT/MISS REG.

BIT

X NOT

SET

GLOBAL AREAS
KDJ11A,MAC

1693
1694

1695
1696
1697
1698
1699
1700
1701

1702
1703
1704
1705
1706
1707
1708
1709
1710
1711
1712
1713
1714
1715
1716
1717
1718
1719
1720
1721
1722
1723
1724

1725
1726
1727
1728
1729
1730

1731
1732
1733
1734
1735
1736
1737
1738
1739
1740
1741
1742
1743
1744
1745
1746
1747
1748

004316
004320
004322
004326
004330
004330
004336
004342
004344
004346

004350

004354
004360
004364
004370

MACY11

03-APR-84

30A(1052)

11:36

M3
04

APR-84

T11

10:38

001414

000403

032703
001410

000004

012737

004056

004707
104000
000031
001325

005067
005037
005037
005037
000167

175276

173372
177744
177766
001116
000000

201$:
2025

001120

PAGE

TEST UNCONDITIONAL

BEQ

BIT
BEQ

oBIT02,R3
S$

B8R

MOV

SEQ 0038

CACHE BYPASS
: THEN EXIT

TEST

202

tELSE;EXPECTED A MISS GO TO ERROR

#TST11+4,80S0OF TRE

sMOVE RETRY ADDRESS TO SOFT RETURN

JSR
ERROR
.WORD
.WORD

PC,APTSFT

CLR
CLR
CLR
CLR
JMP

CCR
SOMSER
0CPEREG
80SOF TER
TST12

1 IF HIT/MISS REG. BIT 2 NOT SET
; THEN EXIT TEST.ELSE GO TO ERKOR

:GO TO SOFT ERROR SUBROUT INE
:ALL ERRORS TO TRAP TO EMT VECTOR
1UNIQUE ERROR NUMBER
;ADDRESS OF ERROR MESSAGE
;CACHE SYSTEM ERROR
;CLEAR BYPASS BIT BEFORE EXIT
;CLEAR THE MEM SYS ERROR REG
:CLEAR THE CPU ERROR REGISTER
;CLEAR THE SOFT ERROR COUNT

31
ERRMSG

;JUMP OVER DATA

TABLES OR SUBROUTINES

:TO NEXT TEST
004374

CTST12:
H ;“““““.“““.“.‘t“#““t““‘t“““t“t.““““‘tt“‘t

;»TEST 12

TEST WRITE WRONG DATA PARITY

L L

VYV VYT T

T T

PO U

{WRITE WRONG DATA PARITY TEST- THIS TEST WILL VERIFY THAT WHEN CCR
iBIT<6> = 1 AND CCR BITS<7,0> = 0,1, A READ MISS OCCURS AFTER A
{WRITE. THE WRITE WITH CCR BIT<6> = 1 TO A LOCATION WILL CAUSE A
;CACHE UPDATE AND WRONG PARITY TO BE WRITTEN SO WHEN THE LOCATION
:IS READ INSTEAD OF A HIT BEING RECORDED THE CACHE PARITY ERROR
;WILL CAUSE A CACHE MISS. THIS TEST WILL BE DONE A BYTE AT A TIME.
:NOTE: IF BOTH ERRORS OCCUR CCGA MOST LIKELY BAD.
H
IF ONLY ONE ERROR OCCURS CCGA LEAST LIKELY.

;BGNTST
;SAVE CONTENTS OF VECTOR 114
;LET VECTOR 114 POINT TO ABORT ROUTINE
;CLEAR MSER
; IF MSER NOT CLEAR

THEN

;.
ERROR IN CACHE SYSTEM
;ENDIF
;WRITE TEST LOCATION
:SET BIVS<6,0> IN CCR
;WRITE TEST LOCATION LOW BYTE

;CLEAR CCR BIT<6> (WRITE WRONG DATA PARITY)
;INITIALIZE ERROR INDICATORS
sREAD TEST LOCATION LOW BYTE
sIF BIT<1> SET IN HIT/MISS REGISTER THEN
;

;ELSE
3.
A

ERROR

IN CACHE

SYSTEM

IF MSER BITS <7:5> ZERU THEN
ERROR IN CACHE SYSTEM

ENDIF

sENDIF
;CLEAR MSER
;IF MSER NOT CLEAR THEN
;.
.
ERROR IN CACHE SYSTEM

sENDIF

:SET CCR BIT<6>

GLOBAL AREAS
KDJ11A
. MAC

MACY11 30A(1052)
03 APR -84 11:36

APR 84
T12

1749
1750
1751
1752
1753
1754
1755
1756
1757
1758
1759
1760
1761

1762
1763
1764
1765
1766
1767
1768
1769
1770
1771
1772
1773
1774
1775
1776
1777
1778
1779
1780
1781
1782
1783
1784
1785

1786
1787
1788
1789

1790
1791
1792
1793
1794
1795
1796
1797
1798
1799
1800
1801
1802
1803
1804

10:38
PAGE 39
TEST WRITE WRONG DATA PARITY

SEQ 0039

sWRITE TEST LOCATION HIGH BYTE
;CLEAR CCR BIT<6>
;READ TEST LOCATION HIGH BYTE
sIF BIT<1l> SET IN HIT/MISS REGISTER THEN
:é SE
ERROR IN CACHE SYSTEM
sEL
N
g

IF MSER BITS «7:5>
.

ERROR

ZERO THEN

IN CACHE

ENDIF
HIS
iENDIF
sRESTORE CONTENTS OF VECTOR 114
sIF ERROR INDICATORS S&ET THEN
H
ERROR IN CACHE SYSTEM
;:ENDIF
TST
$EXIT

SYSTEM

;DATA PARITY ABORT ROUTINE:
.

ERROR

IN CACHE

SYSTEN

RETURN

;:ENDTST

H ;‘t‘t‘t“““.“tt““tt“““t‘tt‘t‘t“‘tA‘tt“ttt“tttt“ttttt

004374
004374
004400
004406
004414
004420
004424
004426
004430
004432

000032
001325

004434
004440

005037
012767

001122
000101

004446
004454
004462
004466
004474
004476
004504
004510
004512
004514

112767
042767
105737
032767
001410
012737
004767
104000
000033
001325

000377
000100
001122
000010

174446
173264

004490
175130

001120

004516
004524
004526
004530
004532

032767
001003
104000
000034
001325

000340

004534
004540
004544

005067
005767
001403

173204
173200

005267

013767
012737

005067
005767
001403
104000

174404
000114
004706
173324
173320

TST12:
174422
000114

173300

1$:

2s:

3s:

$TESTN

s INCREMENT TEST NUMBER

a0114,

CLR
TST
BEQ
ERROR
.WORD
.WORD

MSER
MSER
1s

32
ERRMSG

CLR
MOV

80TSTLOC
2101,
CCR

MOVB
8IC
TST8
gég

2377,
TSTLOC
BI706, CCR
807STLOC
geITOS. HITM1S

MOV
JSR
ERROR
.WORD
. WORD

4757124 ,80S0F TRE
PC,APTSFT

81T
BNE
ERROR
.WORD
. WORD

4340,
3

34
ERRMSG

; IF MSER BITS <7:5> ZERO
: THEN
;ALL ERRORS TO TRAP TO EMT
: INIQUE ERROR NUMBER
:ADDRESS OF ERROR MESSAGE

CLR
TST
8EQ

MSER
MSER
43

;CLEAR MSER
;s IF MSER NOT
; THEN

MOV

173256

173220

INC

MOV

SLOCOO

ODAPABO,a3¢114

33
ERRMSG
MSER

s SAVE CONTENTS OF VECTOR 114

:LET VECTOR POINT TO ABORT ROUTINE

;CLEAR MSER
: IF MSER NOT CLEAR
; THEN
:ALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
;sADDRESS OF ERROR MESSAGE

s CACHE SYSTEM ERROR

;WRITE TEST LOCATION TO ALLOCATE CACHE
;SET BITS<6,0> IN CCR
;:WRITE WRONG DATA PARITY; IGNORE PARITY
sWRITE LOW BYTE WITH BAD PARITY
;CLEAR WRITE WRONG DATA PARITY BIT

INTERRUP

;READ LOW BYTE OF TEST LOCATION
:%:ESCT A MISS; IF BIT 3 SET IN HIT/MISS REGISTE

:MOVE RETRY ADDRESS TO SOFT RETURN
;GO0 TO SOFT ERROR SUBROUTINE
;:ALL ERRORS TO TRAP TO EMT VECTOR
;UNIQUE ERROR NUMBER
:ADDRESS OF ERROR MESSAGE

;CACHE SYSTEM ERROR
VECTOR

;CACHE SYSTEM ERROR

CLEAR

GLOBAL AREAYS
KDJ11A, MAC

1805
1806
1807
1808
1809
1810
1811
1812
1813
1814
1815
1816
1817
1818
1819
1820
1821
1822
1823
1824
1825
1826
1827
1828
1829
1830
1831
1832
1833
1834

1835

1836
1837
1838
1839
1840
1841
1842
1843
1844
1845
1846

1847
1848
1849
1850
1851
1852
1853
1854
1855
1856
1857
1858
1859
1860

MACY11

03 APR 84

004546
004550
004552

104000
000035
001325

004554
004562
004570
004576
004602
004610
004612
004620
004624
004626
004630

052767
112737
042767
105787
032767
001411
012787
004767
104000
000036
001325

004632
004634
004642
004644
004646
004650

000407

004652
004660
004666
004666
004672
004676
004702

30A(1052)

11:36

04 APR
84
112

000100
000377
000100
001123
000010

173164
001123
173150

004400
175014

001120

032767
001003
104000
000037
001325

000340

012767
016737

000400
174144

005037
005037
005037
000167

177744
177766
001116
000010

10:38
PAGE 40
TEST WRITE WRONG DATA PARITY

4$:

173102

173066
000114

ERROR
JMORD
'WORD

35
ERRMSG

8IS
MOVB
BIC

#BIT06, CCR
@377, = @TSTLOC-1
#BIT06, CCR

tWRITE

QOTSTLOC.1

$READ HIGM BYTE

IST8

173142

St:

5EQ 0040

8IT
BEQ
MOV
JSR
ERROR
_WORD
.WORD

36
ERRMSG

B8R

ERROR
.WORD
. WORD

3?7
ERRMSG

BIT
BNE

sALL

e8ITO3, HITMIS
Ss
2TST12+4,80S0F
TRE
PC.APTSFT

HIGH BYTE

0330,
68

x%ZEsIT 3 SET

CLR

SMMSER

004714

000002

RTI

004716

TEST

LOCATION

TEST

LOCATION

IN MIT/MISS REGISTER

ERRORS

TRAP

TO EMT

VECTOR

$CACHE SYSTEM ERROR
1GO TO NEXT TEST IF NO HALT ON ERROR

1IF BITS «7:5> ZERO
;s THEN
$ALL ERRORS TO TRAP TO EMT VECTOR
$tUNIQUE ERROR NUMBER
$ADDRESS OF ERROR MESSAGE
sFLUSH CACHE,

sCACHE SYSTEM ERROR

CLEAR CCR BEFORE

sRESTORE CONTENTS OF VECTOR 114

tCLEAR THE SOFT ERROR COUNT
1JUMP OVER DATA TABLES OR SUBROUTINES

sALL

40
ERRMSG

TEST

ERRORS

TRAP

tUNIQUE ERROR NUMBER

s ADDRESS OF

TO EMT

VECTOR

ERROR MESSAGE

;CACHE SYSTEM ERROR

CTSTL1S:
§10888000000004000000000000000000000000000000000000000000080000000

soTEST 13

TEST

WRITE

WRONG

TAG PARITY

51900000000 0000000400000000000000000800000008000040000080000000448

sWRITE WRONG TAG PARITY

THIS TEST WILL VERIFY

THAT A READ MISS

$OCCURS AFTER A WRITE WILL CCR<10> = 1 AND CCR<?7,0> = C,1. THE WRITE
sTO THE LOCATION WILL CAUSE A CACHE UPDATE BUT THE TAG WILL BE
tWRITTEN WITH THE WRONG PARITY, WHEN THE LOCATION IS READ INSTEAD

$OF A CACHE HIT OCCURRING THE PARITY ERROR SHOWULD CAUSE A CACME

sMISS.

sBGNTST

sSAVE CONTENTS OF VECTOR

sLET

VECTOR

sCLEAR MSER

E€xIT

sCLEAR THE MEM SYS ERROR REG
iCLEAR THE CPU EZRROR REGISTER

S8#CPEREG
80S0F TER
TST13

ERROR
.WORD
.WORD

VECTOR

tMOVE RETRY ADDRESS TO SOFT RETURN
1GO TO SOFT ERROR SUBROUTINE

MSER

)

000040
001325

1UNIQUE ERROR NUMBER
s ADDRESS OF ERRDOR MESSAGE

#B8IT08,CCR
SLOCOO, Bo114

DAPABO:

TO EMT

t1CLEAR WRITE WRONG PARITY BIT

;7O NEXT

104000

TRAP

sCACHE SYSTEM ERROR
1SET CCR BIT 6 (WRITE WRONG PARITY)

$ALL

MOV
MOV

004706
004706
004710
004712

1 ADDRESS OF ERROR MESSAGE

6%:
73

CLR
CLR
MP

ERRORS

tUNIQUE ERROR NUMBER

114 POINT

114

TO ABORT

ROUTINE

RbOPTR.AREAS 0sMABA1AL P40

04 APR
B4 10:3
PAGE 81p.
i TaG PARITY

1861
1862
1863
18064
1865
1866
186~
1868
1869

$1SET WRITE WRONG TAG PARITY BIT<10»
;WRITE TEST LOCATION
sCLEAR CCR BIT<10> AND SET ABORT DISABLE BIT<0O>
tREAD TEST LOCATION
3IF BITcl> SET IN HIT/MISS REGISTER THEN
i.
ERROR IN CACHE SYSTEM
:ELSE
:.
.
ERROR IN CACHE SYSTEM
1ENDIF

1870
1871
1872

sRESTORE VECTOR
tEXIT
TST
H

1873

;TAG PARITY

1874

]

1875
1870

1880

1881
1882
1883
1884
1885
1886
1887
1888
1889
1890
1891
1892
1893
1894
1895
1896

1897
1898
1899
1900
1901
1902
1903

1904

1905
1906
1907
1908
1909
1910
1911
1912
1913
1914
1915
1916

114

ABORT ROUTINE:
ERROR

:
tENDTST

1877

1878
1879

5EQ 0041

004716
004716

004722
004730
004736
004742
004750
004754
004762

004766
004774

CACHE

SYSTEM

1380008000080 08484800000000040080000000000000008008000000800080000

005267

013767
012737
005067
012767
005037
012767
005737

032767
001414

004776
005004
005010
005012
005014

012737
004767
104000
000041
001325

005016
005020
005020
005022
005024

000403
104000
000042
00132S

005026
005034
005042
005046
005052
005056

012767
016737
005037
005037
005037
000167

005062
005062
005064
005066

104000
000047
001325

T5T13:

174062

INC

000114
005062
173002
002001
001122
000001
001122

174100
000114

000010

172756

004722
174630

001120

172776
172764

14:

172712
000114

NOTE

1 INCREMENT

TEST NUMBER

0000080 000c08000s00s000s

H
OON'T SINGLE STEP THIS CODE USING THE ODT P COMMAND!
!!
H
PARITY ERRORS WILL OCCUR,
10000408004 0004088800080000000000084000004080000002000004
MOV
80114,
SLOCOO
1SAVE CONTENTS OF VECTOR 114
MOV
OTAPABO, 80114
sLET VECTOR POINT TQ ABORT ROUTINE
CLR
MSER
tCLEAR MSER
MOV
92001,
CCR
$SET WRITE WRONG TAG PARITY & NO PARITY INTERRUP
CLR
SeTSTLOC
sWRITE LOCATION WITH BAD TAG PARITY
MOV
#IT00, CCR
1CLEAR BIT 10 AND SET NO PARITY INTERRUPTS
TST
S80TSTLOC
tREAD TEST LOCATION
8IT
481703, HITMIS
;IF BIT 3 SET IN MIT/MISS REGISTER
8EQ
28
s THEN
MOV
@TST13.4,80S0OF TRE
+MOVE RETRY ADDRESS TO SOFT RETURN
JSR
PC.APTSFT
;GO TO SOFT ERROR SUBROUT INE
ERROR
. WORD

000400
173770
177744
177766
001116
000010

$TESTN

1800000484004 0440880040008

2%:

TAPABO:

tALL ERRORS TO TRAP TO EMT
IUNIQUE ERROR NUMBER

VECTOR

.WORD

a1
ERRMSG

B8R

1ADDRESS OF ERROR MESSAGE
:CACHE SYSTEM ERROR
tELSE

ERROR
-.WORD
.WORD

42
ERRMSG

sALL ERRORS TO TRAP TO EMT
tUNIQUE ERROR NUMBER
: ADDRESS OF ERROR TMMESSAGE

MOV
MOV
CLR
CLR
CLR
JMP

05.708,CCR
SLOCOO, B2114d
BOMSER
SO0CPEREG
8¢SOFTER
TST14

ERROR
. WORD
.WORD

43
ERRMSG

:CACHE SYSTEM ERROR

1FLUSH CACHE, CLEAR CCR BEFORE EXIT
1RESTORE CONTENTS OF VECTOR 114
tCLEAR THE MEM SYS ERROR REG
iCLEAR THE CPU ERROR REGISTER
iCLEAR THE SOFT ERROR COUNT
1JUMP OVER DATA TABLES OR SUBROUTINES
170 NEXY TEST

1ALL ERRORS TO TRAP TO EMT
tUNIQUE ERROR NUMBER
1ADPDRESS OF ERROR MESSAGE

VECTOR

KbJP1a AREYS 0s"APRIALP(TLAES2)
>

1917

1918

1919
1920
1921

l922

AREAS

005070

)

04 APR

Gy 10:3.

000002

PAGE 82,0 0nG TAG PARITH

>EQ 0042

CACHE

RII

005072

1cAc

SYSTEM ERR

CTST1S:
3 "...“‘““.““".‘.“.‘.“..‘..‘.“‘..‘.‘.“..‘.“..“.0.‘...

1923

;oTEST

1924

TEST PARITY

INTERRUPT

150 060 0 0 04000800800080000000000000000000000500080400880000400040

1925

tPARITY

1926

10,0,

1927

INTERRUPT

TEST

THIS

TEST

WILL

VERIFY

THAT

WHEN CCR<7.0>

A PARITY INTERRUPT OCCURS AFTER EXECUTION OF AN INSTRUCTION

;THAT HAS BEEN WRITTEN WITH WRONG PARITY.

1928
1929
1930
1931
1932
1933
1934
1935
1936
1937
1938
1939

:
1BGNTST
1SAVE CONTENTS OF 114
:SETUP VECTOR 114 TO POINT TO INTERRUPT ROUTINE
:CLEAR EXPECTING INTERRUPT FLAG
{WRITE TEST ADDRESS WITH BAD PARITY
:SET EXPECTING INTERRUPT FLAG
:READ TEST ADDRESS
:IF INTERRUPT FLAG NE O THEN
;.
ERROR IN CACHE SYSTEM
1ENDIF
;RESTORE CONTENTS OF VECTOR 114

1340

EXIT
H

1942
1943
1944
1945

TST

: INTERRUPT ROUTINE
:
;
:
:

IF EXPECTING INTERRUPT FLAG NE 1 THEN
.
ERROR IN CACHE SYSTEM
ELSE
i
CLEAR (EXPECTING) INTERRUPT FLAG

1947
1948

:
:

IF SAVED PC NE TO UPDATED PC THEN
.
ERROR IN CACHE SYSTEM

1950
1951
1952
1953
1954

:
:
:
:
:

1946

1949

1955

1956
1957
1958
1959
1960
1961
1962
1963
1964
1965
1966
1967
1968
1969
1970
1971
1972

sENDTST

005072
005072
005076

005267
004767

173706
174310

005102
005110

012767
012737

001600
140000

165244
001122

005116
005124
005126
005134
005140
005144
005150
005156
005164

052767
005001
052767
005077
005067
005037
013767
012737
005101

000001

172446

000100
173762
172602
177744
000114
005244

172612

173652
000114

ENDIF

ENOIF

IF MSER NE 0340 THEN
.
ERROR IN CACHE SYSTEM
ENDIF
RE TURN

$10068000080000000040000480080000380000000008000000040000080800000
1ST14:
INC
$TESTN
1 INCREMENT TEST NUMBER
JSR
PC,INITHM
;INIT MU; PAGE ZERO REFERENCES WILL
13YPASS CACHE
.
MOV
#1600, KIPARG
1SET PARE TO RELOCATE TO BANK 7
MOV
2140000, 80TSTLOC
1SET UP TEST LOCATION TO OBTAIN
1PHYSICAL ADOR VIA KIPARG.
8IS
e8IT00, SRO
1 TURN ON MMU
CLR
R1
1CLEAR EXPECTING INTERRUPT FLAG
8IS
817106, CCR
1SET WRITE WRONG DATA PARITY
CLR
arsTLOC
IWRITE CACME LOCATION O WITH BAD DATA PARIT:
CLR
CCR
1CLEAR WRITE WRONG DATA PARITY
CLR
SOMSER
JINIT MSER
MOV
80114, 5L0C00
1SAVE CONTENTS OF VECTOR 114
MOV
SINTERR, 80114
tLET VECTOR POINT T0 INTERRUPT ROUTINE.
coM
R1
1SET EXPECTING INTERRUPT FLAG

GLOBAL ARE AS
KDJ11A MAC

1973
1974
1975
1976
1977

1978

1979
1980
1981
1982
1983
1984
1985
1986
1987
1988
1989
1990
1991
1992
1993
1994
1995
1996
1997
1998
1999
2000
2001
2002
2003
2004
2005
2006
2007
2008
2009
2010
2011
2012
2013
2014
2015
2016
2017
2018
2019
2020
2021
2022
2023
2024
2025

2026

2027
2028

MACY11

03-APR 84

005166
005172

005777
005701

005174
005176
005200
005202

001403
104000
000044
001325

005204
005212
005216
005224
005230
005234
005240

016737
005067
012737
005037
005037
005037
000167

20A(1052)

11:36

APR

173730

84
T14

10:38

INTRPC
;

TEST

PAGE 43

TST
ST

B8EQ
ERROR
.WORD
. WORD

173620
172354
000400
177744
177766
001116
000052

000114

18:

177746

MOV
CLR
MOV
CLR
CLR
CLR
JMP

PARITY

F4
SEQ 0043

INTERRUPT

81511 0C

1READ TEST LOCATION; SHOULD GET
tRETURN HERE FROM INTERRUPT

s IF

INTERRUPT FLAG NOT EQUAL ZERO

tTHEN WE DIDN'T GET A PARITY INTERRUPT,
$ALL

ERRMSG

SLOCOO, 80114
SRO
#BIT08,80CCR

SOMSER
80CPEREG
84SOFTER
TST1S

ERRORS

005701
001004
104000

000045
001325

005256
005260
005262
005266
005270
005272
005274

000401
005001
021627
001403
104000
000046
001325

005276
005304
005306
005310
005312

022767
001403
104000
000047
001325

005314

000002

005316

INTERR:

1%:
:

005172

000340

172440

4%
:

5%:

TST
BNE
ERROR
. WORD
.WORD

B8R
CLR
cMpP
B8EQ
ERROR
. WORD
.WORD
cMP
BEQ
ERROR
. WORD
. WORD

sRESTORE VECTOR
1 TURN OFF MMU

sFLUSH CACHE,

RTI

;ALL

QINTRPC
+4

ERRORS

CLEAR CCR

INTERRUPT FLAG NOT
TRAP

T0O EMT

SET

VECTOR

s ADDRESS OF ERROR MESSAGE
;CACHE SYSTEM ERROR
sELSE
sCLEAR (EXPECTING) INTERRUPT FLAG
‘¥;ESAVED PC NOT EQUAL TO UPDATED PC
H

;ALL ERRORS

TRAP

sUNIQUE ERROR NUMBER

ERRMSG

114

sUNIQUE ERROR NUMBER

ERRMSG

VECTOR

TEST

:%:ESXPECTING

TO EMT

s+CLEAR THE CPU ERROR REGISTER
sCLEAR THE SOFT ERROR COUNT
sJUMP OVER DATA TABLES OR SUBROUTINES

2340,

TRAP

;CLEAR THME MEM SYS ERROR REG

R1
P,
4%

tUNIQUE ERROR NUMBER
+ADDRESS OF ERROR MESSAGE
$CACHE SYSTEM ERROR

;7O NEXT

005244
005246
005250
005252
005254

PARITY

TO EMT

VECTOR

t ADDRESS OF ERROR MESSAGE

MSER

;CACHE SYSTEM ERROR
‘¥§EHSER NOT EQUAL TO EXPECTED VALUE

sALL ERRORS

TO TRAP

TO EMT

VECTOR

sUNIQUE ERROR NUMBER
:ADDRESS OF ERROR MESSAGE
sCACHE SYSTEM ERROR

s RETURN

CIST17:
508808000000 0000400404000000000000000000000004040000000000000004

ssTEST

TEST THAT PARITY ERRORS BLOCKED BY NXM ABORT

5304040000000 080480000040400000000000000000000000000400000080004000

iCHECK PARITY ABORTS BLOCKED BY NON-EXISTENT MEMORY ABORT

- THIS TEST WILL

s VERIFY THAT IF A PARITY ERROR OCCURS ON THE SAME ADDRESS REFERENCE AS A
iNON-EXISTENT MEMORY ERROR THAT THE CACHE DATA PATH GATE ARRAY BLOCKS THE
;PARITY ERROR TO THE J-11 CHIP SET, THIS WILL BE DONE BY USING THE DIAGNOSTIC
:BIT TO CAUSE A PARITY ERROR IN A CACHE REFERENCE THAT DOES NOT MAVE A
1CORRESPONDING ADDRESS IN MAIN MEMORY, THE ADDRESS WILL THEN BE READ CAUSING
:BOTH A CACHE PARITY ERROR AND A NON EXISTENT MEMORY ERROR. TO AVOID HAVING
;7O SIZE THE ENTIRE MEMORY TO FIND A NON-EXISTENT MEMORY ADDRESS THIS TEST
sWILL USE THE LARGEST NON-1/0 ADDRESS (17757776). THE TEST WILL FIRST READ
1 THIS ADDRESS AND IF A NXM TRAP OCCURS THE TESY WILL BE DONE. IF THE ACCESS
: 7O THIS ADDRESS DOES NOT TRAP THEN THE TEST WILL BE SKIPPED.

INTERRUPT

GLOBAL

AREAS

KDJ11A MAC

MACyY11

03 APR 84

30A(1052)

11:36

APR 84
T1S

ERRORS BLOCKED BY

SEQ 0044

NXM ABORT

sBGNTST

2029
2030
2031
2032

;s SAVE CONTENTS OF VECTOR 4
;SAVE CONTENTS OF VECTOR 114
sLET VECTOR 4 POINT TO CONTINUE TESTING (A:)

2033
2034
2035
2036
2037
2038
2039
2040
2041

2042
2043
2044
2045
2046
2047
2048
2049
2050
2051
2052
2053
2054
2055
2056
2057
2058
2059
2060
2061
2062
2063
2064
2065
2066
2067
2068
2069
2070
2071
2072
2073
2074
2075
2076
2077
2078
2079
2080
2081
2082
2083
2084

10:38
PAGE 44
TEST THAT PARITY

F 4

sLET PAR6

0177400

;ACCESS ADDRESS 157776 (PHYSICAL

;:IF NO TRAP THEN
:.
GOTO ENDTST
;ENDIF

17757776)

sA:

;SET DIAGNOSTIC AND WRITE WRONG PARITY BITS IN CCR
sWRITE ADDRESS 157776
:CLEAR CCR
sSET PARITY ERROR ABORT BIT IN CCR
;LET VECTOR 4 POINT TO CONTINUE TESTING (B:)
sLET VECTOR

114 POINT

TO NXM PARITY ERROR ROUTINE

sREAD ADDRESS 157776
;IF NO TRAP THEN
ERROR

§§w1r
:CLEAR CCR

IN CACHE

SYSTEM

sRESTORE CONTENTS OF VECTOR 114
tRESTORE

JEXIT

CONTENTS OF

TST

VECTOR 4

:NXM-PARITY ERROR ROUTINE:

RESET

GOT0 8:

;ENDTST

005316
005316
005322
005326
005334
005342
005350
005356
005364

ERROR

STACK

AFTER

IN CACHE

TRAP

SYSTEM

318048008000 80000580000800000800008400000000000008000080000000000004

005370
005372
005376
005404
005410
005416
005424
005432
005436
005440
005442

005267
013704
013767
012737
012767
012767
052737
005737
000435
062706
012767
005037
012767
012737
012737
005737
104000
000050
001325

005444
005446
005452

000407
005067
104000

TST1S:

173462

000004
000114
005372

177400

000020
000001

157776

000004
000102
157776
000200
005460
005446
157776

172120

173474
000004

MOV

165004
165140
177572

172342

INC
MOV

MOV

1s:

172330

000004
000114

80114,

a1s,

SLOCOO

-1 2}

4177400,KIPARE

€20,5R3

BIS
ST

#8IT00,80SR0O
aoe157776

ADD

04,

MOV
CLR
MOV
MOV
MOV

: INCREMENT TEST NUMBER
s SAVE CONTENTS OF VECTOR 4
:SAVE CONTENTS OF VECTOR

114

sLET VECTOR 4 POINT TO CONTINUE TESTING
;LET

PAR6

OFFSET

TO HIGMEST

iENABLE 22 BIT ADDRESSING.

:ENABLE MU
s ACCESS ADDRESS 17757776

sIF

1T DOESN‘'T

TRAP THEN SKIP

;RESET STACK AFTER TRAP

MEMORY

THIS

TESY

0102,
CCR
80157776
0200,
CCR
@2,
804
01004 ,840114

tWRITE TO ADDRESS 17757776
;CLEAR CCR AND SET PARITY ABORT BIT
sLET VECTOR 4 POINT TO CONTINUE TESTING
sLET VECTOR 114 POINT TO ERROR ROUTINE

ERROR
. WORD
. WORD

S0
ERRMSG

tALL ERRORS TO TRAP TO EMT
sUNIQUE ERROR NUMBER
; ADDRESS OF ERROR MESSAGE

$GO EXIT

1ST

100%:

$TESTN
304 R4

CLR

ERROR

801577176

SRO

+SET DIAG.

AND WRITE WRONG DATA PARITY BITS

:READ ADDRESS 17757776 (SHOWLD TRAP)

TEST

:CACHE SYSTEM ERROR

; TURN OFF MW BEFORE ERROR

;ALL

ERRORS

VECTOR

TRAP

TQ EMT

VECTOR

GLOBAL

AREAS

KDJ11A.MAC

2085
2086
2087
2088
2089
2090
2091
2092
2093
2094
2095
2096
2097

2098
2099
2100
2101

2102
2103
2104
2105
2106
2107
2108
2109
2110
2111
2112
2113
2114
2115
2116
2117
2118
2119
2120
2121
2122
2123
2124
2125
2126
2127
2128

2129
2130
2131
2132
2133
2134
2135
2136
2137
2138
2139
2140

MACY11l

O3-APR 84

005454
005456

000051
001325

005460
005464
003470
005474
005502
005506
005512
005516
005522

062706
005067
010437
016737
005067
005037
005037
005037
000167

30A(1052)

11:36

000004
172256
00004

173330
172064
177744
177766
001116
000000

APR 84

T1S5

10:38

PAGE

24:
3s:
000114

.WORD
.WORD

51
ERRMSG

ADD
CLR
MOV
MOV

04,
CCR
R4,
SLOCOO,

CLR
CLR
CLR
CLR
JMP

SRO
SOMSER
80CPEREG
@OSOFTER
I5T16

tUNIQUE FRROR NUMBER
tADDRESS OF ERROR MESSAGE
sCACHE SYSTEM ERROR
tRESET STACK AFTER TRAP

sCLEAR CCR FOR EXIT
sRESTORE VECTOR 4
tRESTORE VECTOR 114

804
ae114

1 TURN OFF MMU BEFORE EXITING.
1CLEAR THE MEM SYS ERROR REG
sCLEAR THE CPU ERROR REGISTER
sCLEAR THE SOFT ERROR COUNT
:JUMP OVER DATA TABLES OR SUBROUTINES

;7O NEXT

005526

SEQ 0045

TEST THAT PARITY ERRORS BLOCKED BY NXM ABORT

TEST

CTST20:
Y

L L LT

++TEST 16

TEST MULTIPROCESSING INSTRUCTIONS

Yrrrpes

P84 A400400880444000 0000480080080 088808 8888004080008 400808000440

$MULTIPROCCESSING INSTRUCTION TESTS - THIS TEST WILL VERIFY THAT THE MWLTI
1PROCCESSING INSTRUCTIONS DO A BYPASS OF THE CACHE. THIS TEST WILL NOT VERIFY
;THE REST OF THE FUNCTIONALITY OF THESE INSTRUCTIONS BECAUSE THAT WILL ALREADY
;HAVE BEEN CHECKED IN THE BASE INSTRUCTION TESTS.
;THE TEST FOR TSTSET AND WRTLCK WILL FIRST ALLOCATE AN ADDRESS IN CACHE WITH
:KNOWN DATA, THEN FORCE CACHE MISS WILL BE ENABLED AND THE SAME ADORESS WILL
:8E WRITTEN WITH WITH DIFFERENT DATA. THIS WILL SET UP CACHE WITH DATA 1 ANO
:IT'S ASSOCIATED MEMORY LOCATION WITH DATA 2., FORCE CACHE MISS WILL THEN BE
:DISABLED AND THE TSTSET/WRTLCK INSTRUCTION WILL BE EXECUTED. THIS INSTRUCTION
;WILL CAUSE CACHE TO BE BYPASSED AND AN ACCESS TO MAIN MEMORY WILL BE MADE. IN
;ADDITION THIS INSTRUCTION WILL CAUSE CACHE TO BE RE-ALLOCATED WITH THE CORRECT;DATA.

:THE

TEST FOR ASRB

INSTRUCTION DIFFERS SLIGHTLY.

FIRST

THE CACHE WILL BE

tALLOCATED, THEN AN ASRB INSTRUCTION WILL BE DONE AT THAT ADORESS.
;A HIT SHOULD BE RECORDED ON THE ACCESS. NEXT, THE ADDRESS WILL BE READ AND

;A MISS SHOULD BE RECORDED BECAUSE

THE FORCED BYPASS ON THE

:SHOULD HAVE INVALIDATED THE CACHE ENTRY,
;WILL NOT BE RE-ALLOCATED.
:

ASRB

INSTRUCTION

AND BECAUSE IT'S A BYTE WRITE;

CACHE

442808NOTEs&ena

1IF THE TSTSET OR WRTLCK ISTRUCTIONS ARE ASSEMBLED SO THAT BITS

:5-0 OF THE ADDRESS OF THE INSTRUCTION FOLLOWING THE TSTSET/WRTLCK INSTRUCTION

;ARE EQUAL

TO BITS 5-O OF

THE

TSTLOC ADDRESS

THE

TEST WILL F/IL.

THIS

IS CAUSED

i8Y THE NEED OF AN ADDITIONAL FETCH WHEN THE PRE-FETCH BUFFER IS INVALIDATED
iWHEN BITS 5-O OF AN ADDRESS WRITTEN TO ARE EQUAL TO BITS S ¢ OF THE ADDRESS
+IN THE PREFETCH BUFFER, THE ADDITIONAL FETCH CAUSES THE REQUIRED DATA TO BE
;SHIFTED OUT OF THE RANGE OF THE HIT/MISS REGISTER. PADDING THE FRONT OF THE
:EES;S¥ITH NOPS MAY BE REQUIRED TO REMEDY THIS PROBLEM.
4

:READ TEST LOCATION TO ALLOCATE CACHE
;D0 TSTSET INSTRUCTION
; IF HIT/MISS REGISTER BIT 3 NOT

‘éNDIF
:READ

ERROR IN CACHE SYSTEM

TEST

LOCATION

¢ IF HIT/MISS REGISTER BIT

‘éNDIF

ERROR

3 SET

IN CACHE SYSTEM

SET

THEN

GLOBA:.

AREAS

KDJ11A
. MAC

MACY11

03 APR 8 4

SOA(igSE)
11:

APR 84
T16

o141
2142
2143
2144
2145
2146
2147
2148
2149
2150
2151
2152

2153
2154
2155
2156
2157
2158
2159
2160
2161
2162
2163
2164

2165
2166
2167
2168
2169
2170
2171
2172
2173
2174
2175
2176
2177
2178
2179
2180
2181
2182

2183
2184
2185
2186
2187
2188
2189
2190
2191
2192
2193

2194
2195
2196

4
10:38
PAGE 46
TEST MULTIPROCESSING

:READ

TEST

LOCATION

TO ALLOCATE

;D0 WRTLCK INSTRUCTION

; IF HIT/MISS REGISTER BIT

sENDIF
;READ

ERROR

TEST

IN CACHE

LOCATION

ERROR IN CACHE

CACHE

3 NOT

SET

3 SET

THEN

SYSTEM

; IF HIT/MISS REGISTER BIT

SEQ 0046

INSTRUCTIONS

SYSTEM

THEN

sENDIF
:READ TEST LOCATION YO ALLOCATE CACHE
;00 ASRB INSTRUCTION
s IF HIT/MISS REGISTER BIT

:ENDIF

ERROR

IN CACHE

3 NOT

SYSTEM

sREAD TEST LOCATION
s IF HIT/MISS REGISTER BIT 3 SET

:ENDIF

ERROR

IN CACHE

SYSTEM

SET

THEN

:ENDTST

108 284848 0

005526
005526
005532
005536
005544
005552
005556
005560
005562
005564
005572
005574
005602
005606
005610

005612

005614
005616
005616
005620
005622

005267
005067
012767
012737

005037
007237
001122
001415
032767
001014
012737
004767
104000
000052
001325

173252
173364
000004
177777

TST16:

172202
001122

00 084004000808 0048 0000050080000 04080 80400000000 0844

INC
CLR
MOV

MOV

177746

CLR
3

000040

172160

005532
174032

001120

.WORD
. WORD
BEQ
BIT
BNE
MOV
JSR
ERROR
. WORD
. WORD

000403
100.

104000
000053
001325

B8R

ERROR
. WORD
.WORD

005624
005632

022767
001015

177777

005634
005642
005644
005652
005656
005660

032767
001014
012737
004767
104000
000054

000020

172110

005532
173762

001120

173270

1¢:

$TESTN
TSTLOC
981702,CCR
@177777,80TSTLOC

80CCR
TSTSETY
TSTLOC
7237
TSTLOC
100¢
:gITOS.HITHIS
47S716+4,80STRE
0F
PC.APTSFT
52
ERRMSG

s INCREMENT

TEST NUMBER

sWRITE

TEST LOCATION

sWRITE

TO MEMORY BUT NOT

TO ALLOCATE

:SET CACHE TO FORCE MISS

CACHE

TO CACHE.

:CACHE =000000; TSTLOC=177777
:CLEAR FORCE MISS
:D0 TSTSET INSTRUCTION
: THESE NEXT TWO LOCATIONS ARE THE TSTSETY
: INSTR, BECAUSE THL ASSEMBLER WAS NOT READY
:IF = O THEN CACHE WAS NOT BYPASSED
:IF HIT/MISS REGISTER BIT S IS SET
:THEN GO TO NEXT TEST,
;MOVE

RETRY

ADDRESS

TO SOFT RETURN

:GO TO SOFT ERROR SUBROUTINE
tALL ERRORS TO TRAP T0 EMT VECTOR
sUNIQUE ERROR NUMBER

sADDRESS OF ERROR MESSAGE

;CACHE SYSTEM ERROR
;ERROR! BIT 5 IN HIT MISS REG WAS NOT SET.
;:RECOVER FROM ERROR

;ALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER

53
ERRMSG

s ADDRESS OF ERROR MESSAGE

sCACHE SYSTEM ZRROR
;ERROR! CACHE WAS NOT BYPASSED By TSTSET

CMP
BNE

#L77777,TSTLOC
2008

iREAD

BIT
BNE

081704,
2$

3¥:EQIT/HISS REGISTER BIT 4 SET (SHOWD B8E)

MOV

JSR
ERROR
.WORD

HITMIS

#TS5716+4,8050
TRE
F
PC,APTSFT

TEST

LOCATION (ALSO ALLOCATES

1CACHE SHOUWLD BE RE-ALLOCATED WITH
$1727777 AS A RESULT OF

[

sMOVE

RETRY

ADDRESS

TSTSET

INSTRUCTION,

TO SOFT RETURN

;GO TO SOFT ERROR SUBROUTINE
sALL ERRORS TO TRAP TQ EMT VECTOR

;UNIQUE ERROR NUMBER

CACHE

FOR

GLOBAL AREAS
KDJ11A
. MAC
2197

2198
2199
2200
2201
2202
2203
2204
2205
2206
2207
2208
2209
2210
2211
2212
2213
2214
2215
2216
2217
2218
2219
2220
2221
2222
2223
2224
2225
2226
2227
2228
2229
2230
2231
2232
2233
2234
2235
2236
2237
2238
2239
2240
2241
2242
2243
2244
2245
2246
2247
2248
2249
2230
2251
2252

005662

MACY11l

03 APR 84

30A(1052)

11:36

APR 84

T16

001325

005664
005666
005666
005670
005672

104000
000055
001325

005674
005702
005706
005710

012767
005067
005000
005067

007337
001122
001015
032767
001014
012737
004767
104000
000056
001325

005752
005754
005754
005756
005760

000403
104000
000057
001325

005762
G05766
005770
005776
006000
006006
006012
006014
006016

005767
001015
032767
001014
012737
004767
104000
000060
001325

006020
006022
006022
006024
006026

000403

104000
000061
001325

006030
006034
006036
006042
006050
006052
006060

005767
000240
106267
032767
001010
012737
004767

TEST

200%:

000004
173214

172044

2%:

172032

000040

MULTIPROCESSING

005532
173674

300s:

173134

3s:

000020

171754

005532
173626

001120

173066

000020

171702

005532

001120

173554

+CACHE SYSTEM ERROR
1RECOVER FROM ERROR

ERROR
.WORD
.WORD

55
ERRMSG

MOV

CLR
CLR
CLR

ERROR
.WORD
.WORD
TS7
BNE
811
BNE
MOV
JSR

ERROR
. WORD
. WORD
4004
:

173060

s ADDRESS

. WORD
. WORD
BNE
8IT
BNE
MOV
JSR
ERROR
.WORD
. WORD

001120

SEQ 0047

INSTRUCTIONS

ERRMSG

WRTLCK

172022

PAGE 47

.WORD

000403

005714
005716
005720
005722
005730
005732
005740
005744
005746
005750

10:38

#81702,CCR
TSTLOC
RO

CCR

TSTLOC
7337
TSTLOC

3004
gBITOS.
$

: INSTR.

HITMIS

#7S716+4,834S0F
TRE
PC,APTSFT

THE WRTLCK

:%:E:IT/HISS REGISTER BIT S NOT SET

;sRECOVER FROM ERROR

s:CACHE SYSTEM ERROR

;ALL ERRORS 70 TRAP TO EMT VECTOR
iUNIQUE ERROR NUMBER
:ADDRESS OF ERROR MESSAGE
;CACHE SYSTEM ERROR
:ERROR! CACHE WAS NOT BYPASSED BY WRTLCK.
;READ TEST LOCATION

S7
ERRMSG
TSTLOC
4201%
:gITO4.

HITMIS

aTST16+4,80S0F
TRE

PC.APTSFT

60
ERRMSG

61
ERRMSG

8I7
BNE

gBITOd, HITMIS
$
475716+4,84S0F
TRE
PC,APTSFT

JSR

TWO WORDS ARE

BECAUSE THE ASSEMBLER WAS NOT READY

56
ERRMSG

TSTLOC

MOV

MESSAGE

{MOVE RETRY ADDRESS TO SOFT RETURN
;GO0 TO SOFT ERROR SUBROUTINE
sALL ERRORS TO TRAP TQO EMT VECTOR
{UNIQUE ERROR NUMBER
$ADDRESS OF ERROR MESSAGE

757
NOP

ASP8

ERROR

tALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
1+ADDRESS OF ERROR MESSAGE
s CACHE SYSTEM ERROR
:ERROR! CACHME WAS NOT RE-ALLOCATED
:SET FORCE CACHE MISS.
iCACHE=177777; TSTLOC=000000
:CLR RO
;CLEAR FORCE CACHE MISS.
;D0 WRTLCK INSTRUCTION
: THESE NEXT

ERROR
. WORD
.WORD

TSTLOC

;¥§E:IT,HISS REGISTER BIT 4 SET

;MOVE RETRY ADDRESS TO SOFT RETURN
;GO TO SOFT ERROR SUBROUTINE
$ALL ERRORS TO TRAP TO EMT VECTOR
{UNIQUE ERROR NUMBER
; RDDRESS OF ERROR MESSAGE
sCACHE SYSTEM ERROR

;RECOVER FROM ERROR

sALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
;:ADDRESS OF ERROR MESSAGE
1CACHE SYSTEM ERROR
$ERROR! CACHE WAS NOT RE-ALLOCATED

tREAD

TEST LOCATION

TO ALLOCATE CACHE

tNOP PAD FOR ASRB MIT/MISS CALC

sD0 ASRB INSTRUCTION

'¥;E:IT/HISS REGISTER £IT 4 NOT

SET

$MOVE RETRY ADDRESS TO SOFT RETURN
;GO TO SOFT ERROR SUBROUTINE

GLOBAL AREAS
KDJ11A
. MAC

2253
2254
2255
2256
2257
2258
2259
2260
2261
2262
2263
2264
2265
2266
2267
2268
2269
2270
2271
2272
2273
2274
2275
2276
2277
2278
2279
2280
2281
2282
2283
2284
2285
2286
2287
2288
2289
2290
2291
2292
2293
2294
2295
2296
2297
2298
2299
2300
2301
2302

2303
2304
2305
2306
2307
2308

MACY11

03-APR 84

006064
006066
006070

104000
000062
001325

006072
006076
006104
006106
006114
006120
006122
006124

005767
032767
001410
012737
004767
104000
000063
001325

006126
006126
006132
006136
006142

30A(1052)

11:36

173024
000010
005532
173520

04 APR 84

T16

171646

10:38

S$:

PAGE 48

€2
ERRMSG

tALL ERRORS TO TRAP TO EMT
sUNIQUE ERROR NUMBER
: ADDRESS OF ERROR MESSAGE

IST

TSTLOC

sREAD

MOV
JSR
ERROR

48IT03,
63

HITMIS

0TST16+4,80S0F TRE
PC,APTSFT

.WORD
. WORD

177744
177766
001116
000000

5EG 0048

ERROR
. WORD
.WORD

63
ERRMSG

005037
005037
005037
000167

TEST MULTIPROCESSING INSTRUCTIONS

BIT
BEQ

001120

s IF HIT/MISS REGISTER BIT
: THEN

SOMSER
8eCPEREG
80SOF TER
TST17

3 SET

;:MOVE RETRY ADDRESS TO SOFT RETURN
1GO TO SOFT ERROR SUBROUTINE
;ALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
;sADDRESS OF ERROR MESSAGE

;CLEAR THE
sCLEAR THE
;CLEAR THE
:JUMP OVER
; TO NEXT

006146

;CACHE SYSTEM ERROR

TEST LOCATION

;CACHE

CLR
CLR
CLR
JMP

VECTOR

SYSTEM

ERROR

MEM SYS ERROR REG
CPU ERROR REGISTER
SOFT ERROR COUNT
DATA TABLES OR SUBROUTINES

TEST

CTST21:
$i0000000008000
000000000000
04080
0400000000008
00000
0000000000008
00
40

;oTEST 17

TEST CACHE DATA RAMS

$i08828804
800040000
00000
000000080080
04000
000488000040
00000
000004000

;:DATA STORE RAM TESTS - THERE ARE TWO TESTS FOR THE DATA STORE RAM,
:THE FIRST TEST WILL BE A NO DUAL ADDRESSING TEST AND THE SECOND
;TEST WILL BE A DATA RELIABILITY TEST, THE NO DUAL. ADDRESSING TEST
sWILL FIRST WRITE EACH WORD OF THE CACHE RAM WITH ITS WORD ADDRESS
:AND VERIFY TME CONTENTS WITH A READ OF EACM ADDRESS. THEN EACH
:BYTE WILL BE WRITTEN WITH ITS ADDRESS AND CHECKED. THE DATA
tRELIABILITY TEST THAT WILL BE USED IS A TEST CALLED MOVING INVERSIONS.
:

$BGNTST 1
;SETUP MU REGISTERS TO MAVE BYPASS ON KERNAL SPACE AND NO

;

BYPASS ON USER SPACE

iLET PS EQUAL KERNAL FOR CURRENT MODE AND USER FOR PREVIOUS

:ENABLE MMU
;GET FIRST ADORESS OF 4K WORD DATA BWFFER
sCLEAR DATA TO BE WRITTEN
sSET DIAGNOSTIC BIT (BIT<1>) IN CCR
;00 UNTIL DATA TO BE WRITTEN EQUALS 20000(8)

i
WRITE DATA TO ADDRESS
s,
ADD 2 YO ADDRESS
;.
ADD 2 TO DATA TO BE WRITTEN
;sENDDO
$SAVE CONTENTS OF VECTOR 114
sLET VECTOR

114 POINT

TO DATA STORE PARITY ABORT ROUTINE

:GET FIRST ADDRESS OF 4K WORD DATA BUFFER
:CLEAR EXPECTED DATA
;D0 UNTIL EXPECTED DATA EQUALS 20000(8)

READ

ADDRESS

IF RECEIVED DATA NE EXPECTED DATA
ERROR IN CACHE SYSTEM

THEN

GL OBAL ARE AS
KDJU11A, MAC

2309
2310
2311
2312
2313
2314
2315
2316
2317
2318
2319
2320
2321
2322
2323
2324
2325
2326
2327
2328
2329
2330
2331
2332
2333
2334
2335
2336
2337

2338
2339
2340
2341
2342

2343
2344
2345

2346
2347
2348
2349
2350
2351
2352
2353
2354

2355
2356
2357
2358
2359
2360
2361
2362
2363
2364

MACY11l

03 APR 84

B0A(1052)

11:36

<4
04

APR 84
T17

10:38
PAGE 49
TEST CACHE DATA RAMS

.
HS
.

ENDIF
ADD 2 TO EXPECTED DATA
ADD 2 TO ADDRESS

;

READ

SEQ 0047

s ENDDO
sGET FIRST ADDRESS OF 8K BYTE DATA BUFFER
sCLEAR DATA TO BE WRITTEN
;D0 UNTIL ALL BYTES CHECKED
H
WRITE DATA TO ADDRESS
H
ADD 1 TO ADDRESS
.
ADD 1 TO DATA TO BE WRITTEN
:ENDDO
:GET FIRST ADDRESS OF 8K BYTE DATA BUFFER
sCLEAR EXPECTED DATA
.DO UNTIL EXPECTED DATA EQUALS 20000(8)
ADDRESS

IF RECEIVED DATA NE EXPECTED DATA
ERROR IN CACHE SYSTEM
ENDIF
ADD 1 TO EXPECTED DATA
ADD 1 TO ADDRESS

THEN

:ENDDO
;RESTORE VECTOR 114
;:ENDTST
006146
006146
006152
006156
006164
006172
006200
006204
006206
006214
006220
006222
006224
006230
006232
006240
006246
006254
006260
006262
006266
006270
006272
006300
006302
006310
006314
006316

: 3.‘.l““““".““““““t“““““A“““““‘.“t“‘tt““

005267
004767
012767
042767
052737
012702
005001
052767
020127
001404
010122
062701
000771
013767
012737
042767
012702
005001
020127
001430
005712
032737
001010
012737
004767

104000
000064

172632
173234
001600
000004
000001
140000
000002
020000

)

TST17:

164170
164324
177572

171532

1s:

172570
000114
171472

2%:

140000
020000

000010

006152
173324

3s:

177752
001120

$TESTN

PC,
INITMM
#1600,
KIPAR6
#BIT02,SR3

MOV
CLR

€140000,R2
R1

R1,

€20000

MOV
ADD

R1,
82,

(R2)+
R}l

MOV
MOV
8iC

86114,
SLOCOO
ORAMPAR, 80114
#81701,CCR

8IS

000002

000114
001630
000002

INC

JSR
MOV
8IC

8IS

B8EQ

B8R

MOV
CLR

ce
BEQ

#BIT00,805R0

#81IT01,CCR

#140000,R2
R1

187

R1,
Ss
(R2)

BNE
MOV
JSR

44
OTST17.4,84SOF TRE
PC,APTSFT

BITY

ERROR

. WORD

220000

OBITO3,89HITMIS

: INCREMENT TEST NUMBER

;SETUP MMU REGISTERS/FORCE CACHE BYPASS PAGES ©

; LET PAR6 MAP TO ADDRESS 160000
: DISABLE KERNEL D SPACE.

: TURN ON MEMORY MANAGEMENT
sGET FIRST ADORESS OF 4K WORD BUFFER
;:INIT DATA TO BE WRITTEN
H SET DIAGNOSTIC BITV

H DO UNTIL ALL ADDRESSES WRITTEN
s IF DONE GO CHECK DATA
;WRITE DATA

TO ADDRESS

;UPDATE DATA BY 2 (WORD BOUNDARY)

H ENDDO

H SAVE CONTENTS OF VECTOR 114
H LET VECTOR 114 POINT TO ABORT ROUTINE

:CLEAR DIAGNOSTIC BIT,

;REFERENCES

ALL FURTHER
TO PAGE 6 SHOULD BE CACHED.

:GET FIRST ADDRESS OF 4K WORD BUFFER
s INIT DATA TO B8E CHECKED

3 00 UNTIL ALL ADDRESSES CHECKED
H IF DONE GO DO BYTES
s CHECK THAT CACHE WAS
: ALLOCATED
i SHOWD HAVE MIT
: MOVE RETRY ADDRESS TO SOFT RETURN
H GO TO SOFT ERROR SUBROUTINE

sCACHE SYSTEM ERROR

sEXPECTED A MIT;

GOT

A MISS

;ALL ERRORS YO TRAP TO EMT VECTOR
H UNIQUE ERROR NUMBER

GLOBAL

AREAS
KDJ11A. MAC

2365
2366
2367
2368
2369

2370

2371
2372
2373
2374
2375
2376

MACY11

03-APR 84

006320
006322
006326
006332
006334
006336
006340

001325
012267
020167
001403
104000
000065
001325

006342
006346

062701
000745

30A(1052)

11:36

APR 84
T17

172510
172504

4%
:

000002

100¢:

2401
2402
2403
2404
2405
2406
2407
2408
2409
2410
2411
2412
2413
2414
2415
2416
2417
2418
2419
2420

TEST CACHE

. WORD

MOV

ERRMSG
(R2)e,

CMP
BEQ
ERROR
.WORD
.WORD

R1,

ADD

#2,R1

B8R

SEQ N050

DATA RAMS

100¢

RECDAT
RECDAT

:ADDRESS OF ERROR MESSAGE

tREAD

TEST

LOCATION

s%;EzECEIVED DATA NOT EQUAL

TO EXPECTED

tALL ERRORS TO TRAP TO EM: VECTOR
;UNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE
:CACHE SYSTEM ERQROR
:UPDATE EXPECTED DATA By 2
$sENDDO

65
ERRMSG
3

sSINCE CACHE IS ALREADY ALLOCATED; WRITE BYTES WILL HIT
;AND WRITE THROUGH CACHE TO MEMORY.

2378

2400

PAGE S50

;048NOW CHECK BYTESassa

2377
2379
2380
2381
2382
2383
2384
2385
2386
2387
2388
2389
2390
2391
2392
2393
2394
2395
2396
2397
2398
2399

10:38

006350
006356
006362
006364
006%70
006372
006374
006400
006402
006406

052737
012702
005001
020127
001404
110122
062701
000771
012702
005001

006410
006412
006420
006422
006430

105712
032737

006434

001010
012737
004767

006462
006466
006470
006472

104000
000066
001325
112267
120167
001410
012737
004767
104000
000067
001325

006474
006476
006502

005201
020127
001342

006504
006510
006514
006522
006526
006532
006536

0035067
005067
016737
005037
005037
005037
000167

006440
006442
006446
006452

000002
140000

177746

020000

S$:

6%:

8IS
MOV

CLR
cMP

8EQ

MOvVB
ADD

000001

140000

7¢:

000010

177752

006152

001120

173204

172370
172364
006152
173152

9$:

000000

10¢:

000114

#20000

21,

R1,
63

CLR

7578

8IT
BNE

JSR

001120

R1
R1,
74

MOV

101¢$:

020000

171236
171056
172310
177744
177766
001116

8s%:

08I701,80CCR

#140000,R2

ERROR
. WORD
.WORD
MOVB
cMP8
BEQG
MOV
JSR
ERROR
.WORD
.WORD

(R2).

#4140000,R2

(R2)

#8IT03,30HITMIS
1014

#TST17+4,80SOFTRE
PC.APTSFT

66
ERRMSG

(R2)+,

R1,
93

RECDAT

0TST17+4,88STRE
0F
PC.APTSFT

67
ERRMSG
R1
R1, 220000

CLR
CLR
MOV
CLR
CLR

CCR

JMP

:MOVE RETRY

A HIT
ADDRESS

TO SOFT RETURN

;GO TO SOFT ERROR SUBROUTINE
;CACHE SYSTEM ERROR
sEXPECTED A HIT;

INC
cMp
BNE

CLR

$sSET DIAGNOSTIC MODE IN CCR
;GET FIRST ADDRESS OF 4K WORD BUFFER
:INIT DATA TO BE WRITTEN
sDO UNTIL ALL ADDRESSES WRITTEN
;: IF DONE GO CHECK DATA
iWRITE DATA TO ADDRESS
;UPDATE DATA BY 1 (BYTE BOUNDARY)
:ENDDO
;GET FIRST ADDRESS OF 4K WORD BUFFER
s INIT DATA TO BE CHECKED
;00 UNTIL ALL ADDRESSES CHECKED
;CHECK THAT CACHE WAS ALLOCATED
: SHOULD BE

SRO
SLOCOO, de1ia
SOMSER
80CPEREG
0SOFTER
TST20

GOT

A MISS

;ALL ERRORS TO TRAP TO EMT VECTOR
;UNIQUE ERROR NUMBER
;ADDRESS OF ERROR MESSAGE
;READ TEST LOCATION
;%:E:ECIEVED DATA NOT EQUAL TO EXPECTED

:MOVE RETRY ADDRESS TO SOFT RETURN
;GO TO SOFT ERROR SUBROUTINE
:ALL ERRORS TO TRAP TO EMT VECTOR
;UNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE
;CACHE SYSTEM ERROR
s UPDATE EXPECTED DATA BY 1
s IF ALL ADDRESS HAVE NOT BEEN TESTED
s THEN GET NEXT ADDRESS
tELSE EXIT TEST
;:CLEAR THE CCR

s TURN OFF MMy
tRESTORE VECTOR

114

sCLEAR THF MEM SYS ERROR REG
sCLEAR T+
JPU ERROR REGISTER
;CLEAR T . SOFT ERROR COUNT

;JUMP Oven DATA

TABLES OR SUBROUTINES

GLOBAL AREAS
KDJ11A.MAC

2421
2422
2423

2424

MACY11l 30A(1052)
03-APR-84 11:36

04 APR 84
117

10:38
PAGE 51
TEST CACHE DATA RAMS

SEQ 0051

:TO NEXT

006542

C1sT122:

138800848480 088848044800830400040008004804000008800800200000005800404804

2425

;¢ TEST 20

2427

:MOVING INVERSIONS TEST FOR DATA RAMS

2426

2428

2429
2430
2431
2432
2433
2434
2435
2436
2437
2438
2439
2440
2441
2442
2443
2444
2445
2446

2447
2448
g:g9
0

2451
2452
2453

2454
2455
2456
2457
2458
2459
2460
2451
2462
2463
2464
2465
2466
2467
2468
2469

2470
2471
2472
2473

2474

2475
2476

TEST

CACHE DATA RAM DATA RELIABILITY

TEST

1380885048488 84840880480840800800004008880408000404000600000000

:RAM

STORE

WITH

0'S.

EACH

ADDRESS

000040

THE

READ

TEST

AND

IS STARTED AFTER LOADING THE

VERIFIED

ALL

0'S.

THEN

i1 IS SUBSTITUTED IN A BIT POSITION AND THE NEW WORD IS WRITTEN. NEXT THE
+ADDRESS IS READ TO VERIFY THE NEW CONTENTS. THIS IS REPEATED FOR EACH BIT OF
:THE WORD LEAVING THE ARRAY FILED WITH 1'S. THE WHOLE PROCESS IS REPEATED
sPLUGGING IN 0'S TO THE 1'S AND REPEATED TWICE MORE ADDRESSING IN THE DOWNWARD
:DIRECTION. FINALLY EVERYTHING IS REPEATED FOR EACH BIT POSITION BEING THE
iLSB. TO SAVE TIME AND KNOWING THE LAYQUT OF THE RAM CHIPS INSTEAD OF DOING
iONLY A SINGLE BIT AT A TIME EVERY FOURTH BIT WILL BE DONE CONCURRENTLY.
H
sBGNTST
;SETUP AND ENABLE MMU
sSETUP CCR TO ABORT PARITY ERRORS
:CLEAR CACHE
;LET FWOSEQ = 41
sLET ADDLSB = o1
;00 UNTIL ADOLSB EQ #0
P
LET CURDAT = 0
;.
LET RITEDA = #1
H
LET NEWDAT = 01

HE
H
N
;-

I
i,
b

IF FWDSEQ = &1 THEN
.
LET FSTADD EQUAL FIRST ADDRESS OF 8K BYTE BUFFER
ELSE
LET LASTAD EQUAL LAST ADDRESS OF 8K BYTE BUFFER
L

1
;HE
i

LEY FSTADD EQUAL LAST ADDRESS OF 8K BYTE BUFFER
.
LET LASTAD EQUAL FIRST ADDRESS OF 8K BYTE BUFFER
ENOIF
LET CURADD = FSTADD
LET DCOUNT = 20
SAVE CONTENTS OF VECTOR 114
LET VECTOR 114 POINT TO DATA STORE PARITY ABORT ROUTINE
00 UNTIL OCOUNT EQ ¢10
.
LET RECDAT = &CURADD
.
IF RECDAT NE CURDAT THEN
ERROR IN CACHE SYSTEM
.
ENDIF
IF DCOUNT GT 43 THEN
.
LET 8CURADD = 8CURADD CLEARBY RITEDA
ELSE
.
LET 8CURADD = aCURADD SETBY RITEDA
ENDIF
LET RECOAT = aCURADD

H
i
i
.

ERROR IN CACHE SYSTEM
.
ENOIF
.
IF CURADD EG LASTAD THEN
.
.
IF RITEDA = 4210 THEN

.
i
H
;.
.
.
;.
HS
.
H
i

i
;.

IF RECOAT NE NEWDAT

THEN

IF DCOUNT NE @7 THEN
.

LET CURDAT
LET RITEDA

= #4377
= #21

AREAS

KDJ1.1A
MAC

1% 30“(;052)

03 A R

2477
2478
2479
2480
2481
2482
2483
2484
2485
2486
2487
2488
2489
2490

10: R e BRTRZRAM DATA RELIABILITY TEST

120

»
&
8
8
8
8

o
*
s

o
e

THEN

ELSE

LET

NEWDAT

CLEAREDBY

.
ENDIF

LET NEWDAT

NEWDAT

SETBY RITEDA

RITEDA

o
B8

s @»

ELSE

LET

CURADD

s
s

BC
GY

FSTADD

IF FUDSEQ = &1 THEN
LET CURADD = CURADD + ADDLSSB
IF CARRY THEN
.
LET CURADD = CURADD +
ENDIF

08356

INCREMENT DCOUNT

ENDIF

WS
BE
8

Q
Q

LET CURDAT = NEWDAT
ROTATE RITEDA

ELSE

=
e
e

WE
W
We

NEWDAT

ENDIF

LET CURADD = CURADD - ADDLSB
IF CARRY THEN
LET CURADD = LASTAD
.
LET CURADD = CURADD
ENDIF

ADDLSB
&1

ENDDO
IF FWDSEQ EQ #1 THEN
.
LET FWOSEQ = ¢0
ELSE
ROTATE ADDLSB
LET FWDSEQ = 91

SEQ 0052

IF DCOUNT GT

ENDIF

LET

ENDIF

ELSE

2491
2492
2493
2494
2495

2496
2497
2498
2499
2500
2501
2502
2303
2504
2505
2506
2507
2508
2509
2510
2511
2512
2513
2514
2515
2516
2517
2518
2519
2520
2521
2322
2523
2524
2525
2526
2527
2528
2529
2530
2531
2532

APR 84

GLOBAL

ENDIF

sRESTORE VECTOR 114
:ENDTST
:RO=CURADD (CURRENT ADDRESS)
;R1=WORKING REGISTER

;R2=RECDAT (RECEIVED DATA)
sR3=RITEDA (DATA TO BE WRITTEN)

;RA=NEWDAT
;R5=CURDAT

006542
006542
006546
006554
006556
006562
006566
006574
006602
006610

16808 0808080

005267
032777
001002

000167

004767

012767

052737
052767
012700

172236
001000

TST20:

172272

000454
172624

000200
000001
000200
140000

100§ :

163560
177572
171136

(EXPECTED DATA)
(CURRENT DATA)

84008804 0000080042848 83 0028480004000

INC
8IT
BNE

JMP
JSR

MOV

BIS
BIS
MOV

$TESTN

081709,3SWR
1004

EXTST
PC,

INITMM

#200,KIPAR6

4BIY00,a34S5R0

2200,
CCR
9140000,R0

0040408000000

s INCREMENT TEST NUMBER
;ARE DATA RELIABILITY TESTS SELECTED?

:IF BITO9 IN SWR = 1; DO RELIABILITY
sELSE SKIP IT
sSETUP MEMORY MANAGEMENT

sPAGES O THRU S BYPASS CACHE
sPAGES 6 AND 7 DON'T BYPASS CACHE

:LET KIPAR6 RE-LOCATE TO 20000-37777
:TURN ON MMU
;ENABLE PARITY ABORTS
.

TEST

AR¢

)

2586
2587
2588

006764

006772

006774
006776
007000
007002
007004
007006
007010
007012
007014
007016
007022
007024
007030
007032

007040
007042

007046

007052
007056
007060
007062
007064
007072
007074

022767
001511
111002

1%:

000001
000001
000114
001630

140000
157777

157777
140000
172144
172114

000010

MoV
MOV

172174
172170

172106

1s:
2%:

BGONTLP:

120205
001403
104000
000070
001325
022767
002002
140310
000401
150310
111002
120204
001403
104000
000071
001325

000003

020067
001034
022703
001013
022767
001420
012705
012703
012704
000411
010405
006103
022767
002002
040304

172060

172062

000210

000007

172014

000377
000021
000356
Ss:

000003

171762

CLR

MOV
MOV

TSTLUP:

172156
172152

MOV

508

172234
172230
172162
000114

000021
000021
172172

)

10:38
PAGE 53
CACHE DATA RAM DATA RELIABILITY

010000

006756
006760
006762

005067

120

006754

012701
005020
077102
012767
012767
013767
012737
005002
005005
012703
012704
005767
001407
012767
012767
000406
012767
012767
016700

11:36

04 APR 84

2547
2548
2549
2350
2551
2552
2553
2554
2355
2556
2557
2558
2559
2360
2561
2562
2563
2564
2565
2566
2567
2568
2569
2370
2571
2572
2573
2374
2575
2576
2577
2578
2579
2580
2581
2582
2583
2584
2585

006614
006620
006622
006624
006632
006640
006646
006654
006656
006660
006664
006670
006674
006676
006704
006712
006714
006722
006730
006734
006740
006746
006750
006752

03-APR 84

30R(1052)

whn

2533
2534
2535
2536
2537
2538
2539
2540
2541
2542
2543
2544
2545
2346

MACY1l

GLOBAL ARE AS
KOJ11A MAC

CLR
CLR
MOV
MOV

TST
8EQ
MOV
MOV
B8R
MOV

MOV

CLR
crp
8EQ
MOVB
cMPB
8EQ
ERROR
. WORD
. WORD

cHpP
B8GE
81CB
B8R
BISB
MOve
cMP8
8EQ
ERROR
. WORD
. WORD

crp
BNE
cHP
BNE
cHe
BEQ
MOV
MOV
MOV
BR
MOV

ROL

ol
8GE
BIC

€10000,

(RO
R1,
oy,
91,

FWDSEQ
ADDL SB

80114,
SLOCOO
ORAMPAR, 80114
R2
RS
R3
021,
R4

FWOSEQ

2140000, FSTADD
Q157777, LSTADD

0157777, FSTADD
0140000, LSTADD
FSTADD, RO

OCOUNT
8.,
DCOUNT
ENDTLP
(RO),P2
RS
R2,
13

70
ERRMSG

o3,
RS,
34
R3,

DCOUNT

(RO)

(RO)
(RO),R2
R4
R2,
L3}

ERRMS(
RO,
84
8210,

o7,

OCOUNT

78
2377,
21,
0356,
74
R4,
R3
03,
64
RS,

oCLEARING CACHE

$___»

s INIT UPWARD ADDRESSING INDICATOR
1 INIT LSB AND DO LOOP UNTIL SHIFTED QuT
1SAVE CONTENTS OF VECTOR 114
1LET VECTOR POINT TO ABORT ROUTINE
s INIT RECDAT.

s INIT CURRENT DATA
s INIT DATA TO BE WRITTEN
s INIT EXPECTED DATA

1 IF ADDRESSING UPWARD

TEST

LSTADD

RS
RS
R4

1 THEN
1LET FIRST ADDRESS EQUAL LOWEST VALUE

'EE;ELAST
|

sLET FIRST

ADDRESS EQUAL

MIGHEST

ADDRESS EQUAL HIGHEST

VALUE

sLET LAST ADDRESS EQUAL LOWEST VALUE
tLET CURRENT ADORESS EQUAL FIRST ADDRESS
s INIT LOOP COUNTER
00 LOOP 8 TIMES (4 TIMES TO WRITE 1 S
tAND 4 TIMES TO WRITE BACK 0°S)
sFIRST READ LOCATION
1 IF RECIEVED DATA NOT EQUAL
iDATA THEN

TO EXPECTED

s+ IF RECIEVED DATA NOT EQUAL
1DATA THEN

TO EXPECTED

sALL ERRORS TO IRAP 10O EMT VECTOR
tUNIQUE ERROR NUMBER
3sADORESS OF ERROR MESSAGE
sCACHE SYSTEM ERROR
1 IF LOOP COUNT GREATER THAN 3
s THEN
tCLEAR TEST DATA BY WRITE DATA
sELSE
1SET TEST DATA BY WRITE DATA
:1D0 READ AFTER WRITE

sALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
:ADDRESS OF ERROR MESSAGE
sCACHE SYSTEM ERROR
'¥;ESURRE~T ADORESS EQUALS LAST ADDRESS

1AND IF WRITE PATTERN EQUALS LAST
tPATTERN THEN
$AND TEST IS NOT ON LAST LOOP

: THEN
$SET UP TO WRITE O'S

s ELSE

1SET UP FOR NEXT DATA PATTERN

DCOUNT

'¢22NIF DOWNWARD ADDRESS ING

VALUE

tLET NEW DATA BE CLEARED Br

WRITE

DATA

359??h.3§ Ho OS"RSAIA4S??§§852) 04 “PR733 lO:éRCHEAE§Y24RAH DATA REL IABILITY TEST
<389
2390
2591
2592
2593
2594

2595

2596
2597
2598
2599
2600
2601

2602

2603
2604
2605
2606
2607
2608
2609
2610
2611
2612
2613

2614
2615
2616
2617
2618
2619
2620
2621
2622
2623
2624
2625
2626
2627
2628
2629
2630
2631
2632
2633
2634
2635
2636
2637
2638
2639
2640
2641
2642
2643
2644

007076
007100
007102
007106
007112
007114
007120
007122
007126
007132
007134
007140
007144
007146
007152
007156
007160
007164
007170
007172
007176
007200
007204
007210
007216
007222
007230
007232
007236
007244
007250
007254
007260
007264
007270
007274

000401
050304
005267
016700
000426
005767
001412
066700
022700

003016
162700

062700
000411
166700
022700

003404
062700
162700
000663
005767
001404
005067
000167
012767
006167
022767
001402
000167
016737
005067
005067
005037

005037
005037
000167

171746

R3S,

FSTADD,

8s:

MOV
B8R
ST
BEQ
ADD

171742
160000

177420
171566
170476
170316
177744
177766
001116

o1,

B8R

108
ADDLSB,

Su8

cHe

171650

171640
000114

SUB
BR
108
ENDTLP: TST
BEQ
CLR
JMP
1%:

ENDLUP:
EXTST:

000000

l%F SDDRESSING UPWARD
3

tCALCULATE NEXT HIGHER ADDRESS
1 IF CURRENT ADDRESS HAS BEEN INCREASED
1ABOVE HIGHEST ADDRESS THEN
;ROLL

tROLL

MOV
ROL

1D0 ADDRESSING DOWNWARD
FWOSEQ

$SET ADDRESSING UPWARD INDICATOR
tUPDATE LSB TO NEXT POSITION

ADDLSB
220000, ADD LSB

CMP
8EQ
JMP
MOV
CLR
CLR
CLR
CLR
CLR
JMP

ADDRESS BACK

sENDDO
3¥ZEQDDRESSING UPMWARD FINISHED

FWOSEQ

FWOSEQ
ISTLLP
el,

ADDRESS BACK

1ELSE
1CALCULATE NEXT LOWER ADDRESS
s IF CURRENT ADDRESS HAS BEEN DECREASED
+BELOW LOWEST ADORESS THEN

*140000,R0O
108
920000, RO
el,
RO
BGNTLP

ADD

171670

1EL

94
ADDLSB, RO
#160000,R0
10¢
€20000, RO

BLE

020000
000001

tUPDATE LOOP COUNTER
'2E§21Y FIRST ADDRESS FOR THIS PASS

10$

suB

ELSE

:LEY NEWDAT BE SET By WRITE DATA

FWOSEQ

ADD

171716
140000

020000

DCOUNT

cHe
8GT

020000
000001

171662
177446
000001
171646

8IS
INC

171766
171746

68:
7¢:

SEQ 0054

sWE ONLY GO AS FAR AS

EXTST

s ENDDO

SLOCOO, 80114
CCR
SRO
SOMSER
80CPEREG
S4SOFTER

tRESTORE VECTOR 114
s INIT CCR FOR EXIT

TSTLUP

10000

1 TURN OFF MMU
:CLEAR THE MEM SYS ERROR REG
;CLEAR THE CPU ERROR REGISTER
;CLEAR THE SOFT ERROR COUNT
: JUMP OVER DATA TABLES OR SUBROUTINES
17O NEXT TEST

TST21

CTST2S;
119006000000 008008008000004000000000000000000044040000000800000008

soTEST 21

TAG RAM DUAL

ADDRESS

TEST

1500008000800000080080000000000000800000000000484004000408000000000

sTAG STORE RAM TESTS -

s JEST IS AN ADDRESSING

THERE ARE TWO TESTS FOR THE TAG STORE RAMS.

TESY

TO ENSURE NO DUAL ADDRESSING OF

THE

THE FIRST

TAG STORE.

sTHE SECOND TEST IS A “GALLOPING ONES AND ZEROS" TEST THAT CHECKS THE DATA
JRELIABILITY OF THE TAG RAMS.
s

1OUAL ADDRESSING TEST
1 THE FIRST

- THIS WILL BE DONE BY FIRST FLUSHING THE CACHE,

256(10) LOCATIONS (BLOCK 0) WILL BE WRITTEN WITH ADDRESSES

THEN

THAT

iWILL CAUSE A INCREMENTING PATTERN TO BE STORED IN THOSE LOCATIONS OF THE TAG
;STORE RAM. NEXT THE ENTIRE 4K ADDRESS RANGF WILL BE READ. THE HIT/MISS
sREGISTER SHOULD ONLY REPORT HITS ON THE ACORESSES THAT WERE ALLOCATED. TMIS

+PROCESS WILL
i

REPEATED FOR EACH BLOCK

s INITIALIZE LOW ADDRESS
sSETUP AND ENABLE MMU
;sINITIALIZE BLOCK COUNTER

FOR

TOTAL

(10)

BLOCKS.

:bO?Ah AR

2645
2646
2647
2648
2649
2650
2651
2652
2653
2654
2655
2656
2657
2658
2659
2660
2661
2662
2663
2664
2665
2666
2667
2668
2669
2670
2671
2672
2673
2674
2675
2676
2677
2678
2679
2680
2681
2682
2683
2684
2685
2686
2687
2688
2689
2690
2691
2692
2693
2694
2695
2696
2697
2698
2699
2700

Aty

&1&45? §852)

APRI

D5
10: 98¢ RAREDOR. apORESS TEST

+00 UNTIL

ALL BLOCKS

TESTED (16

SEQ 0055

TIMES)

FLUSH CACHE AND SET DIAGNOSTIC BITY

LET

CURRENT

ADDRESS

LOW ADDRESS

Se
s,

INITIALIZE ALLOCATION COUNTER
DO UNTIL ENTIRE BLOCK ALLOCATED (256 TIMES)

READ CURRENT

IF CURRENT ADDRESS <

32K

THEN

ADDRESS

ELSE

.
H

ENDIF
UPDATE CURRENT ADDRESS (ALSO ADD 200

3.
:.
3.
.
3.

3.
3.
:.
;.

éNODO

ADDRESS

TO PAR)

INITIAL1ZE GOOD ADDRESS
INITIALIZE CURRENT ADDRESS
INITIALIZE LOCATION COUNTER
SAVE CONTENTS OF VECTOR 114
LET VECTOR 114 POINT TO TAG STORE PARITY

ABORT ROUTINE
00 UNTIL ALL LOCATIONS CHECKED (256 TIMES)
.

INITIALIZE CHECK COUNTER

00 UNTIL ADDRESS IN EACH BLOCK CH-CKED
.
READ CURRENT ADDRESS
IF HIT THEN
IF CURRENT ADDRESS NE GOOD ADDRESS
ERROR

CACHE

SYSTEM

ENDIF

IF CURRENT ADDRESS EQUAL GOOD ADDRESS
.
ERROR IN CACHE SYSTEM
ENDIF

.
ENDIF
UPDATE GOOD ADDRESS (ADD 22)
UPDATE CURRENT ADDRESS

i
ENDOO
; ENDDO
;DISABLE MU

THEN

ELSE

.
i
HR
i

.
;.
3.
3.

WRITE CURRENT

.
ENDDO
UPDATE LOW ADDRESS (ADD 02000)

THEN

sRESTORE VECTOR 114
1ENDTST
i1R3=GO0DAD

1RS=CURADD

007274
007274
007300
007306
007310
007314
007322
007326
007334
007342
007350
007356
007364

H 3““0‘.““‘..“‘..“..‘AC“..““.“‘“‘.“‘.“‘.‘..‘...l.....

005267
032777
001402
000167
012767
004767
012767
052737
012767
012737
012737
016705

171504

TS721:;

000400

171540

000404
140000

171564

000020
000001
177760
002000
000402

163162
177572
171510
172354
177746

172064

171516

300s:

INC
8IT
BEQ
JMP
MOV
JSR

$TESTN
4BIT08,aSWR
3008
108
€140000,LOWADD
PC,
INITMM

BIS
MOV
MOV
MOV

#8IT00,845R0
6-16.,
LOOPIN
92000, BoKIPARG
2402,
84CCR

MOV

18:

MOV

LOWADD,

: INCREMENT TEST NUMBER
: IS THIS AN 18 BIT SYSTEM?
100 THIS TEST IF IT ISN'T
sELSE: JUMP TO END OF TEST
s INITIALIZE LOW ADDRESS (USE PARé6)
s INITIALIZE MU
tENABLE 22 BIT

ADDRESSING

1ENABLE MU
100 UNTIL ALL BLOCKS TESTED
$1SET KIPAR6 RELOCATION CON:TANT
sFLUSH CACHE AND SET DIAG t 17

1GEY

FIRST

ADDRESS

TO PAGE

IN CURRE'
T BL0OCK

GLOBAL ARE AS
KDJ11A.MAC

2708
2702
2703

2704

2705
2706
2707
2708
2709
2710
2711
2712
2713

2714

2715
2716
2717
2718
2719
2720
2721
2722
2723
2724
2725
2726
2727
2722
2729
e3¢
2731
2732
2733

2734
2735
2736
2737
2738
2739
2740
2741
2742
2743
2744
2745
2746
2747
2748

2749
2750
2751
2752
2753
2754
2755
2756

007370
007376
007400
007404
007412
007416

MACY11

30A(1052)

012767
005015
062705
062737
005267
001367

177400

171460

000002
000200
171440

172354

03 APR 84

11:36

APR 84

121

33:
4

10:

ES
5
?20 RAM DURL
ADDRESS TEST
PAGE

MOV
CLR
ADD
ADD

INC
BNE

0-256.,
(RS)

ALLCTR

e2,

2200,

ALLCTR
3

80K TPARG

016703
012705
012737
013767
012737

007452
007460
007466
007470

012767
012767
005015
013702

171462
140000
002000
000114
001630

177400

177761

172354
171364

000114

171376
171366

177752

S$:
6%:
205¢%:

LOWADD,

MOV
MOV

4200
30K 0,
IPARG
80114,
SLOCOO
ORAMPAR, 80114

MOV

MOV
CLR
MOV

0140000,R5

@ 256.,

15.,

(R5)

1ADD 200 TO KIPAR6 TO INC TAG CONTENTS
+ENDDO

MOV

MOV
MOV

sD0 UNTIL ALL ADDRESSES ALLOCATED
sWRITE CURRENT ADDRESS
1UPDATE CURRENT ADDRESS
1 IF ALL

s ADDRESSES MAVE NOW BEEN ALLOCATED,
3 ; THERE WAS NO DUAL ADDRESSING.
007420
007424
007430
007436
007444

SEQ 0056

ALLCTR
DCOUNT

SeHITMIS,R2

WE'LL

ADDRESSES ALLOCATED
CHECK

THAT

s INITIALIZE GOOD ADDRESS
:GET FIRST ADDRESS
sRESET KIPAR6
$SAVE VECTOR
sLET VECTOR POINT TO RAM ABORT ROUTINE
;00 UNTIL ALL LOCATIONS CMHECKED
1DO UNTIL ADDRESS IN EACH BLOCK CHECKED

{WRITE RS

sSAVE THE CONTENTS OF THE HIT/MISS REG

1 THE FOLLOWING CODE IS TO CHECK FOR EXTRA FETCHES CAUSED BY THE PRE FETCH
:BUFFER BEING OVER WRITTEN WHEN BITS 1-5 OF THE PREVIOUS WRITE
+ADDRESS (THE EFFECTIVE ADDRESS OF CLR (RS)) ARE EQUAL TO BITS 1-5
:OF THE CURRENT INSTRUCTION FETCH ADDRESS. (ADDRESS OF MOV 3#HITMIS,R2 INST)

:THE EXTRA FETCH CAUSES

007474
007500
007502

012704
005104
074504

007470

007504
007510

042704
022704

177701
000076

007514
007516
007522
007524
007526
007532

007534
007536
007540
007546

001404
032702
001416
000403
032702
001412
020503
001422
012737
004767

MOV

000010

220%:

230%:
007300
172066

001120

THE HIT MISS REGISTER CONTENTS

comM
XOR

#205¢ ,R4
R4
RS5,.R4

81C
cHe

0177701 ,R4
276,R4

8EQ
8IT
8EQ
B8R
8IT
BEQ

cHe
BEQ
MOV
JSR

2208
eBIT02,.R2
73

230¢
MBITO3,
R2
74

SHIFTED.

s SAVE ADDRESS OF MOVE INST IN R4
;COMPLIMENT R4
sIF ANY OF BITS 1 S IN RS ARE EQUAL
;7O ANY OF BITS 1-5 IN R4 THEN THE
s ADDRESSES WERE NOT EQUAL
sONLY CONCERNED WITH BITS S 1
;IF R4=76

THEN BITS S

IWERE COMPLIMENTS
1 IF

IN R4 AND RS

THEY'RE NOT

s THEN CHECK FOR BIT2 SET IN MIT/MISS REG.
s IF ACCESS WAS A CACHE MISS THEN GO TO 73

tELSE

WAS A HIT;

GO TO 2308

sELSE CHECK FOR BIT3 SET IN HIT/MISS REG.

;éFSéTS

RS,
R3
8s
#75T21+4,80S50
TRE
F
PC.APTSFT

TO BE

NOT

sEL

A HIT

THEN GO

: IF CURRENT ADDRESS NOT EQUAL TO GOOD
; ADDRESS THEN
;MOVE RETRY ADDRESS TO SOFT RETURN
;GO TO SOFT ERROR SUBROUTINE
;CACHE SYSTEM ERROR

007552

007554
007556
007560
007562
007564
007572

104000
000072
001325
020503
001010
012737
004767

7¢:

007300
172042

001120

ERROR
.WORD
. WORD

cHp

BNE
MOV
JSR

ERRMSG

RS,

@T5121+4,80STRE
0F
PC.APTSFT

1GOT A CACHE MISS WHEN EXPECTING A TMIT.
sALL ERRORS TO TRAP TO EMT VECTOR
tUNJIQUE ERROR NUMBER
1ADORESS OF ERROR MESSAGE
3¥;€§URRENT ADDRESS EQUAL GOOD ADDRESS
H

sMOVE

RETRY

ADDRESS

TO SOFT RETURN

;GO TO SOFT ERROR SUBROUTINE
tCACHE SYSTEM ERROR

GLOBAL

AREAS
KDJ11A MAC

2757
2758
2759
2760
2761
2762
2763
2764
2765
2766

2767

2768
2769
2770
2771
2772
2773
2774
2775
2776
2777
2778
2779
2780
2781
2782

007576
007600
007602
007604

007610
007614
007616
007622
007626
007632
007640
007644
007646
007654
007660
007662
007666
007672

007700
007704
007710
007714
007720

MACY11

03 -APR 84
104000
000073
001325
062705
005267
002724
062703
042705
062705
062737
005267
002705
062767
005267
002002
000167
005067
016737
005037
005037
005037
000167

30A(§252)

11:

APR -84
T21

001000

8s:

171240

000002
017000
000002
000200
171212
001000
171200

177462
167700
171132
177744
177766

172354

F5S
PAGE 57
G RAM DUAL

ERROR
.WORD
. WORD
ADD
INC
BLT
ADN
BIC
ADD
ADD

INC
BLT

171232

000114

10:?3

ADD

9s:

INC
8GE
JMP
CLR

MOV

CLR
CLR
CLR
JMP

001116
000000

10¢:

ADDRESS

SEQ 0057

TEST

31GOT

73
ERRMSG
01000,

DCOUNT

64
Qe2,
217000,
02,
9200,
ALLCTR
5%
21000,

LOOPIN
9
13
SRO

R3
RS
RS
JMCIPARE

LOWADD

SLOCOO, 80114
8OMSER
80CPEREG
80SOFTER
TST22

A CACHE

HIT WHEN EXPECTING A MISS.

tALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE
sUPDATE TO NEXT BLOCK
: IF

ADDRESS NOT

; IF

ALL

CHECKED FOR EACH BLOCK

s ENDODO
;UPDATE GOOD ADDRESS
1UPDATE ADDRESS TO BE CHECKED
ADDRESSES CHECKED

sENDDO
:{UPDATE TO NEXT BLOCK TO BE ALLOCATED
s IF ALL BLOCKS WERE TESTED

s ENODO

sDISABLE MMU

sRESTORE

ABORT

:TO NEXT

TEST

sCLEAR THE
;CLEAR THE
;CLEAR THE
;JUMP OVER

VECTOR

MEM SYS ERROR REG
CPU ERROR REGISTER
SOFT ERROR COUNT
DATA TABLES OR SUBROUTINES

AREAS
GLOBAL
08
KDJ11A MAC

03" APR 4a 01+ 36
MACY11

30A(]1052)

27 83

2788
2789
2790
2791
2792
2793
2794
2795

2796

2797
2798
2799
2800
2801
2802
2803
2804
2805
2806
2807
2808
2809
2810
2811
2812
2813
2814
2815
2816
2817
2818
2819
2820
2821
2822
2823
2824
2825
2826
2827
2828
2829
2830
2831
2832
2833
2834
2835
2836
2837
2838

007720

TAG RAM DUAL ADDRESS TEST

10:38

.DSABL

2784

2785
2786
2787

121

APR_84

PAGE

SEQ 0058

AMA

CcTsT24:
H ;“““““.“““.“““‘“‘.“.“‘.“.““‘.‘.“.‘0

;o TEST

007720
007720
007724
007732
007734
007740
007746
007750
007756
007760
007764
007772
010000
010004
010010
010016
010024
010032
010036
010042
010046
010054
010056
010060

‘.‘0‘..“.‘

TAG

RAM

DATA

RELIABILITY

TEST

H ;“.‘.‘““‘t““.“““‘“.‘..““.“““‘.“‘..‘
.‘.“.““

005267

032777

001002
000167
032777
001404
012767

000402

005067
013767
012737
005037
004767
042767
012767
012767
012701
012702
012700
012767
012221
077002
000137

171060

001000

.‘.‘

1S122:

INC

171114

BIT

000772
000400

171100

177777

171064

BNE
JHP
BIT
BEQ
MOV

171056
000114
000116
000116
171402
100000
000020
001600
100000
000000
010000
000001

171036
000114

10008:

1001$:
10028:

162274
162472
162316

167516

1008:

110064

B8R

CLR
MOV
MOV
CLR
JSR
BIC
MOV
MOV
MOV
MOV
MOV
MOV
MOV
S08
M

$TESTN

08IT09,8SWR

1000
XXX
081708, BSWR
1001
0177777 ,FLAG

10024

FLAG
84114, 5L0C00
0116,80114
20116
PC,
INITMM
#BIT1S,KIPORS
#20,SR3
#1600 ,KIPARS
9100000, R1
00,R2
04096 . ,RO
e1,SRO
(R2)+,(R1)+
RO,100%
801014 +100000

: INCREMENT
1ARE

010064
010070
010074
010102
010106
010110

012701
005037
042737
012702
005721
077202

140000
172354
100000
010000

010112
010120
010124

012737
012701
012706

000002
110672
120000

010130

012702

140002

101%:

TEST NUMBER
RELIABILITY

TESTS

SELECTED?

1IF BITO9 IN SWR = 1 ;THEN DO TEST
iELSE GO TO ENO.
:IS THIS AN 18 BIT SYSTEM?
s IF BITO8 IN SWR=0 BRANCH TO 1001$
iSET UP INDICATOR FOR 18 BIT SvS

iSET_UP INDICATOR FOR 22 BIT SYSTEM
iSAVE OLD PARITY ERROR VECTOR
sPUT TRAP CATCHER IN FOR CACHE PARITY ERRORS
:
s INITIALIZE MMU
;:CLEAR CACHE BYPASS ON PDRS
JENRBLE 22 BIT ADDRESSING.
1SET KIPAR4 TO RELOCATE TO BANK 7 OF MEM.
sSET UP R1 AS POINTER TO BANK 7 VIA KIPAR4
;SET UP R2 AS POINTER 7O SANK O
iSET UP RO AS COUNTER
iTURN ON MMU
iMOVE ALL THE COCE IN FIRST 4KW TO BANK 7
:
:START EXECUTING OUT OF BANK 7

iWE ARE NOW OPERATING FROM PHYSICAL MEMORY
3

DATA

IN BANK

7 (160000-177776)

MOV
CLR
8IC
MOV
TST
S08

0140000, R1
SOKIPARG
0BIT1S,80KIPORO
#10000, R2
(R1)+
R2,
1$

sSETUP TO INIT CACHE TAG STORE TQ ZEROS
1SET KIPAR6 TO RELOCATE TO PAGE O
iALLOW CACHE REFERENCE ON PAGE ZERO
s INITIALIZE 4K WORDS
:CLEAR TAG STORE
;LOOP UNTIL ALL OF TAG STORE INITIALIZED

MOV
MOV
MOV

#BIT01,80CCR
#TAGAD1+ 100000, R1
9120000,R6

:SET_DIAGNOSTIC BIT IN CCR
sMAKE R1 A POINTER TO TABLE OF DATA,
iSET UP TEST ADDRESS IN Ré

sSTART

MOV
TESTING

9140002, R2

1R2 WILL BE USED TO INDEX

FLDO:

MOV

(R1)+,80KIPARS

172300

18:
177746

1USING R6 TO SPEED UP TEST LOOP
THRU

THE

CACHE.

:THE OBJECT OF THIS TEST IS TO TRY EVERY POSIBLE DATA COMBINATION AT A
sGIVEN ADDRESS WHILE ALL OTHER ADDRESSES ARE SET TO ALL ZEROS. ONCE A
sCHANGE IN THE DATA AT A PARTICULAR ADDRESS HAS BEEN MADE; ALL OTHER
sADDRESSES ARE CHECKED TO ENSURE THAT DATA HAS NOT BEEN ALTERED. WHEN ALL
sDATA COMBINATIONS HAVE BEEN CHECKED AT A PARTICULAR ADDRESS; THAT ADDRESS
;IS RESEYT TO ZEROS AND THE NEXT CONSECUTIVE ADRESS IS TESTED. THIS IS DONE
SUNTIL ALL 4096 LOCATIONS HAVE BEEN TESTED.
010134

012137

172352

iMOVE RELOCATION OFFSET

(DATA

THAT

wWILL

GLOBAL AREAS
KDJ1.1A
MAC

2839
2840
2841
2842
2843
2844
2845
2846
2847
2848
2849
2850
2851
2852
2853
2854
2855
2856
2857
2858
2859
2860
2861
2862
2863
2864
2865
2866
2867
2868
2869
2870
2871
2872
2873
2874
2875
2876
2877
2878
2879
2880
2881
2882
2883
2884
2885
2886
2887
2888
2889
2890
2891
2892
2893
2894

MACY11 30A(1052)
03-AP R 84 11:36

010140
010144
01¢.46
010154
010156
010162
010164
010166
010170
010172

005767
001403
042737
005016
013703
005703
001403
104000
000074
001325

010174
010174
010176
010204
010206
010210
010212

005716
032737
001003
104000
000075
001325

010214

010220
010224
010230

010232
010234

010236

010242
010244

010246
010250
010252

170000

€10302
010304

005711
001313

010306
010312
010314
010320

022706
001410
062706
062702

is:

B8EQ
8IC
CLR

MOV
TST

FLAG

4170000,
86K IPARS

000010

160000

15T

177752

BIT
BNE
ERROR
. WORD
. WORD

100$:
1$:
2$:

101¢:

037776
020002

102¢:
3s:

MOV

cMpP
8EQ
TST

817
BEQ
S0B
ERROR
. WORD
.WORD

81C
BR
MOV
suB
cHe
BEQ
ERROR

137776
000002
000002

Ss:

iBE IN THE TAG RAMS) TO KIPARS.
+IS THIS AN 18 BIT SYSTEM
1BRANCH IF NOT
s+MODIFY FOR 18 BIT SYSTEM

1LOAD TAG RAMS WITH DATA PATTERN.
+SAVE CONTENTS OF HIT/MISS REG IN R3

FLDOA

:BRANCH TO FLDOA

ERRMSG

sHIT

MISS

tALL

ERRORS

SHOULD BE

TRAP

TO EMT

sCHECK

sUNIQUE ERROR NUMBER

ERRMSG
94096. ,RO

481I702,R4
#160000,RS
R5,R2
1023

CLEAR

VECTOR

sUNIQUE ERROR NUMBER
+ADDRESS OF ERROR MESSAGE
sCACHE SYSTEM ERROR
{ERROR!! WE GOT A CACHE HIT- WANTED A MISS

(R6)
0BITO3,90HITMIS
100

THAT CACHE WAS PROPERLY ALLOCATED.

tWE'RE LOOKING FOR
{ALL

ERRORS

A HIT

TRAP

THIS

TO EMT

TIME.

VECTOR

s ADDRESS OF ERROR MESSAGE

;CACHE SYSTEM ERROR
s:ERROR!
s INIT RO TO COUNT AKWORDS.
;LOAD DATA INTO R4 TO SPEED UP BIT INST,
:LOAD DATA INTO RS TO SPEED UP CMP INST,
:IF

TOP OF CACHE HAS BEEN REACHED

(R2).

:GO RESET R2 TO 140000
;:ENSURE THAT OTHER CACHE LOCATIONS

R4 ,B80HITMIS

sALL

RO, 1

76
ERRMSG

#37776,R2

R2,R3
220002 ,R3
R3,.R6
43
77

-WORD

ERRMSG

TS7
BNE

FLDO

cHe
BEQ

FLDL

ADD
ADD

SEG 0059

TEST

(R6)
SOHITMIS,R3
R3

FLDOA:

177752

001403
104000
000077
001325

172352

BEQ
ERROR
.WORD
.WORD

030437
001407
077007
104000
000076
001325

010272
010274
010276
V10300

10:38
PAGE S9
TAG RAM DATA RELIABILITY
TST

177752

010000

042702
000765
010203
162703
020306

APR_g4
122

170676

012700
012704
012705
020502
001410
005722

010254
010260
010262
010264
010270

HS
04

(R1)

2137776 ,R6

02.R6
@2,R2

;WERE UNAFFECTED.
CACHE

LOCATIONS

SHOULD HIT.

;KEEP GOING UNTIL WE GET A MISS
:TEST THE NEXT CACHE LOCATION
;ALL ERRORS TG TRAP TO EMT VECTOR
{UNIQUE ERROR NUMBER
;ADDRESS OF ERROR MESSAGE

;CACHE SYSTEM ERROR
;ERROR! WE SHOULD HAVE GOTTEN A MISS
sBEFORE FALLING THRU SOB
{RESET R2 TO 140000

: SAVE CONTENTS OF R2 IN R3
;SUBTRACT 20002 FROM CONTENTS OF R3
;SHOULD BE EQUAL. IF NOT; THEN THE
;CACHE RAM HAS BEEN ALTERED
;GO TO NEXT TEST
tALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
; ADDRESS OF ERROR MESSAGE
;CACHE SYSTEM ERROR

tHAVE

TRIED ALL

PATTERNS

THIS LOC?

;GO GET NEXT ADDRESS IF YES.
s IF NOT GO DO THE NEXT DATA PATTERN,

sHAVE WE TESTED ALL AKW CACHE LOCATIONS/
;IF YES THEN GO TO NEXT TEST

sELSE GET
BUMP R2

THE NEXT ADDRESS...

GLOBAL AREAS
KDJ11A.MAC

2895
2896
2897
2898
2899
2900
2901
2902
2903
2904
2905
2906
2907
2908
2909
2910
2911
2912
2913
2914
2915
2916
2917
2918
2919
2920
2921
2922
2923
2924
2925
2926
2927
2928
2929
2930
2931
2932
2933
2934
2935
2936
2937
2938
2939
2940
2941
2942
2943
2944
2945
2946

2947

2948
2949
2950

MACY11 30A(1052)
O3-APR 84 11:36

010324
010330

012701
000167

177600

010334
010340

012701
012737

140000
077600

010346
010352
010354
010362
010370
010374

010410
010414
010420
010424
010426
010434
010436
010442
010444
010446
010450
010452

005767
001406
042737
012737
012702
005021
077202
012701
012706
012702
012137
005767
001403
042737
005016
013703
0057¢3
001403
104000
000100
001325

010454
010454
010456
010464
010466
010470
010472

005716
032737
001003
104000
000101
001325

010474
010500
010504
010506
010510

012700
012705
020502
001412
005022

010376
010400
010404

010512
010516
010522
010524
010526
010530
010532

010534
010540
010542
010546

013703
032703
001407

10:38

110672

170000
000002
010000

172354

FLD1:

172354

177746

110704
120000
140002
172352
170416

100%:

FLD1A:

172352

177752

MOV

1¢%:

170000

PAGE 60

TAG RAM DATA RELIABILITY

MOV
JHP

170470

1$:

TST
8EQ
8IC
MOV
MOV
CLR
508
MOV
MOV
MOV
MOV
157
BEQ
8IC
CLR
MOV
TST

BEQ

ERROR
.WORD
.WORD
FLD18:

000010

010000
160000

177752

1¢:

1004%:
2%:

101
177752
000004

077011
104000
000102
001325

042702
000763
012704
010267

04 APR 84
T22

1028

103s:

037776

104
:

010512
170332

105¢:

157

#TAGAD1.100000,R1
FLDO

sRESET DATA POINTER
3100 IT AGAIN

s INIT R1
1DATA IN KIPAR6 WILL CAUSE

277600, 30KIPAR6E

FLAG
100%
€170000,
80K IPARG
#81701,a0CCR
#409¢6. ,R2
(R1).
R2,14
@TAGAD2+1006000,R1
€120000,R6
2140002,R2
(R1)+,80KIPARS

FLAG
1

€170000,
80K IPARS
(R6)
SOHITMIS
,R3

FLD1B

170 BE

SET

TO ALL

1°S.

TAG RAMS

$IS THIS AN 18 BIT SYSTEM?
$1BRANCH IF NOT

+sMODIFY FOR 18 BIT SYSTEM
+SET DIAGNOSTIC BIT IN CACHE CONTROL REG
$SET UP TO FILL aKW OF CACHE WITH ONES
;WRITE

THE

CACHE

1SET UP R1 AS A POINTER TO DATA TABLE
1SET UP TESTADDRESS
1SET UP Re
1DATA IN KIPARS WILL BE WRITTEN INTO TAG RAM
$IS THIS AN 18 BIT SYSTEM?
1BRANCHIF NOT

iMODIFY FOR 18 BIT SYSTEM

sWRITE

TAG RAM WITH TEST DATA

tSTORE CONTENTS OF HIS MISS REGISTER

:HIT/MISS REGISTER

;BRANCH IF

SHOUWWLD BE

IT WAS A MISS

CLEAR

100
ERRMSG

;ALL ERRORS TO TRAP TO EMT VECTOR
;UNIQUE ERROR NUMBER
:ADDRESS OF ERROR MESSAGE
sCACHE SYSTEM ERROR

(R6)

s TEST ADDRESS SHOULD NOW BE ALLOCATED IN CACHE

BIT
BNE
ERROR
. WORD
LHORD

101
ERRMSG

MOV
MOV
cHe
8EQ
CLR

#4096. ,RO
2160000,R5
R5,R2
1044
(R2).

MBITO3,90HITHIS
100

MOV
BIT
8EQ
S08
ERROR
. WORD
.WORD

102
ERRMSG

8IC
BR

@37776,R2
101

MOV
MOV

SEQ 0060

TEST

SOHITMIS
,R3
MIT02,R3
105
RO,2$

01028 ,R4
R2,CURADD

;0ID IT HIT?

1BRANCH IF YES
sALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
:ADDRESS OF ERROR MESSAGE
sCACHE SYSTEM ERROR
sINIT RO TO COUNT 4 KMWORDS
:STORE DATA IN R5 FOR FASTER CMP INST.
:IF THE TOP OF CACHE HAS BEEN REACHED
;s THEN GO RESET R2 TO 140000

.CHECK THE OTHER CACHE LOCATIONS T0

$SEE THAT THEY STILL MIT,
: SAVE MIT MISS REG IN R3
;0ID IT HIT?
:KEEP TESTING UNTIL A MISS OCCURS

sTEST THE NEXT CACHE LOCATION
tALL ERRORS TO TRAP TO EMT VECTOR

tUNIQUE ERROR NUMBER
sADDRESS OF ERROR MESSAGE

sCACHE SYSTEM ERROR
sERROR! SHOULD NOT HAVE FALLEN THRU
1508 INST BEFORE GETTING A MISS

sRESET R2

140000

{SAVE ADDR OF MOV INSTRUCTION IN R4

iSAVE

IN CURADD

GLOBAL AREAS
XDJ11A.MAC

2951
2952
2953
2954
2955
2956
2957
2958
2959
2960
2961
2962
2963
2964
2965
2965
2967
2968
2969
2970
2971
2972
2973
2974
2975
2976
2977
2978
2979
2980
2981
2982
2983
2984
2985

2986

2987
2988
2989
2990
2991
2992
2993
2994
2995
2996
2997
2998
2999
3000
3001

MACY11

O3-APR 84

010552
010560
010566
010572
010576
010600
010694
010606
010610
010612
010616
010620
010622
010624
010626

162767
042767
042704
020467
001004
032703
001401
000746
010203
162703
020306
001403
104000
000103
001325

010630
010632

005711
0014090

30A(1052)

11:36

000002

177701
177701
170306

APR 84
122

10:38

170324

170316

000010
3s:

020002

TAG RAM DATA RELIABIL1TY

Su8
B8IC
B8IC
cHP
BNE
BIT
8EQ
B8R

MOV

SuB

cMP
BEQ
ERROR
.WORD
.WORD
4%

PAGE 61

TST

BEQ

02 ,C'URADD
#177701,CURADD
0177701,R4
R4 ,CURADD
3
48ITO3,R3
3

103¢

R2,R3
220002 ,R3
R3,R6
44

103
ERRMSG

(RL)

SEQ 0061

TESTY

tSUBTRACT 2 FROM R2
sONLY INTERESTEC IN BITS 1-S

iSTRIP OFF UN-NEEDED BITS

)%FESITS 5-1IN R4 AND CURADD HRE EQUAL?

;s TEST BITO3 IN HIT MISS REG
sIF ITS A HIT THEN DO THE NEXT

1STORE CONTENTS OF R2 IN R3
:SUBTRACT 20002 FROM R3Y
+IS R3= TO THE TEST ADDRESS.
:BRANCH IF THEY ARE EQUAL
sALL ERRORS TO TRAP TO EMT VECTOR
;UNIQUE ERROR NUMBER
tARDDRESS OF ERROR MESSAGE
sCACHE SYSTEM ERROR
sWAS

ADDR

THIS

THE

LAST PATTERN FOR

:sGO GET NEXT ADDRESS IF YES

THIS LOCATION?

:CHECK TO SEE IF ALL LOCATIONS HAVE BEEN TESTED. IF NOT, GENERATE THE NEW
;ADDRESS. RESET THE DATA POINTER AND TEST THE NEXT CACHE LOCATION.

010634

010640
010642
010646
010652
010656
010662
010666

010672
010674
010676
010700
010702
010704
010706
010710
010712
010714
010716
010722
010726
010732
010740

022706
001412
005062
062706
062702
012701
000167
000137

137776

68:

177776
000002
000002
110704
177526
010716

8$:

iAGADI:

TAGADZ:

135600

000000

016737

177746

TSEND:

177572

001000
170072
170066

ADD
ADD

MOV

104200
010400
121000
042000
000000
073400
167200
056600

005037
005037
012706
016737

cHp
8EQ
CLR

000114
000116

XXX:

#137776,R6
8s

-2(R2)

#2,R6
02,R2
#TAGAD2+100000,R1

FLO1A

S0TSEND

sHAVE

;IF

YES

TESTED

THEN GO

ALL

4KW CACHE

TO END OF

167200
056600
135600
000000

:CLEAR THE CCR

9ST807,R6
SLOCOO, aelild

SLOCO1,

80116

LOCATIONS?

;ELSE WRITE ONES IN THE LOCATION LAST
;:GET THE NEXT ADDRESS.
..
;BUMP R2
;RESET DATA POINTER
100 IT AGAIN
:JUMP OUT OF BANK 7

104200
010400
121000
042000
000000
073400

80CCR
845SR0O

TEST

;TURN OFF

MMU

sRESTORE STACK POINTER
;RESTORE VECTOR

TESTED

GLOBAL AREAS
KDJ1 1A MAL

MACY11 30A(1052)
O3 APR 84 11:36

APR 64
122

IKS
10:38
PAGE 62
TAG RAM DATA RELIABILITY

SEQ 0062

TEST

3002
gggz

.MCALL
.SBTTL

3005

FiNBA4440040000000800A08000000000040040000R00000000000840000000440

3006
3007
3008
3009
010
3011
3012
3013
3014
3015
3016
3017
3018
3019
3020
3021
3022
3023
3024
3025
3026
3027
3028
3029
3030
3031
3032
3033
3034
3035
3036
3037
3038
3039
3040
3041
3042
3043
3044
3045
3046
3047
3048
3049
3050
3051
3052
3053
3054
3055
3056

3057

IDMSG,ENDPAS
END OF PASS ROUTINE

s s INCREMENT THE PASS NUMBER ($PASS)
;#INDICATE END OF -PROGRAM AFTER 1 PASSES THRU THE PROGRAM
;#IF THERES A MONITOR GO TO IT
;¢IF THERE ISN‘T JUMP TO RESTART
010746
010746
010752
010754
0107690
010760
010764
010772
010774
010776
011000
011002
011004
011006
011012
011016
011020
011024
011030
011032
011034
011036
011040
011042
011044
011044
011046
011050

011054
011062
011070
011076
011104
011112
011120
011126
011134
011135
011142
011150
011156

005767
001002
104401

005267
042767
005327
000001
003022
012737
000001
010774
104401
016746
104405
104401
013700
001405
000005
004710
000240
000240
000240
000137
002176
377
011054
005015
026515
042113
040503
042515
051440
020115
047516
000
015
046504
020104
021440
o11162

$EOP:

170034

011054

170022
100000

SKIPID:

170014
$EOPCT:

$ENOCT:
011135
167770
011050
000042

$GET42:

$ENDAD:

$DOAGN:

TST
BNE
TYPE

$PASS
SKIPID
MSG1

INC
8IC
DEC
.WORD
8GT
MOV
.WORD
$EOPCT
TYPE
MOV
TYPODS
TYPE
MOV
BEQ
RESET
JSR
NOP
NOP
NOP

$PASS
2100000, $PASS
(PC).
1
$00AGN
(PC)+,8(PC)H
1

+M5G2
$PASS, -(SP)
» SENULL
8042,R0
$DOAGN

PC,(RO)

377

000

055103
026502
030512
044103
047515
051531
044504
052123

042113
020060
020061
020105
054522
042524
043501
041511

MSG1:

JMP
.WORD
.BYTE
.EVEN
ASCIZ

041412
020102
040520
000

045532
047105
051523

M5G2:

LASCIZ

.EVEN
.SBTTL

TYPE ROUTINE

$RTNAD:
SENLL:

sONLY TYPE MESSAGE AT END OF FIRST PASS
:IF >0 THEN SKIP THE ID MESSAGE
:ELSE TYPE THE ID MESSAGE

: s INCREMENT THE PASS NUMBER
:3DON'T ALLOW A NEG., NUMBER
1:LO0P?
i YES
1 ;RESTORE COUNTER

; sSAVE $PASS FOR TYPEOQUT
;GO TYPE--DECIMAL ASCII WITH SIGN
$sGET MONITOR ADDRESS
: sBRANCH IF NO MONITOR
$ ;CLEAR THE WORLD
::GO TO MONITOR
¢ 1SAVE ROOM
i :iFOR
$3ACT11

(PC)H»
RESTART
-1,-1,0

<CR><LF>/CZKDMB END PASS &/

: sRETURN

: sNULL CHARACTER STRING

<«CR><LF>/CZKDM-B O KDJ11 CACHE MEMORY

SYSTEM DIAGNOSTIC/

FIMAARAA
000000000000
AAGA
4 480040800000
A0LA
808000000080
044
000004040

; *ROUTINE TO TYPF ASCIZ MESSAGE. MESSAGE MUST TERMINATE WITH A O BYTE.

GL OBAL ARE AS
KDJU11A, MAC

MACY11

03 APR 84

30A(1052)

11:36

APR 84

3058
3059
3060
3061
3062
3063
3064

3065
3066
3067
3068
3069
3070
3071
3072
3073
3074
3075
3076
3077
3078
3079
3080
3081
3082
3083
3084
3085
3086

3087
3088
3089
3090
3091
3092
3093
3094

3095

3096
3097
3098
3099
3100
3101
3102
3103
3104
3105
3106
3107
3108
3109
3110
311
3112
3113

TYPE

éO:SB

;#THE

ROUTINE

PAGE

ROUTINE

;oNOTEL:

WILL

SEQ 0063
INSERT

NUMBER

NULL

CHARACTERS

AFTER

LINE

FEED.

$NULL CONTAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER.
$FILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED.
$FILLC CONTAINS THE CHARACTER TO FILL AFTER,

;s eNOTE?:
;s ¢eNOTES:
HEJ

;s sCALL:

;#1) USING A TRAP INSTRUCTION
TYPE
+MESADR
; ¢OR

s e

TVPE

MESADR

1 sMESADR IS FIRST ADDRESS OF AN ASCIZ STRING

HES

011162
011166
011170
011172
011174
011176
011202
011210
011212
011220
011222
011226
011232
011234
011242
011244
011246
011250
011252
011254

011260
011262
011266
011270
011274
011276
011300

011302
011304
011310
0113312
011316
011322
011324
011330

011334

011336
011342

011346

105767
100002
000000
000430
010046
017600
122767
001011
132767
001405
010067
004767
000000
132767
001003
112046
001005
005726
012600
062716
000002
122716
001430
122716
001006
005726
104401
001403
105067
000755
004767
126726
001350
016746

105366
002770
004767
105367
000770

000343

000002

$TYPE:

1s:

TSTB
BPL
HALT
BR
MOV

167610

000100

167601

BITB

167557

MoV
JSR
. WORD
8ITB

000040

cMPB
BNE
8EQ

61$:
62$:

2%:

000002

60$:
3s:

000011

4% :

000200

000206

S5%:

6%:

BNE
MOV

000176

000001
000032
000144

JSR

7%:

DECS

BLY

JSR
DECB
B8R

sHORIZONTAL

QAPTENV, SENV
624
OAPTSPOO
, $ENVM
L
624
RO,61%
PC,$ATY3
0
QAPTCSUP, $ENVH

603
(RO)+, -(SP)

02,(5P)

OHT ,(SP)

cMPB

; sLEAVE
; sSAVE RO

(SP).
(SP)+,RO

TST
MOV
ADD
RTI

CLR8
BR

3
RO, -(SP)

TYPE
$CRLF

000202
000056

BNE
MOove
BNE

8EQ
cMPB
B8NE
TST

;:3BR IF YES

82(SP),RO

MOV

000001

000004
001622

$TPFLG
1

8s
QCRLF ,(SP)
5%
(SP)+

;: 1S THERE A TERMINAL?

;1 sHALT HERE IF NO TERMINAL
3 1GET ADDRESS OF ASCIZ STRING
; sRUNNING IN APT MODE
: iNO,GO CHECK FOR APT CONSOLE
s :SPOOL MESSAGE TO APT
: :NO,GO CHECK FOR CONSOLE
;s sSETUP MESSAGE ADDRESS FOR APT
: : SPOOL MESSAGE TO APT
: sMESSAGE ADDRESS

3 1APT CONSOLE SUPPRESSED
: 1 YES,SKIP TYPE QUT

: sPUSH CHARACTER TO BE TYPED ONTO STACK

$38BR IF IT ISN'T THE TERMINATOR
s3sIF

TERMINATOR POP

; sRESTORE RO
1 :ADJUST RETURN PC

; sRETURN

1 ;BRANCH IF

1(SP)

64
PC,$TYPEC
$CHARCNT
14}

TAB PROCESSOR

THE

STACK

<HT>

s sBRANCH IF NOT <CRLF>

::POP

isTYPE

$CHARCNT
2%
PC,$TYPEC
$FILLC,(SP).
28
$NULL, -(SP)

IT OFF

<CR><LF> EQUIV

AND LF

; sCLEAR CHARACTER COUNT
:3GET NEXT CHARACTER
3:G0 TYPE THIS CHARACTER
:3IS IT TIME FOR FILLER CHARS.?
33IF NO GO GET NEXT CHAR.
1:GET & OF FILLER CHARS. NEEDED
: sAND THE NULL CHAR.
1 sDOES A NULL NEED TO BE TYPED?
3$BR IF NO--GO POP THE NULL OFF OF STACK

:1:G0 TYPE

A NULL

3300 NOT COUNT AS A COUNT

s s LOOP

GLOBAL AREAS
KDJ11A.MAC

3114
3115
3116
3117
3118
3119
3120

3121
3122
3123
3124
3125
3126
3127
3128
3129
3130

3131
3132

3133
3134
3135
3136
3137
3138
3139
3140
3141
3142
3143
3144
3145

3146
3147
3148
3149
3150
3151
3152
3153
3154
3155
3156
3157
3158
3159
3160
3161
3162
3163
3164
3165
3166
3167
3168
3169

011350
011354
011360

011366

011370

011372
011374
011374

011400
011402
011406
011412
011416
011420
011420
011424
011426
011432
011436
011442
011444

011444
011446
011446
011452
011454
011462
011470
011472
011476
011500
011506
011510
011512
011514

011516
011520
011522
011524
011526
011527
011530
011531
011532
011533

MACY11

30A(1052)

112716
004767
132767
001372
005726
000724

000040
000014
000007

105777
100022

000116

O3-APR 84

11:36

017746
042716
122716
001012

000112
177600
000023

105777
100375
117716

000072

042716
122716
001366

APR 84
10:38
PAGE
TYPE ROUTINE

8s$:
000124

$TYPEC:

101¢:

000066
177600
000021
102%:

000000
000207

177560
177562
177564
177566
000
002
ole

000

077
o012
011536

10¢:

000050
000002
000015

000042
000002

000014
000012

MOVB

JSR
BIT8
BNE
TST

1STB
8PL

MOV

005726

105777
100375
116677
122766
001003
105067
000406
122766
001402
105227

9s:

000002

8IC
cMPB
BNE

TST8
B8PL
MOVB
BIC
cMP8
BNE

SEQ 0064

o'
,(SP)
PC,$TYPEC
97, $CHARCNT
94

(SP).
2t

: sREPLACE

;s TYPE A

TAB WITH SPACE

SPACE

s 1BRANCH IF NOT AT

;:TAB STOP

; :POP SPACE OFF STACK
;3GET NEXT CHARACTER

88 TKS
10%
8$TKB, -(SP)

9177600, (SP)
QS$XOFF ,(SP)

102%

83TKS
101
8$TKB, (SP)

; iCHAR IN KYBD BUFFER?
; 1BR

IF NOT

: sWAS

CHAR

XOFF

1 :WAIT

FOR

CHAR

:;GET CHAR
: 3STRIP EXTRANEOUS BITS
: 1BR IF NOT

€177600,(SP)
@$XON, (SP)

101¢

:1GET CHAR
;3STRIP IT
:sWAS IT XON?
::BR IF NOTY

TST

(SP)+

;:FIX STACK

7ST8

88TPS
10%
2(SP),84TPB
:ER.Z(SP)

; iWAIT UNTIL PRINTER IS READY

8PL
MOVB
cMPB
BNE
CLR8
BR
1s:
cMPB
BEQ
INCB
$CHARCNT
: . WORD
$TYPEX:

RTS

$TKS:
$TKB:
$TPS:
$TPB:
$NULL:
SFILLS:
$FILLC:
$TPFLG:
SQUES:
$LF:

. WORD
.WORD
. WORD
. WORD
.BYTE

.SBTTL

.BYTE
.BYTE
.BYTE
.ASCII
.ASCIZ

$CHARCNT
$TYPEX
OF,2(SP)
$TYPEX
(PC).
)
PC

177560
177562
177564
177566
0
2
12

[ XU
s

<12>

.EVEN
CONVERT BINARY

;;LOAD CHAR TO BE TYPED INTO DATA REG.
31 :IS CHARACTER A CARRIAGE RETURN?
1 :YES

; 1 EXIT

-CLEAR CHARACTER COUNT

;IS CHARACTER A LINE FEED?
: ;BRANCH IF YES
; :COUNT THE CHARACTER
: sCHARACTER COUNT STORAGE

33T7TY
:3T7TY

KDB STATUS
KBD BUFFER

:MJDOO1
sMJDOO1

:3TTY PRINTER STATUS REG.

::TTY PRINTER BUFFER REG.

ADDRESS

1 sCONTAINS NULL CHARACTER FOR FILLS
; sCONTAINS & OF FILLER CHARACTERS REQUIRED
1 s INSERT FILL CHARS. AFTER A "LINE FEED"

;3 "TERMINAL AVAILABLE” FLAG (BIT<07>=0sYES)

1 1QUESTION MARK
s sLINEFEED

TO DECIMAL AND TYPE ROUTINE

;#THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A S-DIGIT
;oSIGNED DECIMAL (ASCII) NUMBER AND TYPE IT. DEPENDING ON WHETHER THE
i¢NUMBER IS POSITIVE OR NEGATIVE A SPACE OR A MINUS SIGN WILL BE TYPED
;#BEFORE THE FIRST DIGIT OF THE NUMBER. LEADING ZEROS WILL ALWAYS BE
; sREPLACED WITH SPACES.

;MJD001

: ;BRANCH IF NO

1104008008040 00080000480004000008000880000400040000000480000008848400

;#CALL:

:MJDOO1
;MJDOO1
sMJD0O1
:MJDOO1
;MJD001
;MJD001
;MJDOOL
:MJDO001
;MJD001
:MJDO01
;MJDOO1
:MJDOO1
;MUD001
:MJDOO1
:MJDOO1
;MJDOO1

GLOBAL

ARE AS

KDJ1.1A
MAC

3170
3171
3172
3173
3174

3175
3176
3177
3178
3179
3180
3181
3182
3183

3184
3185
3186
3187
5188
3189
3190
3191

3192

3193
3194
3195
3196
3197
319¢
3199
3200
3201
3202
3203
3204
3205
3206

3207
3208
3209
3210
3211
3212
3213
3214
3215
3216
3217
3218
3219
3220
3221
3222
3223
3224
3225

MACv11

03-APR 84

30A(1052)

11:36

04 APR 84

10:38

TO DECIMAL AND TYPE ROUTINE

NUM, -(SP)

011536
011536
011540
01.542
011544
011546
011550

011554
011560
011562
011564

011572

011574

011600
011604
011606
011612
011614
011616
011620
011622
011624
011626
011630

011632
011634
011636
011640

011646
011652
011656
011660
011662
011666
011670
011672

011674
011676
011700

011702
011710
011712

011714
011716
011720

011722
011724
011730
011736
011740
011742
011744
011746

$TYPDS:

010046
010146
010246

010346
010546
012746
016605
100004
005405
112766
005000
012703
112723
005002
016001
160105
002402
005202
000774
060105
005702
001002
105716
100407
106316

103003

116663
052702
052702
110223
005720
020027
002746
003002
010502
000764
105726
100003
116663
105013
012605
012603
012602
012601
012600
104401
016666
012616
000002
023420
001750
000144

020200
000020

000055

000001

1$:

011752
000040

2%:

011742

PAGE 65

CONVERT BINARY

MOV

TYPDS

000001
000060
000040

177777

6$:

7%:

ADD
TST
BNE

R1,.RS
R2

; ;ADD BACK THE CONSTANT
; ;CHECK IF BCD DIGIT=0

(SP)

::STILL DOING LEADING 0'S?

177777

011752
000002

BMI

ASLB

177776

$DTBL:

Ss
7

(SP)

s s INCREASE THE B8CO0 DIGIT BY 1

i:sFALL THROUGH IF O
:iBR IF

YES

3 $MSD?

64
1(SP), -1(R3)

1:BR IF NO
1:YES--SET THE SIGN

8IS

:1MAKE

BIS

B8R

75718

#'0.R2

,R2

R2,(R3).
(RO)+

RO, 210
2%
as

R5,R2

(SP).

s tMAKE

THE B8CD DiGIT ASCII

SPACE

IF NOT

ALREADY

;:CHECK THE TABLE INDEX
::G0 DO THE NEXY DIGIT
$:G0 TO EXIT

::GET

THE LSD

1 1GO CHANGE TO ASCII

;:WAS THE LSD THE FIRST NON ZERO?

93
-1(SP), -2(R3)

::BR IF NO
;s YES--SET THE SIGN FOR TYPING

MOV
MOV
MOV
MOV
MOV

(SP)+,RS
(SP)+,R3
(SP)+ ,R2
(SP)+,R1
(SP)+,RO

::POP
$:POP
: ;POP
; 1POP
;:POP

CLRB

MOV
MOV
RTI
10000.
1000.
100.

(R3)

. $DBLK

2(SP),a(SP)
(SP)+,(SP)

A DIGIT

3 :PUT THIS CHARACTER IN THE OUTPUT BUFFER
;3 JUST INCREMENTING

8PL
MOVB

TYPE

000004

8CC
MOVB

cHp
BLT
8GT
MOV

8s:

ROUTINE

:;PUSH RO ON STACW
; 1PUSH R1 ON STACK
1 sPUSH R2 ON STACK
: 1PUSH R3 ON STACK
: 1PUSH RS ON STACK
: sSET BLANK SWITCH AND SIGN
: sGET THE INPUT NUMBER
;:BR IF INPUT IS POS.
;s tMAKE THE BINARY NUMBER POS.
1 sMAKE THE ASCII NUMBER NEG.
1:ZERO THE CONSTANTS INDEX
:3SETUP THE OUTPUT POINTER
$3SET THE FIRST CHARACTER TO A B_ANK
s iCLEAR THE BCD NUMBER
s 3GET THE CONSTANT
3 sFORM THIS BCD DIGIT
: :BR IF DONE

MOvB
ST

000010

THE

RO, -(SP)
R1,-(SP)
R2,-(SP)
R3,-(SP)
RS, -(SP)
820200, -(SP)
20(SP),RS
14
RS
&' -,1(5P)
RO
03DBLK,R3
& ,(R3).
R2
$DTBL(RO),R1
R1,RS
44

TST8

S5$:

THE BINARY NUMBER ON THE STACK

MOV
MOV
MOV
MOV
MOV
MOV
MOV
ePL
NEG
MOVB
CLR
MOV
MOVB
CLR
MOV
SuB
BLY

g:c

4%:

::PUT

::GO

SEQ 0065

;:SET

;:sNOW

THE

TERMINATOR

STACK
STACK
STACK
STACK
STACK
TYPE

INTO
INTO
INTO
INTO
INTO

RS
R3
Re
R1

THE NUMBER

: sADJUST

THE STACK

i1 sRETURN

TO USER

GLOBAL

AREAS

KDJ1.1A
MAC

3226

3227

3228
3229
3230
3231
3232
3233
3234
235
3236
3237
3238
3239
3240
3241
3242
3243

011750
011752

MACY11

30A(1052)

O3-APR-84 11:36

)6y

04 APR-84

000012
000004

PAGE 66

10.
.BLKW

SOBLK:
.58TTL

BINARY

TO DECIMAL

SEQ 0066

AND TYPE ROUTINE

4
TO OCTAL (ASCII) AND TYPE

$1310600600000008008000048004000000008000000000000

3oTHIS ROUTINE

USED

0000008080400060006

CHANGE

190CTAL (ASCII) NUMBER AND TYPE

;oé;lPOS---ENTER

MOV

HERE

SETUP

NUM, -(SP)

TYPOS

1e
1

.BYTE
.BYTE

[T,

16 BIT

SUPPRESS

ZEROS

11CALL

N
]

FOR

NUMBER

so$TYPON--

-ENTER HERE

TYPE

NUM,

TYPON

(SP)

O+

WITH

THE

1 tNUMBER

LEADING

SAME

TO BE

LEADING

PARAMETERS

THE

TYPED

11CALL FOR TYPEOUT

-ENTER

HERE

FOR

TYPEQUT

+oCALL
:

011762
011766
011774
012000
012004
012006
012014
012022
012030
012032

012034
012036
012042
012044
012050
012054
012060
012064
012066
012070
012072
012074
012076
012100
012102
012104
012110
012112
012116

017646

116667
112667

062716
000406

112767

112767
112767
010346
010446
010546
116704

005404
062704
110467
116704
016605
005003
006105

000404
006105
006105
006105
010503
006103

105367
100016
042703
001002

000001
000207
000002

000001
000005

000211

000171
000165
000154

16 BIT

NUMBER

MOV
TYPOC

NUM,

s$TYPOS:

MOV

8(SP), -(sP)

13PICKUP

ADD

02,(5P)

3 1ADJUST RETURN ADDRESS

MOVB

#1,80F ILL

$TYPOC:
$TYPON:

MOvVB
MOvEe
8R

MOvVB8
MOVB

MOV
MOV
MOV

&OZB

000132
000125
000012

MOovB

ADD

MOve
MOV
1¢:

2%:

177770

ie
ie

0C0145

000076

3s:

CLR

ROL

B8R

ROL

ROL
ROL
MOV
ROL

DECS8

8PL

BIC

8NE

(SP)

1(SP),$OF ILL
(SP)+,$0MODE+1
$TYPON

1 iNUMBER TO BE TYPED
13CALL FOR TYPEQUT
THE MODE

13LOAD ZCRO FILL SWITCH
; ;NUMBER OF DIGITS TO TYPE

13SET

THE

ZERO FILL

13SET

THE

ITERATION COUNT

;?‘DOEQ.‘“

1iGET

THE NUMBER OF DIGITS

06 ,R4

$sSUBTRACT

$OF ILL R4
12(SP).RS

13GET THE ZERO FILL SWITCH
$11PICKUP THE INPUT NUMBER

SWITCH

6, $0MODE + 1

13SET FOR SIX(6) DIGITS

R3, -(SP)
R4, -(SP)
RS, -(SP)

$ 1SAVE R3
$1 :SAVE R4
1 3SAVE RS

5, 30CNT

R4, $OMODE
R3

RS
RS
RS
. R3
R3

$ OMOOE
14

Q177770 ,R3

IT FOR MAX.,

3 31SAVE IT FOR USE

13CLEAR THE OQUTPUT WORD
13ROTATE

MSB

13GO DO MsB

;1 sFORM

INTO

THIS DIGIY

;3 TYPE THIS DIGIT?

13BR

“C~

THIS DIGIT

13GET LSB OF

1iGET

TYPE

RID OF

13 TEST FOR O

JUNK

TYPE

ZEROS

,‘évaOC-

TYPED

ZEROS

OUT

DIGIT

DIGIIS

$131=TYPE

$TYPOC

MOV

TYPEQUT

1 10=SUPPRESS

:¢3TYPOS

AND

DIGITS

NUMBER

11Nl TO 6 FOR NUMBER OF
1iM=1 OR O

soCALL:

BINARY

13:NUMBER TO BE

3244

3245
3246
3247
3248
3249
3250
3251
3252
3253
3254
3255
3256
3257
3258
3259
3260
3261
3262
3263
3264
3265
3266
3267
3268
3269
3270
3271
3272
3273
3274
3275
3276
3277
3278
3279
3280
3281

10:38

CONVERT BINARY

TG TYPE

ALLOWED

LASY

RbOYTh ARRAY osMABA 1AL SYTI4Q0 " 04 APRLGA (1038 PAGE 7. 1

3292

3293

3294
3295
3296
3297
3298
3299
3300
3301
3302
3303
3304
3305
3306
3307
3308

012120
012122
012124
012126
0121382
012136
012142
012146
012152

012154

012156

012160

012162
012164
012166
012170
012176
012200
012202

005704
001403
005204
052703
052703
110367
104401
105367
003347
002402
005204
000744
012605
012604
0125603
016666
012616
000002

43 ;

000060
000040
000040

Ss:

012202
000032

63:

000002

8s:

012203
012204
012205
012206

$OCNT:
SOFILL:
$OMODE:

.SBTTL

INC

8IS
BIS

MOVB
TYPE

DECB

B8GT
BLT
INC
B8R

MOV
MOV
MOV
MOV
MOV
RT1
.BYTE
.BYTE
.BYTE
.BYTE

SEQ 0067

11 S'PPRESS THIS 07
13UR IF YES
1 sO0ON'T SUPPRESS ANYMORE 0'S

Ra
2'0,R3
%'
,R3
R3,8¢

s tMAKE
1 sMAKE

THIS OIGIT ASCII
ASCII IF NOT ALREADY

11SAVE FOR TYPING
1:GO0 TYPE THIS DIGIT
13COUNT BY 1
:11BR IF MORE 10 DO
:13BR IF DONE
$ 1 INSURE LAST DIGIT ISN'T

.88

$OCNT
as
64
R4
28

33GO DO THE LAST DIGIT

(SP)+,RS
(SP)+ R4
(SP)+,R3
2(5P),4(sSP)
( SP)Y.,(SP)

A BLANK

1 sRESTORE RS

s sRESTORE R4
: iRESTORE R3
:13SET THE STACK FOR RETURNING
1 sRETURN

0
o
0
90

1 1STORAGE FOR ASCII DIGIT

3 s TERMINATOR FOR

TYPE ROUTINE

1:0CTAL DIGIT COUNTER
11 ZERO FILL SWITCH
i sNUMBER OF DIGITS TO TYPE

.WORD
TTY INPUT ROUTINE

§18080080080000000460008000000000800400000004000000000000000000000008020

.ENABL

3309

3318
3311
3312
3513
3314
3315
3316
3317
3318
3319
3320
3321
3322
3323
3324
3325
3326
3%27
3328
3329
3330
3331
3332
3333
3334
3335
3336
3337

1571
BEQ

3282
3283
3284
3285
3286
3287
3288
3289
3290
3291

Co
o TYPE

LSB

$50000000000000000000004000000000040000000008000004000800000

34SOF TWARE

SWITCH REGISTER

00004

CHANGE

ROUTINE.

1sROUTINE IS ENTERED FROM THE TRAP MANDLER, AND WILL
s¢SERVICE THE TEST FOR CHANGE IN SOF TWARE SWITCH REGISTER TRAP CALL

012210
012216
012220
012224
012226
012232
012236
012242
012244

022767
001074
105777
100071

012252

117746
042716
022726
001062
126727
001456

012254
012260
012264
012270
012272
012276
012300
012302
012306

104401
104401
016746
104402
104401
005046
C05046
105777
100375

012310
01e314

042716

11774¢

000176

166630

s sWHEN OPERATING

SCKSWR:

177272

1578

000007

012735
012742
165706

000001

cHP8
BEQ
$GTSWR:

012753
19:

177210

BNE

B8PL
MOVS
8I1C
cre
BNE

177266
177600

000514

CMP

78:

TYPE

MOV

TYPOC
TYPE

CLR

8PL

177204
177600

MOV
BIC

TTY

FLAG

#SUREG,
SWR

15%
83TKS
154
S8TKB, -(SP)
0*C127,(SP)
07,(SP).

154

MODE.

131IS THE SOFT-SWR SELECTED?
1 sBRANCH IF NO

1 1CHAR THERE?
13IF NO, DON'T WAIT AROUND
s 3SAVE THE CHAR
1:STRIP-OFF THE ASCII

33IS IT A CONTROL G?
1sNQ,

RETURN TO USER

SAUTOB,
01

154

1 3ARE WE RUNNING IN AUTO MODE?
1 1tBRANCH IF YES

« SCNTLG

$1ECHO THE CONTROL
-G (tG)

« SMSUR

SWREG, -(SP)

11 TYPE CURRENT CONTENTS
11SAVE SWREG FOR TYPEQUTY
13G0 YYPE--OCTYAL ASCIICALL DIGITS)
1iPROMPT FOR NEW SWR
11CLEAR COUNTER
13 THE NEW SWR
1 1CHAR THERE?
13
IF NOT

TRY AGAIN

11PICK UP CHAR

$11MAKE

7 BIT

ASCII

KbIT1a
ARR S osTMABR1AL (148527 04 APR
84 1038,
80K 68

012340
012344
012346
012352

012354
012362
012366
0123872
012400

012402
012410
012412
012416
012422
012424
012430
012432
012436
012442
012444
012446
012450
012452
012456
012462
012464
012470

021627
001022
005766
001403
016677
062706
104401
126727
001003
012777
000002
004767
021627
002420
021627
003015
042726
005766
001403
006316
006316
006316
005266
056616
000707
104401
000720

000025

94
:

0127%v

20%:

000015

10s:

e
BNE

(SP), 025
10¢

« SCNTLU

B8R

06, SP
198

13IS IT A CONTROL -U?
s sBRANCH IF NOT
13YES, ECHO CONTROL
-U (tu)
$ 1 IGNORE PREVIOUS INPUT
$i1LET'S TRY IT AGAIN

cMP
8NE

(SP),e15
168

$1IS IT A <CR>?
31 1BRANCH IF NO

TYPE
ADD

187

000002

166464

001403
000367

000001

000100

177106

176756
000060

BEQ

MOV

118:
14%:

15s:
16%:

000067
000060
000002

ADD

TYPE

cMP8
BNE
MOV

RTI

JSR
cHP
BLY
cHP
B8GT
8IC
TST

BEQ

000002

17%:

011532

18s:

177776

.DSABL

ASL
ASL
ASL

INC
8IS
BR

TYPE

BR
LS8

4(SP)

$3YES,

118
2(SP),85wR
06,SP
« SCRLF
$INTAG21
,

CHAR?

1 sRETURN

PC,STYPEC

31 1ECHO CHAR
11CHAR < 07

(SP),#60
183

: ;BRANCH IF

(SP),e67
18

YES

s sCHAR > 77
1 1BRANCH IF YES
13STRIP-OFF ASCII
13IS THIS THE FIRST CHAR
1 tBRANCH IF YES

(SP)

S
SP

THE FIRST

1 3CLEAR UP STACK
$1tECHO <CR> AND <LF>
13RE-ENABLE TTY KBD INTERRUPTS?
1 $BRANCH IF NOT
13RE-ENABLE TTr KBD INTERRUPTS

15¢

1 sSAVE NEW SWR

€100,887KS

3 1BRANCH IF YES

012326
012332
012336

021627
001005
104401
062706
000757

13NO,

012320
012324

3338
3339
3340
3341
3342
3343
3344
3345
3346
3347
3348
3349
3350
3%51
3352
3353
3354
3355
3356
3357
3358
3359
3360
3361
3362
3363
3364
3365
3366
3367
3368
3369
3370
3371
3372
3373
3374
3375
3376
3377
3378
3379
3380
3381
3382
3383
3384
3385
3386
3387
5388
3389
3390
3391
3392
3393

SEQ 0068

L E]
i

(SP)
2(SP),(SP)
7

SHIFT PRESENT

CHAR OVER TO MAKE
ROOM FOR NEW ONE.

11KEEP COUNT OF CHAR
313SET IN NEW CHAR
33GET THE NEXT ONE
13 TYPE 2<CR><LF>

« SQUES

208

s sSIMUALATE CONTROL
-U

3 0808 8 80 0 4800048008800083000080000004000000000000000000000000080800

18THIS ROUTINE

soCALL:
I

WILL

INPUT

SINGLE

ROCHR

RETURN HERE

012510
012516
012524
012532

011646
016666

105777
100375
117766
042766
026627
001013

177010
177004
177600

000004

000002

000004
000023

THE

TTy

$ s INPUT A SINGLE CHARACTER FROM THE TTY
1 1CHARACTER IS ON THE STACK

1iWITH PARITY BIT STRIPPED OFF

012472
012474
012502
012506

CHARACTER FROM

$ROCHR
; MOV
MOV
1578
1%:
8PL
MOV

BIC
cHe
BNE

(SP), -(SP)
4(SP),2(SP)
83TKS

1
88TK8,4(SP)
@tCc177>,4(5P)

4(SP), @23
3

11PUSH DOWN THE PC
$$SAVE THE PS

1 31WAIT FOR
31 1A CHARACTER
$iREAD THE TTY

11GET RID OF JUNK IF ANy
13IS IT A CONTROL S?
1 :BRANCH IF NO

GLOBAL AREAS
KDJ11A
. MAC

3394
3395
3396
3397
3398
3399
3400
3401
3402
3403
3404
3405
3406
3407
3408
3409
3410
3411
3412
3413
3414
3415
3416
3417
3418
3419
3420
3421
3422
3423
3424
3425
3426
3427
3428
3429
3430

3431
3432
3433
3434
3435
3436
3437
3438
3439
3440
344)
3442
3443

3444
3445
3446
3447
3448

3449

012534
012540
012542
012546
012552
012556
012560
012562
012570
012372
012600
012602
012610

MACI1L

30AC1052)

105777
100375
117746
042716
022627
001366
000750

176756

03 APR 84 1136

026627
002407
026627
003003
042766
000002

APR

Y 1uTCRobT TRe
8

2s:

TSTB
8PL
MOVE
aIC
cHP
BNE
8R

176752
177600
000021
000004

000140

000004

000175

000040

000004

PAGE

3$:

cHP
8LT
cHP
86T
8IC
RTI

as:

Fo
69

SFQ 0069

$TKS
28
83TKB. (SP)
o'cx77 (SP)
(SP)., 021
LY
1s

: sWAIT FOR A CHARACTER
::LOOP UNTIL ITS THERE
1sGET CHARACTER
11MAKE IT 7-BIT ASCII
IS IT A CONTROL -G?
:31IF NOT DISCARD IT
11 YES, RESUME

a(sP), 0140
as
a(sP), 0175
P
240,4(SP)

13IS IT UPPER CASE?
1 sBRANCH IF YES
::IS IT A SPECTAL CHAR?
1 1BRANCH IF YES
s tMAKE IT UPPER CASE
1:GO BACK TO USER

F ;.‘.‘.““‘..“.“.““.““‘.‘.“‘.‘.“““...
‘“.‘.“.

“. [ Y XY

14THIS ROUTINE WILL INPUT A STRING FROM THE TTY
s

#CALL:

ROLIN

1sINPUT A STRING FROM THE TTY

RETURN HERE

012612
012614
012620
012624

012626
012630
012632
012636
012640
012644
012646

012652
012656
012662
012664
012670
012674
012676
012700
012706
012714
012716
012717
012720
012730
012735
012742
012750
012753
012760
012764
012765

010346
012703
022703
101405
104410
112613
122713
001003
104401

$RDLIN:
1$:
2s:

012720
012730

000177

10s:

011532

as:

111367
104401
122723
001356

000044
012716
000015

38;

104401
012603
011646
016666
012766
000002
000

011533

000763

105063

000
000010

052536
136
005015
020075

040
036440
000
000

177777

000008
012720

047040
000040

RS, -(SP)
a$TTYIN,R3
OS$TTYIN'8.
RS
4%

MOVBE
TYPE
CHPB
BNE

(R3).9%
.98
215.(R3).
24

CLR8

000002
000004
9s:

005015
006507
053523
000

MOV
MOV
cHP
BLOS
ROCHR
MOVB
CMPB
BNE
TYPE

B8R

TYPE
MOV
MOV
MOV
MOV
RTI
BYTE

$CNTLU:
$CNTLG:
$MSWR:

.ASCIZ
.ASCIZ
.ASCIZ

053505

$MNEW:

.ASCIZ

$AUTOB:
$INTAG:

.BYTE
.BYTE

0
O

.SBTTL

TRAP DECODER

CHARACTER
BE

BYTE

WILL
OF

ALL

ROUTINE

WILL

THE

TTv

1 sRETURN
i sSTORAGE FOR ASCII CHAR.
1 s TERMINATOR
: sSRESERVE 8 BYTES FOR TTY
;;CONTROL “U”
3 ;CONTROL “G*

TYPE

INPUT

7
1 sAUTO MODE FLAG
11 INTERRUPT MODE FLAG

H ;““.“‘..“.“‘.““‘.““.““““..".‘.‘.“‘...“.‘..‘...“

;¢ THIS

0°S

; sCHECK FOR RETURN
1:LOOP IF NOT RETURN
1 ;CLEAR RETURN (THE 15)
11 TYPE A LINE FEED
: tRESTORE R3
1sADJUST THE STACK AND PUT ADDRESS OF
i
FIRST ASCII CHARACTER ON IT

-1(R3)

WILL

i iCLEAR THE BUFFER AND LOOP

.SLF
(SP)s.R3
(SP), -(SP)
4(SP),205P)
O$TTYIN,a(SP)

NEW

FIRST

: s TERMINATOR

1 ;ECHO THE CHARACTER

000
000012
020122

$STTYIN:

1 sADDRESS OF

1 1SAVE R3
1 sGET ADDRESS
;;BUFFER FULL?
:1BR IF YES
::GO READ ONE CHARACTER FROM THE
::GET CHARACTER
::11S IT A RUBOUT
13SKIP IF NOT
11TYPE A ' 7

(SP)s.(R3)
0177.(R3)
38
| SQUES

‘BYTE
.BLKB

PICKUP

THE

LOWER BYTE

THE

~TRAP"

INSTRUCTION

THE

STACK

GLOBAL ARt AS
KDJ11A.MAC
3450
3451
3452
3453

3454
3455

3456
3457
3458
3459
3460
3461
3462
3463
3464
3465
3466
3467
3468
3469

MACY11 50A(§252)
03 APR 84 11:

APR 84

F6
10; 38

TRAP DECOSER PAGE 70

;¢AND USE

INDEX

SEQ 0070
THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS
THEN USING THE ADDRESS OBTAINED IT wWILL

:¢0f THE DESIRED ROUTINE,
;9GO TO THAT ROUTINE.

012766
012770
012774

012776
013000
013002
013006

013010
013012
013020

010046
016600
005740
111000
006300

016000

000200

011646
016666
000002

$TRAP:

000002

MOV

RO, -(SP)

MOV
1ST

000004

000002

;3 THIS

IS USE

$TRAP2:

MOV

RO
$TRPAD(RO),RO
RO

TO HANDLE

THE

4(sSP),2(SP)

RTI

s3GET RIGHT BYTE OF

TRAP

s tPOSITION FOR INDEXING
s ;s INDEX TO TABLE
1:6G0 TO ROUTINE

“GETPRI“ MACRO

(SP),-(SP)

MOV

: 1GET TRAP ADDRESS
1 sBACKUP BY 2

(RO),RO

ASL
MOV
RTS

013022

s $SAVE

2(SP).RO
(RO)

MOVB

.MACRO

3470
3471
3472
3473
3474
3475

1 tMOVE

THE

DOWN

THE

PSW

1 sMOVE THE PSW DOWN

+ sRESTORE

SETTRAP A,B,MSG

$SSET
A, B,\<TRAP+$TR
,\$TRP, <MSG>
P>
LNLIST
$TRP=3TRP.1
LIST
.ENDM
SETTRAP

.MACRO
$$SET
A,B8,C.0,COMNT
IF EQ $TRP-1
.SBTTL
TRAP TABLE

3476
3477

3478
3479

;#THIS

3480
3481

3482
3483
3484
3485
3486
3487
3488
3489
3490
3491
3492
3493
3494
3495
3496
3497
3498
3499
3500
3501
3502
3503
3504
3505

;#BY

TABLE

THE

CONTAINS

"TRAP"

THE STARTING
INSTRUCTION.

ADDRESSES

THE ROUTINES CALLED

ROUTINE

$TRPAD: .WORD

$TRAP2

.ENDC
IIF NDFAGNS..NLéST

LLIF NDFBGNS..LIST
=A
; sCALL
$SSET
. ENDM
TRMTRP
-MACRO
$TERM=
- $TRPAD
,
.ENDM
TRMTRP
.SBTTL
TRAP TABLE
;¢THIS
;e8Y

;

013022
013024
013026
013030
013032

013010
011162
012006
011762
012022

TABLE

THE

CONTAINS

"TRAP*

THE

TRAPD(C)

STARTING

ADDRESSES

COMNT

INSTRUCTION.

THE

ROUTINES CALLED

ROUT INE

$TRPAD: .WORD
$TYPE

$TYPOC

$TYPOS
STYPON

$TRAP2

;3CALL=TYPE

;;CALL=TYPOC

;;CALL=TYPOS
;3;CALL=TYPON

TRAP+1(104401)

TRAP +2(104402)

TRA
+ 3( 104403)
P
TRAP.4(104404)

TTY TYPEQUT ROUTINE
TYPE OCTAL NUMBER (WITH LEADING ZERCS)
TYPE OCTAL NUMBER (NO LEADING ZET0S)
TYPE OCTAL NUMBER (AS PER LAST CALL

GLOBAL ARE AS

KDJ11A MAC

3530
3531
3532
3533
3534
3535
3536
3537
3538
3539
3540
3541
3542
3543
3544
3545
3546
3547
3548
3549
3550
3551
3552
3553
3554
3555
3556
3557
3558
3559
3560
3561

84
TRAP

10:38

TABLE

Go
PAGE

SEQ 0071

013034

011536

s TYPDS

1 :CALL=TYPDS

TRAP+5(104405)

TYPE

DECIMAL

NUMBER

013036

012260

$GTSWR

1 1CALL =GTSWR

TRAP+6(104406)

GET

SOFT-SWR

SETTING

013040
013042
013044

012210
012472
012612

$CKSWR
TRAP+7(104407)
3 s CALL =CKSWR
$RDCHR
TRAP+10(104410)
1 1CALL »RDCHR
$ROL IN
: sCALL =RDLIN
TRAP+11(1044117
APT COMMUNICATIONS ROUTINE

013046
013054
013062
013064
013072
013072
013074
013076
013102
013104
013112
013114
013122
013124
013130
013136
013142
013144

013150
013152
013154
013160
013162
013166
013174
013176
013204
013212
013216
013222
013224
013224
013230
013232
013236
013240
013244
013246

013254

013262
013266
013272
013276
013302
013304
013306

112767

000403
112767

010046
010146
105767
001450
122767
001031
132767
001425
017600
062766
005767
001375
010067
105720
001376
166700
006200
010067
012767
000413
017667
062766
016746
004767
000000

105767
001416
005767
001413
005767
001375
017667

062766
005267
105067
105067
105067

012601
012600
000207

.SBTTL
000001
000001

000001

000236
000226
000220

$SATYS:

$ATYS:
$ATYC:

165706

000100

165677

000004
000002
165636

TST
BNE
MOV

2%:

TST8

B8NE
suB
ASR
MOV
MOV
B8R
MOV
ADD
MOV
JSR
. WORD

165604
000016

164560
175740

3s:

000062

165562

TST8
BEQ
TS7

165534
000004
000002
165512
000020
000013
000006

RO, -(SP)

ADD

165634

000004
000002

MOV

MOVB

BEQ
MOV
1¢:

165644

165630
000004

HOVB

a1,8FFLG
01,8MFLG
SATYC
#1,$FFLG

MOV
TST8
8EQ
cMPB
BNE
gIT8

000206

000001

MOVB

118:

165526
000004

BEQ
TST
BNE
MOV
ADD
INC
CLRB
CLRB
CLRB

MOV
MOV
RTS

0400004000004

::70 REPORT FATAL ERROR

:: 70 TYPE A MESSAGE

3:TO ONLY REPORT FATAL ERROR

s sPUSH RO ON STACK
$ sPUSH R1 ON STACK
IMFLG
3 :SHOULD TYPE A MESSAGE?
5%
s3IF NOT:
B8R
QAPTENV, $ENV
1 sOPERATING UNDER APT?
34
B8R
s3IF NOT:
SAPTSP
, OOL
SENVM : sSHOULD SPOOL MESSAGES?
34
BR
;:IF NOT:
84(SP),RO
s 3GET MESSAGE ADDR.
92,4(SP)
::BUMP RETURN ADDR.
$MSGTYPE
:1;SEE IF DONE W/ LAST XMISSION?
1$
WAIT
$1:IF NOT:
RO, $MSGAD
3 :PUT ADDR IN MAILBOX
(RO).
s sFIND END OF MESSAGE
28

$MSGAD,
RO
RO
RO, $MSGLGTY
gd.tHSGYYPE
$

4(SP),
44

92,4(SP)
177776, -(SP)
PC,$TYPE

$FFLG

12$
$ENV
12%

$MSGTYPE

118
B4(SP), SFATAL
22,4(5P)
$MSGTYPE
$FFLG
SLFLG
SMFLG

(SP)s R1
(SP). RO

:1:SUB START OF MESSAGE
s sGET MESSAGE LNGTH IN WORDS
s 1PUT

LENGTH

;s TELL APT

IN MAILBOX

TO TAKE MSG.

$:PUT MSG ADDR IN JSR LINKAGE
: §BUMP RETURN ADDRESS
$sPUSH 177776 ON STACK
13CALL TYPE MACRO
; $SHOULD REPORT FATAL ERROR?
BR
$:IF NOT:
: tRUNNING UNDER APT?
BR
:1:IF NOT:
s :FINISHED LAST MESSAGE?

33IF NOT:

MWAIT

131GET ERROR ¢
3 $BUMP RETURN ADDR.
13 TELL APT TO TAKE ERROR
1 :CLEAR FATAL FLAG
$3CLEAR LOG FLAG
1 sCLEAR MESSAGE FLAG
1:POP STACK INTO R}
13POP STACK INTO RO

: tRETURN

(WITH SIGN)

TEST FOR CHANGE IN SOFT-SWR
TTY TYPEIN CHARACTER ROUTINE
TTY TYPEIN STRING ROUTINE

1 08 8 8 8080 2000848800488048004840008R80808008048008

$ATYL:

3521
3522
3523
3524
3525
3526
3527
3528
3529

APR

3519
3520

11:36

3513
3514
3515
3516
3517
3518

03 APR-84

30A(1052)

3506
3507
3508
3509
3510
3511
3512

MACY11l

GLOBAL ARE AY
KDJ11A
. MAC
3562
3563

3564
3565
3566
3567
3568
3569
3570
3571
3572
3573
3574
3575
3576
3577
3578
3579
3580
3581
3582
3583
3584
3585
3586
3587
3588
3589
3590
3591
3592
3593
3594
3595
3596
3597
3598
3599
3600
3601
3602
3603
3604
3605
3606

013310
013311
013312

MACY11l 30AR(1052)
OS-ASR
84 11:26

Ho
04 APR 84

000
000
000
013314
000200
000001
000100
000040

APT C

0:38

SMFLG:
SLFLG:
$SFFLG:

PA ?E 72
ICAT ONS ROUTINE

.BYTE
.BYTE
.BYTE
.EVEN

S5€EQ 0072

0o
0
0

: tMESSG. FLAG
::LOG FLAG

;sFATAL

FLAG

APTSIZE =200
APTENV=001
APTSPOOL =100
APTCSUP=040

§5008846000000008080
000000000
00080
00800080
0000408000000000
00000
00

s THIS ROUTINE WILL

INCREMENT

THE

ERROR COUNT

;:ERROR NUMBER TO THE APT ERROR ROUTINE

013314
013320
013322
013326
013332
013334
013342
013346

013352
013354
013362
013366
013372
013400
013402
013404

013410

013414
013420
013422
013426
013432
013434
013442
013444
013450
013452
013454
013456
013460
013462
013462

005267
001775
005267

021627
101010
012767
012637
012637
000430
017667
011667

062716
017637
104401
000000
062716
104401
016746
104402
104401
016746
104402
122767
001004
004767
000000
000777
000000
000002
000000
00001¢
000001

165532

$ERROR:

165516
001002

007777
001062
001064
000000
000072
000002
000000

000106

1s:

013402

100¢:

102$:

000002

001352
000030

INC
8EQ
INC
ce
8HI
MOV
MOV
MOV
B8R
MOV
MOV
ADD
MOV
TYPE
.WORD
ADD
TYPt

MOV

001366
000026
000001

177414

SERFLG
$ERROR

ERRCNT
(sp),
14
07777,

2%:

cMPB

21002
3%

(SP)+,80SAVSP1

g%P)O.BOSAVSPZ

8(sP),
3s
(SP),101$

02,
(SP)
8(SP).80102%

3s:
44 :

. WORD
8R

S¢:

101¢:
:
$PATCH:

.END

HALT

s IF

YES

THEN

sREPORT AN UNEXPECTED TRAP
$SAVE UNEXPECTED TRAP DATA
sAND RESTORE SP
sELSE
;REPORT UNIQUE ERROR NUMBER TQ APT
: SAVE ERROR PC
:GET OVER UNIQUE ERROR NUMBER FOR RETURN

;:TYPE OCTAL

MESSAGE

ERROR NUMBER

:PUSH ERROR PC ON THE STACK

OAPTENV, SENV

THE ERROR COUNT

+IS ERROR FROM VECTOR AREA

:PUSH UNIQUE ERROR NUMBER ON THE STACK

3s%,-(SP)

THE UNIQUE

:GET OVER ERROR MESSAGE

LERR1

s INCREMENT

:TYPE ERROR

0
#2,(SP)

S
eC,
0

THEN PASS

s INCREMENT ERROR FLAG
sDON'T LET IT GO TO ZERO

.ERR2
165356

AND

TO BE REPORTED TO THE APT SYSTEM.

$ATY4

:TYPE

THE

ERROR PC

;CHECK TO MAKE SURE WE'RE IN APT MODE
s IF YES THEN
:GO REPORT ERROR TO APT
:STORAGE FOR ERROR NUMBER
;LO0OP HERE AFTER REPORTING ERROR TO APT
:IF NOT APT THEN MALT
sALLOW RECOVERY FROM HALT

GLOBAL AREAS
KDJ11A
. MAC
ABASE =
ACDW1 -«
ACOW2 ACPUOP
»
ADDL SB

L0DWO

ADDWL

O3-APR 84

30A(1052)

11:36

625
625
625
625
6730
625
625
625
625
625
625
625
€25

ADDW10=

ADDW11»
ADDW12+
ADDW1 3~
ADDW14=
ADDW15
=
ADOW2 ADDW3S
ADDW4
ADDWS
ADDW6E
ADOW?
ADDWS
ADDW9 =
ADEVCT»
ADEVM =
AENV
=
AENVM =
AFATAL
=
ALLCTR
AMADR]
=
AMAD2=
R
AMADR3
=
AMADRA4
=
AMAMS]
=
AMAMS2
=
AMAM3S
=
AMAMSA
=
AMSGAD
=
AMSGLG=
AMSGTY
=
AMTYPL
=
AMTYP2=
AMTYP3=
AMTYP4
=
APASS =
APRIOR
=
APTICSU=

04 APR 84
10:38
PAGE 74
CROSS REFERENCE TABLE

640
2537«

2596

2602

26134

2705+

2717«

2768»

3525
1376
1816

35679
1386

3596
1395
2175

I6
USER

SEQ 0073

SYMBOLS

2614

625
625
625
625
625

APTENV
= 000001
APTSFT
001640

APTSIZ»
APTSPO=
ASWREG=
ATESTN=
AUNIT =
AUSWR =
AVECT1-

MACv1i

000200
000100
002000
000000
000000
000000

625
625
625
625
625
625
625
625
6672
625
625
625
625
625
625
625
625
625
625
625
625
625
625
625
625
625
3084
896
8960
1699
2746
945
3079
S440
625
625
625
625

631

636
637
628
2701+

633
634
627

630
3569¢
3077
1282
1791

2755
35660
3527
625
629
632
639

3568¢
638

1894

1406
2194

1495
2217

1509
2234

1522
2252

1596
2261

1650
2360

1670

2395

1679
2405

GLOBAL

AREAS

XKDJ11
. MAC
A

AVECT2*

000000

BACDAT
003052
BEVENT= 177546
BGNTLP
006740

8110
B8IT00
8IT01
BIT02
81703

-+
«
=
=
=

000001
000001
000002
000004
000010

BIT04 =
BITOS =
BIT06 =
BIT07 =
8IT08 =
8IT09 =
BITL
=
BIT10 =
B8IT11 =
BIT12 =
8IT13 =
BIT14 =
BIT1S =
BIT2
=
B8IT3
=
BIT4a
=«
BITS
=
8176
=
B8IT7
=
BIT8
=
B8IT9
=
BOARDT=
BPTVEC=
BYPARR

000020
000040
000100
000200
000400
001000
000002
00200C
004000
010000
020000
040000
100000
000004
000010
000020
000040
000100
000200
000400
001000
000001
000014
003374

CACHET*

CCrR

sss0ass

= 177746

CKSWR = 104407
COUNT
001040
CPEREG=~ 177766
CPUTST=
CR
=
CRLF
=
CIST10
CTST11
CIST12
CTIST13
CTIST1S
CIST17
Crste
CTST20
CTST21

000001
000015
000200
003676
004052
004374
004716
005072
00S316
002312
005526
006146

MACY11

03-APR 84

30A(1052)

11:36

625
1269
5360
2553¢
3570
3470
346¢
3450
3440
1663
3430
3420
3410
3400
339¢
3380
3560
337¢
3360
335¢
3340
3330
3324
355¢
354¢
3530
3520
351¢
3500
3490
3480
10
3640
1367
1
3040
530¢

1134.
1828«
2209«

3510¢
659
5330

2094

1e
272@
2738
1535¢
1609¢
1711e
1846¢
1921¢
2013¢
10220
21010
2275¢

APR 84

10:38

PAGE

CROSS REFERENCE

TABLE

J6
SEQ 0074

USER STYMBOLS

12944

2607
357
356
355
354
1676
353
352
351
350
349
348

1487
2342
1122
1134
1692
2191
2172
1786
1368
905
1645

1196
1788
2231
2214
1809

1486

587

14250
219
3305
905+
1142«
1887+
2342+
904+
2268+
244
709

1514
2380
1666
1203
1813
2249

1527
2823
1695
1373
1891

1811

1966

1828
2523

1905
2791

1490

1500

693

730

244
910

1190+
1889«
23504+
1007+

2418+
587
715
3152

1501
2350
1190

1573
2904
2164
1383
2258

1889

1964

2068

2339

2530

2696

2206
1402
2357

2338
1492
2392

2737
1506
2740

2862
1518
2854

2938
1581
2925

1647
2956

1983

2690

2794

1503

2803

2818

587

672

696

709

715

730

751

952

954

969

966+
11934«
1905
2380+

1002+
1368+
1966¢
2414s

1052«

1053+

1056

1070

1072+

1968+
2531

1983«
2618¢

1054
16454
2072
2699+

20749
2823s

1122+
1809«
2167«

1125
1811
2206

1211e

1289+

14209

1529«

1908+

1985«

730
730

968

3040

1145+

26219
690
726

2777«

1418+

732

1579

735

1704+«

1783«
2089+

1786+

2904+

2164+
2994«

1603s

1706«

1832«

3049

3140

3152

GLOBAL AREAS
KDJ11A MAC

Crs122

C15723

Cr15724

C1ST3

C1sT14
CT1STS
C1ST6
crsr?
CURADD
CURDAT
CAPABO
DATRAM»
CCOUNT
ODISP =
DISPLA
DISPRE
OSWR
=
EMTVEC=
ENOMRTY
ENOLUP
ENDTLP
ERRCNT
ERRMSG

006542
007274
007720
002414
002556
002710
003106
003402
001104
001076
004706
YYY Y

001054
177570
001050
000174
177570
000030
003032
007222
007172
001044
001325

ERRNUM= 000104

ERROUT
ERRTN =
ERRVEC=
ERR1
ERR2
EXPDAT
EXPTBL
EXTST
FLAG

002302
000000
000004
001352
001366
001034
003070
007236
001042
FLDO
010134
FLDOA
010174
FLD1
010334
FLD1A
010414
FLD1B
010454
FMPARR
002550
FPPTST= 000001
FPVEC =« 000244

MACY11

O3 APR -84

30A(1052)

11:36

24238
26264
27858
1078¢
11560
1223¢
1312¢
143229
6790
6760
1774
715

6660

279¢
6630
5734
2788
3670
1267
26144
2554
6619
7264
1389
1780
2008
2365
2929
5434
1151
1390¢
1523
1781¢
1895
20094
2218
23660
2758
29309
1001
S541¢
3600
730¢
7320

6574
1265
2525
6600
28380
2846
2892
2911
2918
1119
10
5274

04 APR B84

<6
10:38

PAGE

CROSS REFERENCE

2950+

18370

953
2552
663
926+
934
662
914+
12874

26082
3576+
869
1398
1794
2080
2371
2943
866
11540
1396
152640
1792
1898¢
2078
22214
2369
2761e¢
2941
1012¢

923
3590
3593

1301¢
2615
2796+
2889
c852¢
28980
2979
29230
11500
244

TABLE

SEQ 0075

USER SYMBOLS

2951+

2952+

2954

2423
2553

2562

2578

2586

2591

2718+

2162+

1062
1416
1807
2178
2408

1068
1428
1819
2185
2560

1132
1498
1826
2197
2572

1140
1512
1840
2203
2751

1153
1525
1897
2220
2760

1200
1599
1903
2226
2849

1207
1653
1916
2237
2858

1219
1673
1979
2243
2873

1285
1682
1994
2255
2886

1379
1702
2002
2264
2921

1013
120106

1016
1205
14109
1651
18010
1914
2087¢
2235
24010
2856

1060
1208¢
1414
16546
1805
1917¢
2176
22380
2406
2859¢

10630
1217
14172
1671
1808¢
1977
21790
2241
2409¢
2871

1066
12200
1426
16740
1817
1980¢
2183
22440
2558
28740

1069¢
1283
14292
1680
1820¢
1992
21860
2253
25610
2884

1130
12864
1496
16832
1824
1995¢
2195
22560
2570
28878

11332
1377
1499¢
1700
1827¢
2000
21980
2262
2573
2919

1138
13802
1510
170308
1838
20030
2201
22658
2749
29220

11410
1387

730

751

968

3040

926
934»

925
915s

1015

1409

1800

2400
2965
8700
1198
13992
1597
1795¢
1901
2081¢
2224
2372¢
2847
29440

1600¢
1798
19040
2084
22270
2398
2850¢
2963

924+

935s

1407

29664

2617¢
2798«
2896

2840

2901

2912

587

688

696

697

15132
1778
1841¢

2006
22042

2363
27520
2927

GLOBAL AREAS

KDJ11A.MAC
FSTADD

FWOSEQ

GONS

INITMM
INTERR
INTRPC
I0OTVEC=

KDPARQ
»
KDPAR]
«
KDPAR2
=
KDPAR3
KDPAR4»
KDPARS«
KDPARG
=
KDPAR7
=
KDPDRO
=
KDPDR}
=
KDOPDR2
=

KOPDR3
=

KDPDR4
=
KOPDRS
=
KOPDR6
=
KDPDR7=
KIPARO=
KIPAR]=
KIPAR2=
KIPAR3=
KIPAR4
«
KIPARS=
KIPARG
=
KIPAR7=

KIPDRO=
KIPDR]
=

KIPDR2=
KIPOR3»
KIPDR4
KIPDRS
=
KIPDOR6
»
KIPDR7
=~

O3-APR 84

001100
001066
csssse

GOODAD
001110
GTSWR = 104406
HITMISs 177752

HMPARR
Y
b
HYBRID-

MACvY11l

002702
000011
00C¢001

001412
005244
005166
000020

172360
172362
172364
172366
172370
172372
172374
172376
172320
172322
172324
172326
172330
172332
172334
172336
172340
172342
172344
172346
172350
172352
172354
172356
172300
172302
172304
172306
172310
172312
172314
172316
001554
001604
000012

LDPARS
LOPDRS
LF
LOOPIN
001060
LOWADD
0011C6

30A(1052)

11:36

6770
6720
572
6810
9%1
532¢

1656
2392
1187
2700

1394
1707
2260
3054

7679

1971
19734
365¢
5084
509¢
510¢
S511¢
512¢
5134
S14¢0
515¢

04 -APR 84

10:38
PAGE 77
CROSS REFERENCE TABLE

2546+
25364
3502
35080

1004
1676
2720
12164
3092
549
1405
1790
2269
3305
1484
1990¢
1998

SEQ 007«

USER SYMBOLS

2549
2544
3503

2551
2594
3504

2592
2608
3505

26109
3506

2612+
3508

3510

3511

3512

1196
1685
2844

1203
1788
2854

1298
1813
2868

1573
1891
2916

1383
2172
2925

1402
2191
2937

1492
2214

2231

1506

1518
2249

1581
2258

1647
2357

691

872
1508
1893

1008

1146

1212
1604
2174
2754

1281
1649
2193
2778

1290
1669
2216
3012

1375
1678
2233
3028

1385
1698
2251
3040

2899+

2903

3150
684

1421
1815
2359
3513
1569

1494
1833
2394

952

2404

1521
1909
2419

1530
1986
2622

1595
2095
2745

1959

2336

2526

2694

2802

2698¢

2704

2713

2767+

2817+

812¢
841¢
735

3040

3049

3144

3152

949

950

2805+
2838+
1570

2842¢
1961s

2911
2066+

2914+
2337

2529+

1486+

1490«

1500+

1503+

28184

172
784
715
1266
2700

774

776
788
730

778
790
732
2771+

4869
4870

488¢

4890
490¢
4914
4920
4930
4979
4980
499¢

5004
501¢
502¢
S503¢
So4¢
475
4760
4770
478
4799
480#
481¢
4820
768
780
271e

6680
6802

2803a
770
782
709
1263«
26934

726
1278+
2711

2697¢
2770+

GLOBAL

AREAS

KDJ1.1A
MAC

LSTADD
001102
MMUTST- 000001
MMVEC - 000250
MSER
= 177744
MSG1
011054
MSGe
011135
MXVDEL
= 000001

NEWADD
NEWDAT
OPMSG2
OPMSG3

001114
001074
001162
001224
PARRAM= 000001

PIRQ
=
PIRQVE
«
PRO
.
PR1
PR2
PR3
PR4
PRS
PR6
PR7
PS
PSW
]
PWRVEC*

177772

000240
000000
000040
000100
000140
000200
000240
000300
000340
177776
177776
000024

QBUSEX= 000001
RAMPAR
001630
RBUF
= 177562
RCSR
= 177560
RDCHR = 104410
ROLIN = 104411
RECDATY
001036
RESTAR
002176
RESVEC= 000010
RITEDA
001072

SAVSP1
SAVSP2
SOPARO
=
SDPAR1
=
SOPAR2
=
SDPAR3
=
SOPAR4
=
SDPARS
=
SDPARG6=
SDPAR7=
SOPDRO=
SOPDR1=
SDPDR2»
SDPDR3«
SOPDR4
=
SDPDRS=
SOPDR6=
SOPOR7»
SHMOO =

001062
001064
172260

172262
172264
172266
172270
172272
172274
172276
172220
172222
172224
172226
172230
172232
172234
172236
000001

OS-ASR 84 11:&6
MACY11l

30A(1052)

€780

APR

M6
84

10:3

PAgE

CROSS nérgae NCE

TABLE

SEQ 0077

USER SYMBOLS

2547
244

25508
587

2574
687

709

730

751

952

954

968

3040

3305

531¢
1796
2620+
3014
3024
10
6834
6756

902«
1802+
2776s
30404
30490
1921

1003»
1803

1006+
1822

11444
1831+

1210»
1886+

1288+
1907«

1419+
1969+

15284

16024
2004

1705+
2093

1775+
2267»

10
2778
3719
2940
2954
2964
2970
298¢
2998
3009
3010
2740
2756
3660
19
8664
538¢
5379
3418
3512¢
6580
9650
3614
6740
669¢
6700
4649

2013

3001
1262

1483

2349

2539

2715

2367

2401«

2402

3760

7090
715¢

2013

952
953

275
689

35110
2366+
3037
35802+
3581+

4650
4660
4676
4680
4690
4700
4710
4424
4439
4444
4459
4464

4476

4480
4490

614

3040

1984+

1776
2417+

GLOBAL AREAS
KDJ11A.MAC

SIPARO=
SIPARLs
SIPAR2:
SIPAR3e
SIPARASIPARS+
SIPARG=
SIPAR7=
SIPDRO=
SIPDR1s
SIPDR2+
SIPDR3.
SIPDR4+
SIPDRSs
SIPOR6=
SIPDR7+
SKIPID
SLOCOO

SRO

177572

SR1
5Re

=
=

177574
177576

4530
4540
4550
4560
4570
4580
459¢
4600
4310
4320
4330
4349
4350
4360
a37¢
4380
3013
6530
2617
6540
6840
1986+
6854
1678+
2404+
380¢
1982+
3810
382¢

STACK
START
STBOT

= 001000
001716
= 001000

265¢
570
5486

001046

6629

SLOCO1

001116

SOFTRE

001120

= 172516

STKLMT=

SWR

SWREG

SWO
SW00
SWOl

SW02
SW03
SW04
SWOS
SW06
SWO0?7
SW08
SW09
SW1
SW10
SWll
SWie
SW13
SWi4
SWlS
Swe
SW3

172206
172210
172212
172214
172216
010760
001030

001032

SOFTER

SR3

172240
172242
172244
172246
172250
172252
172254
1722%6
172200
172202
172204

MACY11l 30A(1052)
O03-APR-84 11:36

177774

000176

= 000001
= 000001
= 000002

=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=

000004
000010
000020
000040
000100
000200
000400
001000
000002
002000
004000
010000
020000
040000
100000
000004
000010

3836

276¢

5740

329¢
3190
318¢

317¢
3160
315¢
3140
3138
3120
3110
310¢
3280
309¢
308¢
307¢
3064
3050
304¢
3278
3264

04 APR-84
10:38
PAGE 79
CROSS REFERENCE TABLE

N6
SEQ 0078

USER SYMBOLS

301S5¢
998+
27149
2998
898
2095«
906
1698+
2745+
903
2068+

2269

2419+

2622+

2778+

1790¢
27544
1487+
2083+

1815+

18934

2174s

2193+

2216«

2233+

2251s

2260¢

2359s

2394s

1489+
2092«

1501+
2339

1504+
2415+

1514«
2530+

1520+
2619+

1527+
2696+

1573
27744

1590+
2809s

1601«
2995«

1964+

2067«

23382

2695«

2804«

959

2523

2690

2791

2794

3315

3352+«

912
576
2996

925

933

329
328

327
326
325
324
323
322
321
320

1773«
2775
901+

1281+«

1829
2799«
10082+
1375+

1884+
2997
11464

1385«

1906

1970+

1981

2064+

2091

2348+

2416

2538+

1212+

12904

1421+

1530+

1604»

1707«

1833«

1909+

1394+

14054

14944

1508+

1521+

1595+

1649+

909¢

927

959

933s

3315

947

3328

1669+

GLOBAL AREAS
KDJ1.1A
MAC

Sw4e

=
=
*
=
«

TAGADZ

TAGRAM:
TAPABO
TBITVE-.

TKVEC

TPVEC

000040
000100
000200
000400
001000
010672

010704

sssse0
005062
000014

= 000060

000064

TRTVEC+

000014

TRAPVE= 000034

TSEND

010716

TSTADD
TSTLOC

001112
001122

TSTLUP
ST
181710

006656
002210
003676

TST11

004052

TST112
759713

004374
004716

1ST1S

005316

15714

005072

TST16
TST117?7

005526
006146

1812
75720
TST21
18122
TST3
TST4
TSTS
1ST6

1517

TYPDS

TYPE

TYPQC

TYPON

TYPQS

O3 APR 84

+ 000020

SWo
SWe
Sw?
SH8
SW9

TAGAD1

HMACY11

002312
006542
007274
007720
002414
002556
002710
003106

=«

=
=

UDPARO=
UDPARL1+
UOPAR2+*
JOPAR3=
JOPAR4=
JOPARS:
UDPARG
UDPAR7=
JOPDRO:

003402

104405

104401

104402

104404

104403

177660
177662
177664
177666
177670
177672
177674
177676
177620

[

30A(1052)

11:36

325¢
3244
3236
322¢
3210
3200
2824
2908
715

1885
3620
369¢
370¢
3684
3630
2980
682¢

6950
1369
1505
1810e
2229
25410

996
¢
1531
1605
1708
1834
1910

1987
2096
2270

1009
2420
2623
2779
1117¢
1147

1213
1291
1422
3026
952
3373

3329
3505¢
35040
4200
a21e
4220
4230
4240
4250
4260
a27¢

39840

APR 84

10:38
PAGE 80
CROSS REFERENCE TABLE

2895
2978
953
19130

29830
29880
2776

916

917

B/
-

S€EQ 0079

USER SYMBOLS

2781

2783

1127
1381,
1644
1890
2257

1135
1382+
1646
1962+

1143
1392
1655
1967+

1595
1649
1790
1893

1669
1815

1678

1698

2174
2359

2193
2394

2216
2404

2233

2745

2754

1261
1375

1385

1394
1521

1405

3014
3425
3592

3024
3429
3595

3027
35020

3097
3587

29940

1120+

1371
1515

1812
2246
2611

1567¢
16410
1771e
18780
1957¢
20614
21610
23340
1049¢
2521¢
26080

2789¢

1185
1260¢
13658
14810

35064
953
3422
35030

1123
1372
1643
1088¢
2248¢
2616

1494

1508

1188+
1400s
1658
1973

1191»
1401e
1675
2163e

2251

2260

3219
3590

3593

3288

1195
1412
1684+
2165

1202
1485,
1687
2170

127¢C
1488
1782«
2188

1273
1491
1785
2207

2212

3326

3327

3330

3343

3354

1275
1502
1787

GLOBAI

ARt AS

KDJ11A MAC
UOPDRL«
UOPDR2*
VOPDR3.
UOPDR4AUDPDRS=
VOPDR6+

177622
177624
177626
177630
177632
177634

177636
177640
177642
177644
177646
177650
177652
177654
177656
177600
177602
177604
177606
177610
177612
177614
177616
177566

XXX

010732

$APTHD
$ASTAT=

000204
sesses U

$ATYC
$ATY)
$ATYS
$ATY4
$AUTOB

$CHARC

177564

013072
013046
013054
013064
012764

011512

SCKSWR

012210

SCNTLG
SCNTLU

012735
012730

SCMTAG*

$CPUOP

$CRLF

$DBLK
$DEVCT

$D0AGN

sOTBL
$ENDAD
$ENDCT
SENULL
SENV
SENVM
SEOP
SEOPCT
SERFLG
SERROR
SETABL
SETEND
$FATAL

sessss U

001026

001403

30A(1052)

03 lgfl é‘ 11:!6

VOPDR7»
UVIPARO=
UVIPARL1»
UVIPAR2=
VIPARS=
UIPAR4=
UIPARS*
UVIPARGs
UIPAR7«
UIPDRO=
UIPDR1s
UIPDR2s
VIPDRSs
VIPDR4+
UVIPDRS:
UIPDR6+
UIPDR7XBUF
=
XCSR

MACY11

]

CRBSSIhEPERENTEETRéLE

399¢
4000
4010
4020
4030
4040

405¢
4070
4100
4110
4126
4136
4140
4150
41606
3872
3880
389¢
390¢
3910
3920
3930
3949
5400

539¢
2793

2997¢

596
3547

6029
3562

3518
3516¢
3082
3519¢
963s

3099

35200

3517¢
3598
3323

3109

3315¢

3510

3326
3343

34390
34380

912

6406

735¢

011752
001010

3185
6310

011742
011034
011002
011050
001020
001021
010746
010774
001052
013314
001020
001030
001002

3188
583
919
3027
6360
6370
3011@
919s
6640
914
6350
608
628¢

011044

04 APR

C/
- USER SYMBOLS

3020

918

3098

34440

3116

3142

31470

3354

3438

3525
3527

920

3159

3219

32278

3029

3035¢

322%¢
30310
3022¢
3038¢
896
945

957
3079

3077
3084

3019¢
920e
949

3023
35744
35740

35715

6470
3553e

3549

3596

SEQ hoso

RbIP
. AREN
YR os"ABA'ANSPIIEE52) 04 APRAAC 10:SPOREFERBE
$FELG
sFILLC
SFILLS
SGET42
SGTSWR
$HD
=

$NIBTS
$INTAG

S$LF
SILFLG

013355
0115
011527
011024
012260
000003
000204
012765

011533
013311

$MATL
$MBADR

001000
000206

SMNEW

012753

$MSGAD
$MSGLG
$MSGTY

$MSWR
SNULL
SNWTST=

$OCNT

013310

001014
001016
001000

012742
011526
000001

012204

SOMIDE
$PASS
$PASTM
SPATCH
SQUES

012206
001006
000212
013462 G
011532

SROCHR

012472

S$RODEC= ssesse U
SROLIN
012612
$SROOCT= ecssss U
$RDSZ = 000010

SRTNAD
SR2A
=
$SAVRE
$SETUP=
ISTUP =
$SVPC =

$SWR

$SWREG

$TESTN

$ T8

$TKS

011046
sessee U
sssess U
000126
177777
000204

160000

001022

001004

011520

011516

$TN

= 000023

$7PB

011524

$TPS

011522

$TPFLG

011531

3516+
3102
3155¢

3519.
31560

50284
33276
253

3508
254

3159¢
3557

3429
3563¢

603¢
3355

604
6040

3517
3330

633¢
6340
6274

3327
3104
99

1435
2102¢
3260+

3255s
630¢
6060
36040
3158¢

33860

3513
34140
3513
34074

3547

3556+

35640

957

usen SYMBOLS

5€Q nos1

34450

3438

608

626¢

93~

3523

3558+

35620

3442¢

3533
3538¢
3531

34400
31540
971

3077

3536
3539«
1023¢

3551

3555+

1025

10798

1081

1157«

1159

12240

1226

13130

15360
2104
3289+

1538
22760
3302¢

1610¢
2278

1612
24240

1712&
2426

1714
2627¢

18470
2629

3259+
918+

3264
944»

3267»
3012

3278s
3016+

33040
3017+

3025

3038

3373
3511

3422

3438

914

916

918

920

921

954

3016

3310

3444

2540
1959

921
2063

998
2163

1051
<336

1119
2523

1187
2690

1262
2791

1367
3008

1483
3016

965
2062«
3130

997+
2162+
3151

1050«
2335¢
3308

1118¢
2522¢
3319

1186+
2689¢
3336

1261«
2790e
3390

1366«

1482«

1849
27864

19224

1924

1315

14330

20140

2016

1569
3030

1643
3036

1773
3038

1563«

16 's

17724

1879

1157
1419
1649
1907
2251
26900

1187
1433
1669
1922
2260
2745

1209
i483¢
1678
1959¢
2266
2754

1224
1494
1698
1984
2276
277e

3512

30370
3513
3513

5490

913

5490
581+

586

253
1880
6384
6290
1958+

3123

3121

2530
1262¢
1508
1705
2014
23360
2786
3139«
3071

3137

947

3128

969
1281
1521
1712
2063¢
2359
27910
3153e
31570

3152¢

31500

9988
1287
1528
17736
2093
2394

3308

1006
1313
1536
1790
2102
2404

3317

1023
136760
15698
1815
21630
2417

3333

1051¢
1375
1595
1830
2174
2424

3357+

1079
1385
1602
1847
2193
2523¢

3396

3388

1119¢
1394
1610
18800
2216
2620

3394

1144
1405
16430
1893
2233
2627

LLOBAL

AREAS

KDJ1.1A
MAC

$ TRAP
$ TRAP?
$TRP
$ TRPAD
$TSTM
$TSTNU$TTYIN
sTYPBN-~
s TYPDS
$sTYPE
$TYPEC
$TYPEX
$TYPOC
$TYPON
$TYPOS
SUNIT
SUNITM
SUSWR
$XOFF =
SXON
=
$SGETASOFILL
$40CAT

. $ASTA~

84X

012766
013010
000012
013022
000210
000001
012720
804000

011536
011162
011374
011514
012006
012022
011762
001012
000214
001024
000023
000021
000000
012205
000000
013502

[ XY XYY

000204

MAC111

O3-APR 84

30A(1052)

11:36
916

34659
349490
3459
6050
S420
3415
3507
3173¢
30710
3101
3143
32580
<27
12536

6320
6070
6390
3125
5182
3030+¢

32546

5676
552¢
6140
3156
3605¢
3517
5920

APR B4

34540
3501
3503
35010
3416
3506

3494
3108
3145
3503
32609
3504

10:38

PAGE

CROSS REFERENCE

35040

35054

3433

34372

3502
3115
31480

3544
31200

E7
83

TABLE

35068

SEQ 0082

USER SYMBOLS

35074

3508

3509¢

3510

35110

35120

3513

S840
30390
3227¢

5864
30530
3308

592
3150
3437a

5932
3151
3438

5950
3152
3444

S97¢
3153
3445

609¢
3154
3446

3359

3505

3152
3152
3258+

3268

33030

568
6150
3157

S720
6960
3158

581

3159

3520
597

509

614

7370

5824
3038
31600

6100
3155
3565¢

GLOBAL

AREAS

KDJ11A.MAC
A

8GNMOD
BGNSUB
BGNTST

12814

18930

2380
239¢
2380
2334

MACY11 30A(1052)
03 APR 84 11:36

14940

15084
22600

15210
23594

1595¢
23944

16490
24040

16694
27450

16780
27540

16980

17900

1815¢

996
2521
1025
1081
1159
1226
1315

1049
2688

1117
2789

1185

1260

1365

1481

1567

1621

1771

1878

1957

2061

2161

1019
2625

1076
2781

1155
2999

1221

1309

1430

1533

1607

1710

1844

1920

2012

2098

2272

866
1414
1824
2218
2856

1013
1426
1838
2224
2871

1060
1496
1895
2235
2884

1066
1510
1901
2241
2919

1130
1523
1914
2253
2927

1138
1597
1977
2262
2941

1151
1651
1992
2363
2963

1198
1671
2000
2369

1205
1680
2006
2398

1217
1700
2078
2406

1283
1778
2084
2558

1377
1792
2176
2570

1387
1798
2183
2749

1396
1805
2195
2758

3000
3024

ENDTST

2389

ERRDEF
ERRDF

ERRFO1
ERRFO2
ERRFO3
ERRFO4
ERRF QS

ERRF 06

ERRFO7

ERRF 08
ERRFO9
ERRF1
ERRF10
ERRF11

ERRF 12
ERRF13

ERRF 14
ERRF 1S
ERRF 16
ERRF17

SEQ 0083

MACRO NAMES

22510

10
37249
23890
3002¢

2422
2379
2380
1407
1817
2201
2847
235
235e¢
2350
2350
2364
2369
2368
236¢
2360
2270
2280
2288
2289
2280
2286
2280
2294
2290

TABLE

22336

DEFPRG
ENDCOM
ENOMOO
ENDPAS

239¢

CROSS REFERENCE

22160

1538
1612
1714
1849
1924
2016
2104
2278
2426
2629
1435

ENDSUB

F7
PAGE 85

13850
2193¢

10210
1078¢
11566
12236
13110
238¢
969¢
15350
1609¢
17110
1846¢
19214
20136
21016
22754
24230
26260
14324

3720

10:38

1375¢
21740
967

CCrMs2
CCHMS3
CCHMS4
CCHMSS
cCrmse
CKLOOP
CMSG1
CMSG10
CMSG11
CMSG12
CMSGL3
CMSG1S
CMSGL1?
CMSG20
CMSG21
CMSG22
CMSG23
CMSG?

COMMEN

04 APR 84

13944

14050

971

2174
2193
2216
2233

2359
2394
1012
1385
1394
1405
1414
1494

1508
1521
1595

gbfl??k.ags > 03~Agalé4 11:%6
A

ERRF 18
ERRF19
ERRF2
ERRF 20
ERRF21
ERRF22
ERRF23
ERRF 24
ERRF25
ERRF 26
ERRF27
ERRF 28

2290
229¢
227¢
2290
2298
2294
229¢
2300
2300
2300
230¢
2300

ERRF29
ERRF3
ERRF 30
ERRF 31
ERRF 32
ERRF 33
ERRF 34
ERRF 35
ERRF 36
ERRF 37

2306
227
2306
2300
2316
2314
2310
2316
231¢
2316

ERRF 39
ERRF4
ERRF40
ERRF41
ERRF42
ERRF43

231e¢
227¢
2320
2326
2328
232¢

ERRF 38

ERRFA44

ERRFAS

2310

1649
1668
1060
1678
1697
1778
1790
1798
1805
1815
1824

1837
1065
1893
1900
1913

1977
1992

2000
1130
2006

2324

2320

ERRF46

232¢

2078

ERRF48
ERRF49
ERRFS

2338
2338
227¢

2182
2200
1138

ERRFS1

2338

ERRF47

ERRFS50

2324

2330

2084

2223

2240

ERRFS52
ERRFS53
ERRF 54

2336
2330
2330

2251
2260
2369

ERRF56

2344

2558

ERRF58

2340

2745

ERRFSS

ERRFS7

ERRFS9
ERRF6
ERRF60
ERRF61
ERRF 62
ERRF63
ERRF64
ERRF65
ERRF 66
ERRF&7
ERRF ?

2330

2340

2340
2274
2340
2348
2340
2346
235¢
235¢
2350
2350
e27e

2404

2570

2754
1198
2847
2856
2871
2884
2919
2927
2941
2963
1205

30A(1052)

APR

86
CROSS REFERENCE TABLE
84

10:38

PAGE

MACRO NAMES

SEQ 0084

GLOBAL

AREAS

KDJ11A.MAC

ERRF8
ERRF9
ERROR

ESCAPE

ETXT1

ETxT10
ETXT1Y
ETxT12
ETXTL3
ETxT14
ETXT1S
ETXT16
ETXTL?
ETXT18
ETXT19
ETXT2
ETXT20
ETxT21
ETXT22
ETXT23
ETXT24
ETXT25
ETXT26
ETXT27
ETXT28
ETXT29
ETXT3
ETXT30

ETXT31

ETXT32
ETXT33

ETXT34
ETXT35
ETXT36
ETXT37

ETXT38
ETXT39
ETXT4
ETXT40
ETXT41
ETXT42
ETXT43
ETXT44
ETXT4S
ETXT46
ETXT47
ETXT48
ETXT49
ETXTS
ETXTSO
ETXTS1
ETxTS2

2280
2280
2660
1407
1817
2201
2847
3724
2190

2200
2204
2200
2200
2200
220¢
2204
2209
2210
2210
219¢
221e
2218
2216
2219
2216
2210
2220
2220
222¢
22240
219
2228
2224

2220
2229
2230
2230
2230
2239
223¢
2236
2196
2234
2239
2240

03 AgR 84 11:&6
MACY11

1280
1375
867
1414
1824
2218
2856

992
1342
1346
1351
1355
1461
1469
1475
1562
1623
1627
1039
1632
1636
1729
1738
1741
1746
1753
1756
1761
1766
1042
1866
1868
1874

1937

1943
1948
1103

1951

2240

224%
2240
2240

2244
2242
2244

219¢
2254
2254
2258

2047
2057
2135
2139
1110
2144
2148
2153

30A(1052)

1013
1426
1838
2224
2871

1060
1496
1895
2235

2884

APR

H 7
10:38

PAGE 87

CROSS REFERENCE TABLE

1066
1510
1901
2241
2919

1130
1523
1914
2253
2927

1138
1597
1977
2262

2941

SEQ 0085

MACRO NAMES

1151
1651
1992
2363
2963

1198
1671
2000
2369

1205
1680
2006
2398

1217
1700
2078

2406

1283
1778
2084
2558

1377
1792
2176
2570

1387
1798
2183
2749

1396
1805
2195
2758

GLOBAL AREAS
KDJU11
. MAC
A

ETXTS3
ETXTS4
ETXTSS
ETXTS6
ETXTS”
ETXTS8
ETXTS9
ETXTé
ETXT60
ETxT61
ETXT62

ETxT?

ETXTS
ETXT9
EXITST
FRONT
FRONTY

GETPRI
GE TSWR
IOMSG
MAT
NEWTST
POP

2258
2250
225#
2254
225¢
2264
2260
2192
22648
2260
2260

219¢

2190
219e
236¢
2620
10
190

372¢
3720
3002¢
3728
237#
2101
3720

PUSH

3728

SCOPE

2678

REPORT

SETPRI
SETTRA

SETUP
SFTERR
SKIP
SLASH
SPACE
STARS

SWRSY
TAIL
TRMTRP
TYPBIN

3720

3720
3469¢
237¢
2360
1815
3720
372¢
3720
372¢
1157
1610
2102
3056
3720
18

TYPDEC
T YPNAM
TYPNUM

3491
¢
3720
3720
372¢
372¢

TYPTXT
$3ESCA
$SFTER

372¢
3724
12810

TYPOCS
TYPOCTY

SSNEWT

372¢
3720

18938
3724

2276

MACY11l 30A(1052)
03 APR 84 1 1:36

APR 84

10:38

PAGE

CROSS REFERENCE

L7
88

TABLE

SEQ 008e

MACRO NAMES

2157
2308
2325
2461
2470
2668
2672
1176

1180
1244
1337
1006

1144

1209

1287

1419

1528

1602

1705

1830

1907

1984

2093

2266

2417

372¢
2275
3214

1022
2626
3560
3522

1078
2785

1156

1223

1312

1432

1535

1609

1711

1846

1921

2013

3173

969
2423
3559
3520

3494
372e
1281
1893

3503
911
1375
2174

3504

3505

3506

3508

3510

3511

3512

1385
2193

1394
2216

1405
2233

1494
2251

1508
2260

1521
2359

1595
2394

1649
2404

1669
2745

1678
2754

1698

1790

579
1159
1612
2104
3163
9210
3002

589
1184
1640
2160
3230

591
1224
1712
2276
3307

1226
1714
2278

1259
1770
2333
3378

624

969
1313
1847

995

1405¢
22330
1157

14942
22510

2776

216¢&
954
3012

3543

598

3310

2424
3407

971

1315
1849
2426
3448

1364
1877
2520
3515

1023
1433

1922
2627
3570

1025
1435
1924
2629

1048
1480
1956
2687

1079
1536
2014
2786

1081
1538
2016
2788

1116
1566
2060
3005

1521¢
23590
1433

1595¢
23940
1536

16490
24040
1610

16694
27458
1712

16788
27544
1847

16989

17900

1815¢

1922

2014

2102

3025

3328

1375¢
21740
969
2424

1385¢
2193¢
1023
2627

13940

22160

1079

2786

1224

15084

22600
1313

GLOBAL

ARt AS

MACY11

KDJ1.1A
MAC

03 APR 384

$$SET
$$SETM
$$SKIP

34750

LEQUAT
.HEADE

2870
2390

JKT1L
LSETUP
.$ACT1
.$APTE8
.SAPTH

.$APTY

. SEDP
. $ERRD
. SREAD
. $TRAP
.$TYPD
.STYPE
.$TYPO
. $40CA
.

ABS.

937¢
3720

2370
239¢
2390
2370
239¢

2400

2%7e
2400
2400
239e
238¢
2380
2406
2370

013502

ERRORS DETECTED:

3494

944

30A(1052)

11:36
3503

3504

APR 84

10:38
PAGE 89
CROSS REFERENCE TABLE
3505

3506

3508

J7
SEQ 0087

MACRO NAMES

3510

3511

3512

262
244
372
549
577
622
587
3513
3003

3305
3446
3161
3054
3228
550
000

CZKDMB/EN: ABS , CZKDMB . SEQ/D0C/SOL /CRF /NL : TOC=SYSMAC . SML /ML, CZKDMB . MAC /ML ,KDJ11A . MAC

RUN-TIME 748 109 5 SECONDS
RUN-TIME RATIO: 1286/864=1.4

CORE uUSED:

S 8K

DOCUMENT PAGES:

(115 PAGES)