Digital PDFs

AC-U1358-MC

September 1985

429 pages

Original

151MB

view download

OCR Version

178MB

view download

Document:	Micro Fiche Scan Name of device(s) tested: MSV11-J/L/P Test description: MSV11-J MEMORY DIAG MAINDEC Number or Package Identifier (after SEP 1977): CVMJIABQ Fiche Document
Order Number:	AC-U1358-MC
Revision:	000
Pages:	429
Original Filename:	CVMJAB0__MSV11-J-L-P__MSV11-J_MEMORY_DIAG__AH-U136B-MC__1985_gray.pdf

OCR Text

Micro

Fiche

Scan

Name of device(s)

tested:

MSV11-J/L/P

Test description:
MSV11-J

MEMORY

MAINDEC Number

DIAG

Package

Identifier

(after

SEP

1977):

CVMJABO

Fiche

Document Part Number:

AH-U136B-MC

Fiche preparation date

unknown,

using copyright year:

1985

Image

resolution:

8-bit gray levels,
COPYRIGHT

(C)

max.

quality

1985 by dlilgliltlall

for

archiving

A »;CYMJABO MSV11-J MEMORY DIAG.

CEBINIRRUR

e 1

et e it et (kB

OVANOVIRUNFOVR
IO VLW

MACRO Y05.02

Monday 07-0Oct-85 16:57

.TITLE

Page 3

SEQ 0001

CVMJABO MSV11-J MEMORY DIAG.

.NLIST TOC
.REM

IDENTIFICATION

PRODUCT CODE:

AC-U1358-MC

PRODUCT NAME:

CVMJABO MSV11-J MEMORY DIAGNOSTIC

PRODUCT DATE:

OCTOBER 1985

MAINTAINER:

E.S.D. METHODS

The information
in this document
is subject to change
without notice and should not be construed as a commitment
Equipment
Digital
Corporation.
by Digital Equipment
Corporation assumes no_ responsibility for any errors that
may appear

in this manual.

The software described in this document is furnished to the
purchaser under a
license
for use on a single computer

system
co:zrn

and

can_

copied

(with

inclusion

of Digital's

t notice) only for use in such system, except as may

otherwise be provided in writing by Digital.

Digital Equipment Corporation assumes no responsibilit

the use or rcl-.bi}it! of its software on equipment that
not supplied by Digital.
COPYRIGHT (C)

1985 Digital Equipment Corporation

for

CVMJABO MSV11-J MEMORY DIAG.
43

44
45

MACRO Y05.92

Monday 07-0Oct-85 16:57

escsses

00000

USE

eeesssssssssssscsascens

HALT ON ERROR

LOOP ON TEST

INHIBIT ERROR TYPEOUTS
INHIBIT RELOCATION

*
*

11
10

QUICK VERIFY
BELL ON ERROR

HALT PROGRAM (UNRELOCATED

6
6
6
64

SWITCH

7
60

SEQ 0002

OPERATIONAL SWITCH SETTINGS
SWITCH REGISTER DEFINITIONS

Page 4

=
*
%
E

9
7

LOOP ON ERROR

DETAILED ERROR REPORTS
INHIBIT CONFIGURATION MAP
LIMIT MAX ERRORS PER BANK

3
2
1
0

TEST MODE - SEE DOCUMENT
TEST MODE - SEE DOCUMENT
TEST MODE - SEE DOCUMENT
DETECT SINGLE BIT ERRORS

RESTORE LOADERS)

FAT TERMINAL (132 COLUMNS OR BETTER)

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 5

rogr- Purpose (Abstract)

OPERATING INSTRUCTIONS

uautie

Lo.du

ERROR INFORMATION

rti
Error R
Error
reviations
Error Halts

PROGRESS REPORTS

CSR INFORMATION TABLES

MSV11-J CSR
MSV11-L/P CSR

SUB-TEST SUMMARIES

N+

Tests
Patterns

PROGRAM FEATURES
Fast Data Aeco'o Rates

fl:‘flflfl ~N OO OO0 I U1 B LI W DN N e

s o

s e

SE2RGRER2BSIRRREV2ETIIRGRER=S

GENERAL PROGRAM INFORMATION

VBLINE

TABLE OF CONTENTS

Requirements

Rolotod Documents And Standards

Diegnostic Hierarchy Prerequisites
Assumptions

and Starti

"2Soquozg

Procedures

Spccuol Envcrenaont.
Program Options

Execution Times

Bank Zero Testi
Memory Con'ngur ion Map

Everything You've Aluoyc Wanted To Know About SUPERMAC ...

Memory Management Mapping

SEQ 0003

MACRO Y05.02

GENERAL PROGRAM INFORMATION

1.1

Program Purpose (Abstract)

SEQ 0004

8. ;ntm for use on all PDP-11/23/238/73's which
in

conditions

the

meet

1.2.1.

b. This

program will be used by

managers

system

and

operators

it will
dotfl:im the correct opcly-otgon of ui:g:o-ory and also
to isolate

primarily used by field service and mufocturing

feilures

to the memory and to isolate failures within the memory

b Bd Db P

to the correct card.

test

c. The object of this software is to functionally
N -

all main memory functions as fast as possible.

d. There is the capability

of testi

and MSV11-P) on the sy!ton.

and

mixed configurations

verify
(MSV11-L,

e. It has a special maintenance mode (Field Service Mode) to provide
specific functional capabilities.

s B Bt o o

Page 6

P b

b b

Monday 07-Oct-85 16:57

1.0

s ek P

i Dk b b s e B et bt s e
P 58 s Pt e e s

FUNEBS
-1 BNT. YV F YT VY

CVMJABO MSV11-J MEMORY DIAG.

1.2

1.2.1

System Requirements

Herdware Requirements PDP-11/23/238/44/83/84 CPU with 18/22 bit addressing and at
least 64K (16 Bit Words) of Memory and Memory Management.
ssssss NOTE ssanss

Like nnovx types must be on 16K word boundaries

starting a ply.ic.l. address 0.
REFERENCE

KTJ11l document for proper configuration

of unibus memory for 11/84

CVMJUABO MSV11-J MEMORY DIAG.

ii‘
7

160

MACRO Y05.02

1.2.2

XXDP«
ACT
APT

{20
;‘

Softmare Regquirements -

This progrem is designed to run stand alone or under any of the

164

i?:

Page 7

following monitors:

16
i

165

Monday 07-Oct-85 16:57

1.3 Related Documents And Standards
1. Microcomputers and Memories (EB-20912-20)
2. PDP-11/23 User's Guide
3.

MSV11-J Users guide

{;

MSV1l-L Users Guide

i;‘

MSV11-P Technical Manual

0 e et

1.4

Diagnostic Hierarchy Prerequisites

If the program in any way misbehaves, then:

rprpRYy

2582833

s s e e i i (it i

s it it it s e et

;;

Try it again with Cache off (reference Section 2.4.3.1)

Inhibit relocation (reference section 2.4.1)
Try CPU Diagnostics

Try Memory Management Diagnostics
Try Cache Diagnostics (where applicuble)
Try QBUS Map Diagnostics (where applicable)

208 S8eS

Monday 07-Oct-85 16:57

MACRO Y05.02
1.5

This

H.na!.-on! .

assumes

Cache, . and

correct

the

QBUS

operation

Meap.

This

the

CPU,

program

2.0

OPERATING INSTRUCTIONS

2.1

Memory

occupies

(initislly) Bank O (0-16K). The XXDP+ loaders are izognnk X

Sterting Procedures

Quick Starting -

2.1.1

Load address 200

Set switch register for options (normally 0)

Start

NOTE

BE SURE

g SXERIEEE:et Srp St

Page 8

Assumptions

OBION

RN NNV

SUREo38Ses

233

CVMJABO MSV11-J MEMORY DIAG.

is in

that the peripheral page jumper (where applicable)

place;

failure to do

Never-Never Land.

sends

the diagnostic to

Stopping -

2.1.2

2.1.3

Type control "C" (Reference section 2.4.4.1).

Restarting (Preserve Configuration Table) 1.

Load address 202

Set switch register for options (Normally 0)

Stert

—

Monday 07-Oct-85 16:57

MACRO Y05.02

2.1.4

asn esed

Page 9

Swmitch Register Options -

;

CVMJABO MSV11-J MEMORY DIAG.

HALT ON ERROR
LOOP ON TEST

OFNWAVNONRY

BNOVBRUWN-O

12
11
10

INHIBIT ERROR TYPEOUTS
INMIBIT RELOCATION
QUICK VERIFY
BELL ON ERROR
LOOP ON ERROR
HALT PROGRAM (UNRELOCATE
DETAILED ERROR REPORTS

INHIBIT CWIG\RATIW MAP

RESTORE LOADERS)

LIMIT MAX ERRORS PER BANK
FAT TERMINAL (132 COLUMNS OR BETTER)
- SEE DOCUMENT
TEST MODE
- SEE DOCUMENT
TEST MODE
TEST MODE
- SEE DOCUMENT

DETECT SINGLE BIT ERRORS

MACRO Y05.02

2.2

Monday 07-Oct-85 16:57

Page 10

SEQ 0008

Default Test Sequence

The following two lists inc the test protocol for parity and ECC

Memory.

gr‘ % ;5

2.2.1

Tests marked with a

through

+" are not normally run except under ACT

Field

Service

Test Protocol For MSV11-L/P
Test Name

Soft Error Test

Initial Data Test
Holding 1's and 0's Test

1
2

Address Test
Complement Address Test

35
* 22
+ 23

24
31
32
33

Address Bit Test

3 XOR
9 Test
Rotating 0's Test
Rotating 1's Test

Marching 1's and 0's Test

<1
<1
<1

<1
<1

1
1
1

Worst Case Noise Parity Test
Refresh Test
Shoftma Di
al Test

n/a
10
10

Fast Galloping Pattern Test
Sob-a-long Test
Write Recovery Test
Branch Gobble Test

20
3
<1
35

Random

Data

Section

Time (sec/16K)

6
17

3
4
S

(Reference

Parity Memory -

Test

»
+
+
«

Command

Test

Soft Error Test

WO
BNONB

Gl ol Gl Gl 0 G0 G (0 L

ERigSo-o-o-o—o-o—:o-r- SEERRRESESIINIFIIFLBLIL

CVMJABO MSV11-J MEMORY DIAG.

SEQ 0009

Test Protocol for MSV11-J ECC Memeory

Pattern Name

Time (sec/16K)

Rotating 1's Test

Soft Error Test

Initiel Data Test

Shifting check bits thru the CSR
Basic Double Bit Error test
in CSR on DBE test
S
Correction code test
g‘.ckm. in CSR on SBE test

ECC Disable Test
Address to CSR on DBE test
Extended address to CSR test

.‘t‘ write test
:
k SBE with ECC Disable test

No CSR update on SBE with DBE test
Byte Address Test
Holding 1's and 0's Test
Address Bit Test
Address Test
Complement Address Test
Rotating O's Test
Rotating 1's Test
Marching O's and 1's Test
Refresh Test
Random Data Test
Fast Galloping Pattern Test

Sob -a-long Test
Write Recovery Test
Branch Gobble Test
Soft Error Test

A A
AA
AAAAAAAAA
N AR
(] P e et
(N O 1= © 10 =t o o b b ot ot o 0 1t e ot Pt e et Pt

Pattern

AWA

EEEELEREE
3 333333313334EREes

331

Page 11

o U1

330

2.2.2

Mondey 07-Oct-85 16:57

325
326
327
328

MACRO Y05.02

*eEer

CVMJABO MSV11-J MEMORY DIAG.

8 - Run only on the first Pass when under ACT or APT
At the end of each Pass the program will run cleanup Patterns
230, and €27 for all banks.

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

2.3

Monday 07-Oct-85 16:57

Page 12

SEQ 0010

Speciel Environments

2.3.1

XXDP+

The first pass will be a quick verify

chain mode.
2.3.2

ACT

the

lst

APT Automatic Mode -

The program will not create double bit errors (DBE's)

pass.

2.3.2.1

pass if and only

after

APT Execution Times -

Here are some measured execution times for an 11/23B under APT

BB EEBDDEES

1024K MSVil-J
256K

MSvVili-L

128K

MSV11-P

1st QV Pass

2nd Pass

30 min

20 min

The first pass will be a quick verify pass

NOTE

Even though the first pass is a QV
it
tekes
1
r
than
the

non-QV passes
running more

pass
t

to the fact that it is
some of which
patterns,

(patterns 624 and #33 for example) cen

be extrememly time consuming.

onward

ER2BEDLEERE

sis;: t PR

BPRARRBRAIRLERES

CVMJUABO MSV11-J MEMORY DIAG.

Monday 07-Oct-85 16:57

MACRO Y05.02

2.35.2.2

Page 13

APT Envircnment Table -

The following teble gives some of the standerd settings
They may be modified as noted as the user sees
E-Teble.
FIRST PASS RUN TIME:

This

The times given in section 2.2 are for
16K chunks of memory, not 128K boards!

LONGEST TEST TIME:

This perameter should be set to the execution time of the longest
for the default case this is 35 seconds for
mtom .g;mg run.
ADDITIONAL RUN TIME:
Not Used By Program.

:
SOF TUARE ENVIRONMENT
For APT suto mode this parameter should be set
dump mode set this to a "0".
ENVIRONMENT MODE:
When this
smeter is set to @ "0" the

sizing.

3 W=
~ =i~ OO

Sapd

479

program

and :=ounto of memory to be tested.

SWITCH 1:
The default setting of this switch is "101".

amount

does

users sets bit €7 however, he must specify

SWITCH 2:
Ihio'uiteh.

47
a7
478

NOTE

information on switch settings.

smount end type

should be set according to

tested. The sbove table (APT Execution Times) gives some
memory to
Device
messured times. For eny patterns deleted (through use of
times.
pattern
individual
for
2.2
section
Descriptor Words) reference

the switch register for the program.

474

SEQ 0011

pesses

count has been reached.

uses

it's

For

own

the types

this

Reference section 2.4.1 for more

"fit tglgny.n:-zo;:.n@or.

APT

b d

“1".

io_m to l;:it flt‘ho

progrem wi

after

this

CPU OPTIONS:
Not Used By Program.

MEMORY TYPE n
(n=1 to 4)
If bit #7 of ENVIRONMENT MODE is set these four words are used to
log the different types of memory to be tested.
If bit #7 is not set
these location are not used.

MAXIMUM ADDRESS n

(n=1 to 4)

These four words are used in conjuntion

with

the

corresponding

CVMJUABO MSV11-J MEMORY DIAG.

Monday 07-Oct-85 16:57

MEMORYY

TYPE

words

Page 13-1

SEQ 0012

indicate the highest address that memory type

occupies.

NOTE

The sbove two parsmeters do not actually

h.v:

to_“

program

looks

con I”.tl

4
:

|emory.

‘fimto

for is en accurate tally

of memory amount!

2
:

INTERRUPT VECTOR n
(n=1 to 2)
Not Used By Progrem.

BUS PRIORITY n

(n=1 to 2)

Not Used By Progream.

BASE ADDRESS:
Not Used By Program.

DEVICE MAP:
Not Used By Program.

CONTROLLER DESCRIPTOR CODE n
Not Used By Program.
NOUVE W

480

MACRO Y05.02

ocvxetm

(n=1 to 2)

IPTOR CODES:

ice Descriptor codes are used b{ the grm: to

which patterns it will run.
The default va ues o
“jv'g, indicating that all of the peatterns shown in
executed (save for exceptions as noted there).
controls a table in the prograem as follows:

DD WORDS

PROGRAM TABLE (Symbolic location)

Words 0-1

MKCSRT

Words 2-3

MKPAT

Words 4-5

MJPAT

determine
words are all

section

2.2

Bit #0 set in the first word indicates that the first pattern
table will be executed, bit #1 the second, bit #2 the third,..
00 of the second word indicates that the 17th entry in the table

so on.
ted,
and
be execu

are

Each set of words

CVMJABO MSV11-J MEMORY DIAG.

Mondsy O7-Oct-85 16:57

MACRO Y05.02

Pege 14

No SBE Free Banks -

2.35.3

If the program cennot find any *t (Single Bit Error)
G

-protected

ECC

continus Sesting Gy-geseing
2.3.4

The

Mixed Parity

program

sequence

)

free

locations

will print out en error message and

ECC logi c tests.
B

ECC Configurations -

will function normally in mixed environments.
The
seen strange due to the recursive test mode
testing

slgorithm (reference .o::!m 2.4.1.1, 2.4.1.2,

2.4.1.3).

wuids G-

~ ~N~

w\aunun

AR >

SEEEEEEELEEEY 4T

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02
2.4

2.4.1

Page 15

SEQ 0014

Progrem Options

Smitch Register Details -

If @ hardware switch register is not available then the software
ister is in location 176. IF under APT if BIT7 is set in
switch
the E-TABLE symbolic location “$ENVM” the APT software switch register

will be used

(location $SWREG).

To change the software switch register contents:
T;fl; "control G".
and prompt for
This will ceuse display the current value of the
This routine
the octal input of the new SWR value from the terminal.
will

ignore

you

switch register.

SW15S

(not respond to control “G") if you have a hardware

= HALT ON ERROR
(100000)

Continuing from this halt will first check for a chon?o
in the software switch rogiotcr ("Control G" in the TTY
input buffer) then it will

SWi4

7
7
7
7

Monday C7-Oct-85 16:57

continue testing.

= LOOP ON TEST
(40000)

This will cause looping on the

(back

last

scope trap).

present test or

Rottorn

f in a pattern then the

looping will be for an entire bank of 16K addresses.

SW13

= INHIBIT ERROR TYPEOQUTS
(20000)

This will cause returns from the error routine
without
the
typed messages.
Other on error functions are not
affected.

SWi2

= INHIBIT RELOCATION
(10000)
This prevents the program from moving and
prevents
the program
from testing at

conooquontl;
least 32K o

memory
.

SWil

= QUICK VERIFY

(4000)

If this switch is selected
the possible combinations of

rouinotoly one 64th of
E's DBE's are tested.

Each pass complete typeout will indicate this
preceding the pass number with "QV”.

mode

LYY o

MACRO Y05.02

SW10

Monday 07-0Oct-85 16:57

Page 16

SEQ 0015

= BELL ON ERROR
(2000)

Ihio causes a bell (or beep or

click)

each

error

rap

SW9

= LOOP ON ERROR
(1000)
This will cause looping from failure point back te

last correctly initialized area of the current test.
SW8

the

= HALT PROGRAM
(400)

This

initiates the following sequence:

7 IV I

If program is relocated it moves back to bank zero.

[ DY B

FLLER- 13333333333220040202002522802
~NOUVMA
W -

eyt s e s s e

VOGNV _WEN-O

33333

CVMJABO MSV11-J MEMORY DIAG.

SW7

Flush out all possible DBE's.

Turns off Memory Management.
Restore loaders.

Unmap the Unibus Map (if there is one).
Halt

if under APT or ACT branch sel.

= DETAILED ERROR REPORTS
(200)
After any

normal error

report

typed

this

tion

:.uooo ‘ho contents of the Pollouixg rogintcroogo be
RO, R1, R2, R3, R4, RS, SP, “CONTROL“, "CPUERR"
SWé

= INHIBIT CONFIGURATION MAP
(100)
This

inhibits the printi

of a

showing

configuration - rcferonczgoectio:.g_s
SWS

the

memor

’

= LIMIT MAX ERRORS PER BANK
(40)

This will limit the number of error typeouts per bank.
The
default
is
10.
DECIMAL,
however
this cen b=

changed by changing location "ERRMAX” manually.

$ERERSE w‘fiflflu3333038ERRRERERELE

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Monday 07-Oct-85 16:57

SWe

Page 17

SEQ 0016

= FAT TERMINAL
(20)

This informs the prorru that the console terminal

e width of at least

has

132 columns (LA36 with wide paper).

= TEST MODE

SW3-1

Test modes determine the recurgion algorithm to be used

during pattern tests.

MODE NAME DESCRIPTION

(0)
(2)
(4)

0
1
2

BAFPAF
BAFPAR
BAWPAF

Banks forward, patterns forward
Banks forward, patterns reverse
Banks worst first, patterns forward.

(10)
(12)
(14)
(16)

4
S
6
7

PAFBAF
PAFBAUW
PARBAF
PARBAW

Patterns forward,
Patterns forward,
Patterns reverse,
Patterns reverse,

(6)

BAWPAP

Banks worst first, patterns reverse.

banks forward
banks worst first
banks forward
banks worst first.

;o: :o;c details reference section 2.4.1.1, 2.4.1.2 and

SWO

= DETE((:I)SIM;LE BIT ERRORS (SBE's)
For manufacturing purposes this switch should always be

on.

For

field

always be off.

service

purposes

this switch

This switch will allow all ECC Singh Bit errors to
reported by disabling error correction.

gggor printouts of SBE's are not
‘'s.

distinguishable

from

NOTE

If Double Bit Errors are found in
the memory,
this switch should be set to make sure that new
data can be written to the DBE locations.

2.4.1.1
Ex
and

Test Mode Example -

le anal gnio gf mode 5 "“PAFBAW".
are MSV11-L.
Banks 2,

Assume Banks 0

are

MSVI1-J

CVMJABO MSV11-J MEMORY DIAG.

MACRC Y05.02

Monday 07-Oct-85 16:57

Page 18

Assume also that Bank 3 is known bad by the

SEQ 0017

program

via

the

sizing

routine or previous runs The testing sequence would be as follows:

AW EHWENEHUNNNW

21,
20,
22,

L
LS LVL LDV ALV
R
R
R
R

22,

21,

TEST 17,
TEST
7.
TEST
1,

MEMORY (BANKS 2.4,5)

7]
o

738

TEST 17,
TEST
7.
TEST
1.
TEST
4.
TEST
TEST
5.

LIV IV TV IV IV IV IV P R

:flflfl:flflflflflflflflfl
et v bttt
bt

s TEST MSV11i-J MEMORY TYPES FIRST
;TEST KNOWN BAD MEMORY (BANK 3)

CVMJABO MSV11-J MEMORY DIAG.
765

MACRO Y05.02

Monday 07-Oct-85 16:57

;RELOCATE

76:
76
770
77

TEST
TEST
TEST
TEST

1.,
2.
3,
4,

BANK O
BANK O
BANK O
BANK O

77
774
775
77
77
77
77

TEST 26.
TEST 1.
TEST 2.
TEST 3,
TEST 4,
TEST S,
TEST 26,

BANK O
BANK 1
BANK 1
BANK 1
BANK 1
BANK 1
BANK 1

TEST S,

780

SEQ 0018

TEST PROGRAM SPACE (BANK 0 & 1)

;‘

77;

Page 19

BANK 0

NOTE

764

This is

785

7
7
7::
;:o

7’§
;:‘

sequence.

example

not

The test sequence was forward (the simple

actual

patterns

first,

complex

tests last) sequence of patterns (H;Vu- o 3%, 7, 5. 2, & 3, 21,

20, 22, 26)(MSvVil1-J = 1, 2, 3, 4, 5, 26).

If
the bank selection is forward the banks will be tested in the
following order:

795

ECC banks that are not protected or program space (from 0
167).

;

Perity banks that are not program space (from 0 to 167).

.og

:;g‘g

The program now relocates

4. Egg)b.nko that were protected or program space (from 0 to

:gz

Parity banks that were progrem spsce (from 0 to 167).

;:g

- I111
3]

s s et P Pt

VB WO

807

If bank selection is worst

first

tests:

the

configuration

table

consulted and banks will be tested in the following order.

will

ECC banks that are known bad and are -~t protected or progrem

Parity banks that are known bad and
(from 0 to 167).

ECC banks that are presumed good and

space (from O to 167).

are

n.t

not

program

space

protected

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Monday 07-Oct-85 16:57

818

Page 20

SEQ 0019

program space (from O to 167).

819

Perity

banks that are presumed

C rm'o to 167).

The program now relocates

and are not program space

tests:

protected

ECC banks that are known bad and were
space (from 0 to 167).

program

z.:it 6.';3'*. that are known bad and were program space
o

ECC banks that

are

presumed

program space (from 0 to 167).

bt3

$2EEEEREETEToo 332333233 3

Parity

good

MODE 0

were

and

banks that are presumed good and

(fmyo to 167).

2.4.1.2

were

protected
program

space

Test Mode Details -

= "BAFPAF” banks forward, patterns forward
This

is the default and simplest mode.

This mode tests eech bank
completely
except those requiring relocations.
While testi
simple ones
MODE
1

(from

from

167

each bank the patterns are run with
First building to the more complex.

the

= “BAFPAR"” = banks forward, patterns reverse
This mode tests each bank
completely
except those requiring relocations.

from

167

While testing each bank the
patterns are run with
the
most complex ones first, working to the simple ones.
2
MODE

= “BAWPAF” = Banks worst first, patterns forward
This mode first tests each known
from

bad

presumed good banks are tested from
those requiring relocations.
While testi
simple ones
3
MODE

bank

completely

O to 167 except those requiring relocations,

167

then

except

each bank the patterns are run with
first, building to the more complex.

the

= “BAWPAR" = Banks worst first, patterns reverse

This mode first tusts each known

bad

bank

completely

CVMJABO MSV11-J MEMORY DIAG.
873

VOO OOP

BRRRRRESESSsRS SReRaR 832382 2R33SECRARERES

0>
~N~N~
e

874
875
876

MACRO Y05.02

Monday 07-0ct-85 16:57

Page 21

SEQ 0020

from O to 167 except those requiring relocations, then
presumed good banks are tested from 0 to 167 except
those requiring relocations,

While testing each bank the

patterns are run

with

most complex ones first, working to the simple ones.

the

“PAFBAF” = Patterns forward, banks forward

This mode tests each pattern completely with the simple
ones first, building to the more complex.
While testi
167 except t

each pattern the banks are run from 0
requiring relocations,

“PAFBAW"” = Patterns forwaerd, banks worst first

This mode tests each pattern completely with the simple
ones first, building to the more complex.
While testing each pattern first each known bad bank
from O
to
167
except those requiring
relocations is
run, then presumed good banks are run
from 0 to 167
except those requiring relocations.
*PARBAF" = Patterns Reverse, Banks Forward
This mode tests each pattern co-giotcly with

complex ones first, working to the
While testi
167 except

the

simple ones.

most

each pattern the banks are run from 0
requiring relocations.

“PARBAU" = Patterns Reverse, Banks Worst First
This mode tests each pattern cong}otcly with
the
complex ones first, working to the
simple ones.

most

While tootinz each pattern Tirst each

known

bank

run, then presumed good banks are run
except those requiring relocations,

from

bad

O to 167 except those that require relocations

NOTE

# Relocation is required to test
the
benk(s)
in emn- space and also to
test
any
ECC
banks
rotected
b
diagnostic checkmode with
the inhibi
mode pointer off (zero)!

167

CVMJUABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Monday 07-Oct-85 16:57

$8LEREEERESE

2.4.1.3
1.

SEQ 0G21

Test Mode Applications -

To verify

“BAFPAF "Y

correct operation of the memory

Adventages:

system use

In case of a faili

time to find the failure.

To get detailed error information on known bad
Seeks Bad Banks.

Dio.dvmtog.o:
To

Advantages:

Banks

(found

Easy to understand.

Failures other than zeros

to find.

t’oodorror info
on any memor

“PAFBAF "TM,

- Benk, it may . take a 1 —

by sizing routine) use Mode 2 "“BAWPAF".
Advantages:

Mode

Easy to understand.

Disadventages:

long time

L2300

Page 22

Covers all banks fast.

ones may

teke

roblem fast
use Mode

Easy to understand.

Disadvantages:
Failures from only complex patterns may
a long time to find.

take

To find eny problem fast use Mode 7 “PARBAW".
Advantages:

Covers all Banks fast.

Disadventages:
Difficult to understand failures reported are
not necessarily the most basic failure modes.

2.4.2

A softwere switch register exists in location 174.

975

2.4.3

2.4.3.1

The CACHE constant is located at symbolic location "CACHK" and is used

1
}
i
i

1
1
1010
101
101
101
1014
1015
101*
101
{01:

§u~o‘§

= et e

Special Memory Locations CACHE Constant -

to enable CACHE.

NOTE

Bit0

effect

the

since

by the prfir.enable CACHE.

2.4.3.2

CACHE

constant

hess

tries

it is unconditionally set
whenever

Configuration Table

The configuration table is located at symbolic location

has the following format:

CONFIG:

“CONFIG"”

and

First 16K Configuration words (2 each)
2nd
16K Configuration words (2 each)
200th 16K configuration words (2 each)

Configuration Words:
LOW:

MED:

BIT O

ERRORS PRESENT

MEMORY EXISTS
BIT 1
RESERVED
BIT 2-4
SKIP ECC LOGIC TESTS FLAG (1=SKIP)
BIT S
PROTECTED REGION OF AN ECC MEMORY
BIT 6
PROTECTED (PROGRAM SPACE)
BIT 7
BIT 8-11 CSR CODE
BIT 12-15 RESERVED
NUMBER OF ERRORS
8IT 0-7
BIT 8-10 MEMORY TYPE
CSR TESTED OK
BIT 11
BIT 12
RESERVED
BIT 13
“SACKGROUND PATTERN VALID"” FLAG
BANK SELECTED FOR TEST BY FIELD SERVICE MODE
BIT 14
-

971

Software Switch register -

970

@®

Page 23

Mondey 07-Oct-85 16:57

$2383333333333333333822888
8828

969

‘

MACRO Y05.02

LOADERS HOME BANK

This table is used as the source for the configuration
Map (reference. section 7.3).

SE—

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 24

SEQ 0023

108
i
is
l.Oii

Terminal Commands -

2.4.4

2.4.4.1

1039

This commend will:

sOOO
~~
r

(-1

W=
O

e e 1m0t
1 1 o

1045
Ol,

=-o

If Switch 8 (Helt Program) in the switch register is set halt

%0‘

Control "“C”

the program.

If Switch 8 is not set, unrelocate if program was relocated.

Flush out any DBE's.

10
10

Turn off Memory Menagement.

$22R2RERRLIITFIFAZAILL2 33T

10
10

HALT

This command will only
test or pattern, or at

2.4.4.2

be recognized at the completion of the
the end of a line of an error message.

Control "K" (Kill error printout and skip pattern)

This command will allow lou to stop an error

printout and skip

ttern. This is handy, for example, -xon you have a

full of

current

errors, have gotten enough information, and wish

the next pattern.

2.4.4.3

the

skip

le bank

Control "T” (Tell me what's happening)

This command will print out the information

This

display register.

mainly

intended

for

encoded

CPU's

the

display

without a hardware

Example:

BANK = 17 TEST = 46
RELOCATED BANK= O PAT= 26

By use of Field Service Commend 17 "Trace” can be set so that it will
sutomatically type out the bank and pattern numbers as each pattern is
run.

(Reference section 2.4.4.8.18).

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 25

SEQ 0024

2.4.4.4

Control "S” (Stop)

This command will stop typeout (soon) and will wait for a Control “Q".
2.4.4.5

Control "Q” (Quintinue)

This command will continue typi
g,
If there has been no
ignored.

2.4.4.6

that has been stopped by Control
Control "S” typed then this command is

Control "F” (Field Service mode)

This commaend will cevse you to

commends.

enter

mode

which

looks

for

sub

When the program is looking for a sub command any number that_is not a

1
1 commend will cause a mini he
to be t
x
in doubt typ: 99 (CR) .nd'yc'w u%gl get g:lp.
—.

Therefore

NOTE

e (Pt b e B

i ot

e B D

o b

b P

s o

s 1 Pt

0 0t 1t et P et e s e s

33333i3i3338888¢828

1081

et ot o 4

Typing just carriage return is a default
command 0.

2.4.4.7.1

Field Service Command 0 (Exit)

1_’:5. commend will ouét Féolg Sorvi:ulflgg. .":o:ctctam to mgovor task
:

was

prior

return is e default Co-uv\: 8‘

contro

it 2ne

carri

MACRO Y05.02

Mondey 07-Oct-85 16:57

Peage 26

2.4.4.7.2

Field Service Command 1 (Read CSR)

This commend will typeout the contents of the CSR.

If there is more than one CSR on the CPVU (or i'thomn has not
determined the CSR status yet),
it will Ask you *
CSR(O0-F)* to
which you must respond with an Hexidecimal nusber from O to F.
Note
typing just cerrisge return is e default 0.

p
If the CSR you select causes a trap to 4 the

Eae

CSR DOES NOT EXIST.

em will

*THIS

NOTE

CSR references are
with section S5.0.

2.4.4.7.3

done

accordance

Field Service Command 2 (Load CSR)

This command will enable you to load the CSR.

If there is more than one CSR on the CPU (or i!m&ran- has not
yet determined the CSR status yet) it will ask you “WHICH
CSR(0-F)” to
which you must respond with an Hexidecimel number from 0 to F.
Note
typing just caerrisge return is a default O.

If the CSR

you select causes a trap

CSR DOES NOY EXISTTM.
FRIANZ3TEL

s P et e P

s o e e ot s B o e D e i

$38385258

i (S o (e e e ot o i e it o P [t e P e P i e e P

it P (e i P P

Lot ot et et etetetetated

s e et

CVMJABO MSV11-J MEMORY DIAG.

- to 4 the R em Sevanwill

*THIS

The CSR will be read and displayed as in command 1.

The progrem will then ask

you for the “CSR?" to which

you must respond

sifl\ en Octal number. Nztc typing just carriage utzm is a defeult
The pnr- will then load the CSR end Read it
new contents.

again

displaying

its

| CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Mondey 07-Oct-85 16:57

2.4.4.7.4

Page 27

Field Service Command 3 (Examine Memory)

This commend will allow you ..o exsmine any physical address
the necessary memory menagement mapping for you.

The
whi

mll ask you for the "PHYSICAL ADDRESS
you sust respond with an Octal nusber.

end

does

(0-17757776)"

Iffln“m couses @ trap to 4 the progrem will ¢
to 114
If the aeddress access causes a trap
“TIMEOUT TRAP”.

progras will tm “PARITY ABORT".

The contents of your physical address will be typed.

2.4.4.7.5
|2
¥
¥

| 3¢

t
¥

1 90
1 20

1 20
¥
¥
¥
¥
¥
¥
¥
¥
¥
¥
¥
¥

¥
¥

¥
¥
i

Field Service Command 4 (Modify Memory)

This command allows you to modify eny

physical address

does

the

(0-17757776)"

necessary memory management nppmg or you.

m:e:

ill ask

you for the “PHYSICAL

'" respondA with an Octal number.

I'fin“‘;‘smmotr

*TIMEOUT

ADDRESS

end

the progrem

will
¢

If the “dnn’occm causes @ trep t:» 114

program will type “PARITY ABORT”.

The mom will ¢ype “OLD DATA WAS” end the contents of yyour physicel

The progres will then t

“INPUT NEW DATA" to which

nr.nd

35& on Oe.ol m.or.”'.bto typing just c.rrn..; n‘um
is a default

The progrea will tqtto-r
st

s new

date

nto

ical

address
.ft::- which it will readi& egain end ty;o Gfi'
the new contents of your physical eddress
NOTE
If
can't chenge the data, thet would
indicate thet you have @ Double Bit
Error in thet double word pair.

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Monday 07-0ct-85 16:57

Page 28

SEQ 0027

1230
1234
1235
36

2.4.4.7.6

{220

This command allows you to run any bank with any pattern forever.
TM

ogrwill .ok

Test)

ou "BANK(0-177)" to which l
ou must respond

the bank is not accessi

with

The program will

typo 'DAM( NOT ACCESSIBLE" and ask question over.
The program will then ask "TEST (0-47)" to which you

with an Octal number.

must

respond

NOTE

o okt
o 1t

TR et T
v d dt o 3£3

:o-»r-

oo n
(LN

1200

Field Service Command S (Select Bank

Any pattern can be run

including

those

that are not part of the APTE-TABLE

defaults (reference uctnon 6.2.1).
If
wil
0 " .:rogryou select Pattern

ask “TEST O DATA IS?”
must respond with an Octnl number.

If the Bank ‘E selected requires relocation the program will t‘po
"BANK REQUIRES RELOCATION" end exit this command.
Note normally t
is true for
B

The

am will then arm the console keyboard for

"10 ESCAPE TYPE ANY KEY!",

The test pattern will be entered
depressed to escape this loop.

2.4.4.7.7

and

run

until

interrupts and type

console

key

Field Service Command 6 (Type Configuration Map)

This command types the configuration map.

This is useful after
a long run (overnight) to see all the banks

are marked as bad.

that

(Emcully if your console is a video terminal).

For a detailed explanation of the map reference section 7.3,

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 29

SEQ 0028

1281

i
3333

1389

e
et o e e

2.4.4.7.8
This

commend

non-protected

allows

Banks

execution

reference

the

Section

SOB-A-LONG

6.2.2.26.

Test

identical to command 5 except that no Pattern or Bank is

each pass ceuses a Bell.

2.4.4.7.9

Operstion
entered

ell

and

Field Service Command 8 (Error Summery)

This command ¢t
errors.
If

out the number of passes and the total number of
re were any errors it will type out the Banks and the

number of errors per bank up to 255 DECIMAL.

XSRS

o-o-nwnnn»nwkunvo—:wo-nnnnn»o-o-o-nwnn
Rl I

Field Service Command 7 (SOB-A-LONG TEST)

This becomes useful after long runs (all

video console terminal.

systems

with

Field Service Command 9 (Refresh TEST)

This command allows execution of the Refresh Test on all non-protected

Banks reference Section 6.2.2.19.
Operation is identical to command 5
except that no Pattern or Benk is entered and each pass causes a Bell.

2.4.4.7.11

Field Service Command 10 (Set Fill Count)

This command allows uttin, of the terminal fill count (menurl
for
LA30's,
ASR33‘'s, and VT0S's).
It is normally set to zero for LA36's,
VTiS2's,

VT100's, etc.

b o bt et o ot

OOBNOVBEUN»-O

2.4.4,.7.10

night)

2.4.4.7.12

Field Service Command 11 (Enter Kamikaze Mode)

This command allows you to run patterns that sre normally not executed
unless under APT or
ACT.
They sre usually very time consuming and cen
result in failures thet are fatal to the pr:,uIn effect you are
trlin! to find & hardware failure regardless of the consequences.
Note that most crashes do not wipe out the display
information which
is telli
you what the program was dom e\nt prior to failure.
There are

two ways to die here - Impatience

rashes.

MACRO Y05.02

HMonday 07-Oct-85 16:57

Page 30

SEQ 0029

2.4.4.7.13

Field Service Command 12 (Exit Kamikaze Mode)

Return to the defesult mode of testing (undo Command 12).

2.4.4.7.14

Field Service Command 13 (Turn Cache Off)

;hz.scggnpo the Cache constant to

bypass

cache

(reference

section

2.4.4.8.15

Field Service Command 14 (Turn Cache On)

;hioseggn.co the

Cache

constant

use

cache

(reference

section

2.4.4.7.16

Field Service Commend 15 (Test Only Selected Banks)

This command allows you to center the test effort on only those banks
that
you are tr
leshooting.
You may also test banks that require
relocation and were inaccessable via command S.

2.4.4.7.17

Field Service Command 16 (Resume Testing All Banks)

Return to the default mode of testing (undo Command 15).

Enable “Trace”.
After exiting field service mode,
the program
type out the bank and pattern numbers as each pattern is run.

Field Service Command 17 (Resume Testing All Banks)

2.4.4.7.19

Field Service Command 18 (Resume Testing All Banks)

s e Bt

e 1

2.4.4.7.18

et o

B o (o

et et B

b ot et B

e o

e Pt Pk

w
R

s s e

b Dok ok

kb bt et

= et et gt g b

s s

G’lND!EE\l!EE!EE!E SRaeeergSEEEEEER LRSSy

CVMJABO MSV11-J MEMORY DIAG.

Disable “Trace”.

(undo Command 17).

will

CVMJABO MSV1l-J MEMORY DIAG.

MACRO Y05.02

2.5

Monday 07-Oct-85 16:57

Page 31

SEQ 0030

Execut ion Times

2.5.1

Typical (System) -

Execution t

depends on

man

measured times on an 11/23B: "

variables;

however

here

are

K words of MSV11-J Memory
Min
Sec

Normal Pass
Quick Verify
Kemikaze Mode
Kemikaze QV

Min
Min
Min

Sec
Sec
Sec

K words of MSV11i-L Memory
Min
Sec

Normal Pass
Quick Verify
Kamikaze Mode
Kamikaze QV

Min
Min
Min

Sec
Sec
Sec

K words of MSV11-P Memory

Normal Pass
Quick Verify

Kamikaze Mode
Kamikaze QV

2.5.2

Min
Min
Min
Min

Sec
Sec
Sec
Sec

Calculations (System)

Normal Pass

Add
Add
Add

Quick Verify Pass

Add
Add
Add

Kamikaze Mode

Sec per 16K BANK of MSV11-P
Sec per 16K BANK of MSV11-L
Sec per 64K BANK of MSV1i1-J

Sec per 16K BANK of MSVil-P
Sec per 16K BANK of MSV11-L
Sec per 64K BANK of MSV11-J

Add 10 min. per 128K words for approximate pass times.

CVMJABO MSV11-J MEMORY DIAG.
144
144
1444
1445

t“

1423
i:
14

5
4

1455
14
14
14
14
{uo
46
i

46
1464
1465

{“’
1
1
1470
147
147
147
474
475
476
i‘;?
4
147

MACRO Y05.02

Monday 07-Oct-85 16:57

2.5.3 Typicel (Tests)
5.

Test Time

MTO0000
MTO0001

;<1 SEC
;<1 SEC

ests

Description
DATA PATTERN TEST
ADDRESS TEST

MT0002
MTO0003
MTO004
MT0005
MTO0006
MT0007
MT0010

;<1 SEC
; 1 SEC
; 1 SEC
; 1 SEC
;<1 SEC
;<1 SEC
;<1 SEC

COMPLEMENT ADDRESS TEST
3 XOR 9 WORST CASE NOISE TEST
ROTATING ZEROS TEST
ROTATING ONES TEST
INITIAL DATA TEST
ADDRESS BIT TEST
BYTE ADDRESSING TEST

MT0017
MT0020
MT0021

;<1 SEC
; 1 SEC
; 1 SEC

HOLDING 1'S O0'S TEST
SYNDROMES TO CSR ON SINGLE BIT ERROR TEST
MARCHING 0'S 1'S TEST

MT0014

; 1 SEC

BASIC DOUBLE BIT ERROR TEST

MT0022

;10 SEC

REFRESH TEST

MT0024
MT0026
MT0027
MTO030
MTO0031
MT0032

;20 SEC
;<1 SEC
; 1 SEC
; 1 SEC
; 3 SEC
;<1 SEC

FAST GALLOPING PATTERN TEST
RANDOM DATA TEST
WIM BANK TEST
FLUSH OUT DBE' S TEST
SO0B-A-LONG TES
lflITE RECOVERY TEST

MT0023

MTO033

;10 SEC

MT0034
MTO0035
MTO0036
MT0037
MT0041

;35 SEC
;<1 SEC
;<1 SEC
; 1 SEC
;<1 SEC
; 1 SEC

MTO0044
MT0045
MTO0046

; S SEC
;<1 SEC
; 1 SEC

14
14

MT
MT004

{: 'z

MT0047

14
14
10:4

ypice

Page 32

s<l SEC
;<1 SEC
;<1 SEC

SHIFTING DIAGONAL TEST

BRANCH GOBBLE TEST

SOFT ERROR TEST
WORST CASE PARITY TEST
CORRECTION CODE TEST
CHECK ECC DISABLE TEST
T
ADDRESS 70 CSR ON DBC

XTENDED ADDRESS TO CSR ON ERROR TEST
lvl!ITE BYTE TEST

SHIFTING CHECKBITS THROUGH CSR TEST
SYNDROME BITS TO THE CSR ON A DBE TEST
CHECK SINGLE BIT ERRORS WITH ECC DISABLED TEST

NO CSR UPDATE WITH EXISTING DBE TEST

SEQ 0031

CVMJABO MSV11-J MEMORY DIAG.
1488

1489
14
llzi

149

1494

1495
1496
1497
14
o B

Monday 07-Oct-85 16:57

3.0

ERROR INFORMATION

3.1

Error Reporting

IR
-

1. ENTYV ¥ 3WO

o-nnmw

s D (b o
b B
(8 ot e
o

YAV
VIV IV IV ]

o o e e
s

handler

provided

Y DATA ERROR" t¥=:
dnc

will be described here.
MEMORY DATA ERRORS will also cause
to be marked as Bad in the configuration table.

Other on-oro are best explained by referencing
end if necessary the program listing.

SEQ 0032

SYSMAC.SML. Most errors will be of the

le 1:
Y DATA ERROR

022132
022132
022132
022132

Page 33

Most orron are reported using the EMT trzm

BANK
37
37
37
37

VADD

060006
060006
060006
060006

BAD

GOOD

PADD

000100
000100
000100
000100

000000
000000
000000
000000

03700006
03700006
03700006
03700006

the

specific

XOR

CSR MTYP

000100
000100
000100
000100

O
O
O

E
E
E
E

typeout

PAT

06
06
06
06

While testing Bank 37 at virtual address 60006 (vu-tu.l addresses

are

address 3700006 (that's Bank 37

with

slways

Pattern

between
6

60000

(Initial

and

157776

for

mmgrposes),
m:hyuc.l

"‘K."“

Dot- Test), t

data e

d.tnoetuuuy read (BAD) was 100, the cxelumvo

hin

tho

ted was O but the

at Good

‘S 100 which
mducnto- onl.{ failing bit(s) (Bit 6).
Vii-J (ECC) Memory. The CSR is
located at 172000.

MaY
DATA
ERROR
BANK VADD
022132

022132
022132

35
35

060000
060002
060006

PADD
03500000

03500002
03500006

GO0D
000000

000000
000000

BAD
000001

000100
000100

XOR CSR MTYP
000001 O
E
000100
000100

O
O

E
E

Bed

It is an

PAT

06
06

While testing Bank 35, virtusl address 60000, physical address 3500000

with Pottcm 6 (Initial Data Test), the good data expected was O but

the dats octuouy read (BAD) wes 1, the exclusive OR at Good
Bad
(l.l‘.
1 which indicates only failing bit(s) (Bit 0).
It is an MSV11l-J
ECC) Memory and the CSR is located at 17200C.

G-

NOTE

e (o et e Ik

MACRO Y05.02

Subsequent errors of the

not type s new heading.

same

test

CVMJABO MSV11-J MEMORY DIAG.

Mondey 07-Oct-85 16:57

MACRO Y05.02

Page 34

SEQ 0033

3.2

Error Abbreviations

The following is a list of all abbreviations used in error reports.
& OF ERRORS

Number of Errors that were detected.

1ST ADD

First Address that failed.

APTCORE
APTMOS
BAD
BAD-WD1
BAD-WD2
BAD-CHK
BANK

APT Core size.
APT MOS size.
Bad data.
Bad Word #1 of a double word data value.
Bad Mord €2 of a double word data value.
Bad Check Code Bits.
The Bank number. Banks are 16K words long.

DEV ADD
gcC

Device Address.
Error Correctable Code.

ARRAY

APT®

8D-CC
CHKBITS
CONTRL
CPUERR
CSR
CSRNO
DATARG
DBE
GD-CC

GD-CHK
GD-uWD1
GD-WD2

GOOD

LSIZE
MEMERR
MMRO

MMR3

MTYP
PADD

The array number that was locked up in the MS11-M CSR.

The ¢ of CPU's APT expects on the system.

Bed Check Code Bits.
The 7 bit value of the Check Code Bits.
The CACHE Control register.
CPU Error
ister.
Control and Status Register.
CSR NUMBER (0-F Hexidecimal).
The CACHE Data Register.
Double Bit Error (uncorrectable error).
Good Check Code Bits.

Good Check Code Sits.
Good Word €1 of a double word data value.
Good Word #2 of a double word data value.

Good dot..

MSV1i-J Size.
Memory Error muoter.
Memory Management llogutor #0.
ry

ogu er

egister 03,

PAT

nsvu-JMSV1i1-L, or MSV11-P).
!oncnflnc-(asserted by the program after mapping).
Pn tern numbe

SBE
VADD

Single Bit Error (correctable error).
Virtual Address (asserted by the program before mapping).

WROTE1L

WROTEZ2
XOR
AUT

Program Countcr at the time the error occurred.

The data that was written mto the 1st half of a double word.

The data that was written into the 2nd half of a double word.
Exclusive OR of the good and bad data.
Shows the bad bits.
Address under test

CVMJUABO MSV11-J MEMORY DIAG.
%S‘S

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 35

SEQ 0034

lggg
i ]
i

3.3 Error Helts
There are several Halts in the program.
All unused trep vectors contain a trap catcher (.WORD .+2,HALT).

% 95
{
;

The APT down loed sequence will halt at symbolic location "APTHLT".
Halt on Error option (SW1S Set) at symbolic location "$HALT".
Halt program (SW8 Set) at symbolic location “$EXHALT".

o bt
pt

gL3852223

i :i

An undefined TRAP instruction halts at symbolic location "$HALT2".

Power Fail will normally

(symbolic location "§

halt at the end of

the

shut

down

sequence

Power Fail has & fatsl Halt at symbolic location “$ILLUP” which can be
caused by power up occurring before power down secuence completed or
by power down before a power up sequence is completed.

CVMJUABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 36

SEQ 0035

|
'
|

4.0

PROGRESS REPORTS

Pess complete typeouts as follows:

0
1
2

&
4
Qv

END PASS
END PASS
END PASS

NOTE

2 was flegged

Quick

Verif

P::: .('Boc.uu of a change in SWS)

’

To obtain progress reports while executing, t{ping a Control "T"
print out the information encoded in the
di sp ay register.

will

Example:

BANK= 2 TEST= 34
Reference Section 2.4.4.7.18 for more information on Trac
) n~
5.0

CSR INFORMATION TABLES

The fououi:g is @ picture view of the current control status
registers
ich can be tested by this program.
It shows bit

essignments and definitions to provide a handy reference, and
shows the similarities and differences between each one:
NOTE
All unused bits in each CSR are equal to zero.

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 37

SEQ 0036

ius

|
‘

1665

S.1 MSV11-J CSR

1666
%“1

'1228
1670
%:;é

(¢9)

N:
> TR EE"ETE
R ADDRESS
WEFTEE
'SE'IP!DCIECIEE!
'DE! 'EA! !
E

1675
@

167
i‘?

1685

1“9

{“

eesscssscesscscesccsscscsccssssscsccsccsancccscas

2. X 3
'DE!EA!SI!

i
168
S

15 14 13 12 11 10 09 08 07 06 05 04 03 02 01 00

%:;‘
167

8-F

I
CHECK BITS

2.3

I1SE'IP!DCIECEE!

¢G

15 14 13 12 11 10 09 08 07 06 0S5 04 03 02 01 00
T

(III)

eessassssdeassnteeans
N esshSte RaRES SRR NS ey Ean

¥k

'DE!EA!SI!
X

-2

SYNDROMES

1SE'IP!DC!ECEE!
%

15 14 13 12 11 10 09 08 07 06 0S5 04 03 02 01 00

169

{6’3

1:3’

ua
1

1700

assi

as follows:

are

BIT1S UNCORRECTABLE ERROR

On @ read to memory (ECC Disable
Bit = 0), this bit is set if
a double error occurs.

The

17
17
170

error address is stored in the
CSR. Setting this bit also
turns
on a red LED at the rear of

17
1706

This bit is also set in ECC
Diseble Mode if a SERR or DERR

the card for @ visual

indication.

i;gz

occurs.

1709

BITi4 EUB ERROR ADDRESS

Hii
1714

by
X, g uy.ntlgo. 1033' into the syndrome

1710
1711

i;g

With Bit 14 = 1, a read to the CSR
will fetch address A21
i

CVMJABO MSV11-J MEMORY DIAG.
1718

1719

MACRO Y05.02

Mondey 07-Oct-85 16:57

Page 38

BIT13S

SET INMIBIT MODE

1750
1721
17
17
17

When this bit is set to
8 "1”", it enables the inhibit
mode pointer
to inhibit
either the first or second
16K from ever !Eina into the

17
17
t?

BITS0S-10 CHECK BIT STORAGE (CSR II)
Check Bit Storage (Diag CK
Bit2=1)
A

{7
7
17
1735
17

mode these b’'ts are used to store
the check bits to be written
into memory or the check bits
read
from memory. If a double
error or oin,l.o error occurs

17
1739
1740

mode and ECC disasble 8it 1 = O,
then the check bits are stored
in the CSR together with

}74
7
174

1744
1745

Diag Check or

ECC

When in the di

Disable

ic check

when in the diegnostic check

the double or single error
bit. These bits are writeable
in diagnostic mode. A "1*

is stored in Bit 11 if CSR
02, CSR 13, and CSR 14 are

17‘*
i;:.

set to indicate that the
memory under test is a MSV1l1-J.

1749
1
i.

BITS05-11 QBUS ADDRESS STORAGE (CSR I)
(Dieg
Ck Bits 2 = O, ECC
Di
le Bit 1 = 0)

If a double or single error

occurs on & Read cycle, then

17
17

Al17 ere stored in these bits
These bits sre read only

or DERR (CSR 15) is set but

11:;

Bit 2 = 0),

1755
1

l;“

17:.

{;os
11‘9

176
1768
17’3
17
im

address Bits All t‘rou'- :

the condition that SERR (CSR 4)
CSR 14 is not set.

EQB Address ECC
Storage
(Dieg Ck
Disable Bit
1=0o0r1).

If e double or single error

occurs on @ Read cycle,
nur
address Bits Al17
A1l ere stored in CSR Bits
11 through 5 and address
Bits A21 through Al8 are

MACRO Y05.02

Mondey 07-Oct-85 16:57

Page 39

0 et et et

s s e

s
PP R 333 3 S P ERER

CVMJABO MSV11-J MEMORY DIAG.

m‘e e backup register.

rror Ag.uoo

Retrievel Bit (CSR 14) ise
used to obtain the totsl
error address as follows:

XI
TM

whenever CSR 14 = 1,

BITOS5-10 SYNDROME STORAGE (CSR III)

P 1

-2 BT
JE R )

e e e Dt e (0 P

s Pt Pt Pt

If a double or single error

| CYMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 40

SEQ 0039

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 41

SEQ 0040

The check bits desired for a
iven data pattern .n -;utton

?nto Bite 5 through
the CSR.

A word or write byte

mr‘h:ill write the check bits

from
CSR to the MOS arra
(CSR 2 = 1) instead of the check

e ot et et

bits generated on the dates

to be written.
Single errors
on the read portion of the DATOB

NOVBWUN-O
GOV

s e e

s s it (s e o
s (s (s i
s s s s s i
s s s
P Pt

et et e Pt et

COOOWVEIOVL
O

s i it et e e e e e

1t 8 e et 2k 3t

3333332833333%%

s o

cycle are corrected.

A read to the memory will
read the check bits stored in
m'!a“ clock them into
the CSR.
If a double error or single
error occurs the DERR or
SERR bit in the CSR is set
and the error syndrome bits
read from ECC are stored

CSR Bits 10-5 es well es the
address bits.
In Diegnostic
Check Mode the error syndrome
bits will be read when CSR
Bits 10-5 are read.

mo.bit i‘t. Read/Mrite :l‘:
is

reset

BUS INIT.

power

BITO1 DISABLE CORRECTION
If this bit is set, no single
errors will be corrected.
A
single error will set CSR 4
and CSR 15 or a double error
will

set CSR 15 and essert

BUS PBL if CSR 00 is asserted.
The 1K block of address

where

will be the same,

the

the error occurs will also
be stored in the
.
priority of a SERR
and DERR
i.e.,

lest error information wil
always be stored unless o
precedes a SERR.
If »
le
error occurs during 8 write byte
c‘:h. the write portion of
t
cmc will not be aborted.
The check bits written will

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 42

SEQ 0041

1937

8 Wb e o s e

1939
1940
194

233333

194

et b ot Pt

PR e e

s o Bt g (ot o

1945

have been genersted on the

date written. This means that
ifa single or double error
existed in the location accessed,
it would be clesred (unless the
errors were hard).
This bit is @ diegnostic aid
to sllow writing and reading
data from memory without

interference from the error
correction logic.

BITOO UNCORRECTABLE ERROR
INDICATION ENABLE
If @ double error occurs with
ECC ensbled or a single error
or double error with ECC
disabled, on & Read cycle to the
memory

then

and this bit

is set,

PBL will be asserted.

CVMJABO MSV11-J MEMORY DIAG.
{’61

i’.&i
1965

1
{;:,
l'og
‘:;

i:;‘

MACRO Y05.02

Mondey 07-Oct-85 16:57
MSV11-L/P CSR

S.2

PE!EV!

b¢

Page 43

SEQ 0042
J 4

.....
..........
3.2
3k 3 R

ADDRESS

IWP!

'AE!

5% % BE 5 ¥ 32 X & FR2'E R
15 14 13 12 11 10 09 08 07 06 05 04 03 02 01 00

Bit assignments are defined as follows:

BIT1S PARITY ERROR

t"’!

BIT14

EQ8

memory

is_

s et bt

97
9

T gt ot e e Pk B

3333333333‘!

o ok Pk P (o o ot ot b Pt ok Bt

980

RETRIEVAL

VB WO

the

an
Extended QBUS,
when
BIT14 is zero, the low

order

failing

addresses
are
available
(Bits
11-17);
when BIT14 is
high order
the
one,
failing
addresses
are
asveilable
(Bits 18-21

of address).

memory

the

BITS
11-5
ADDRESS
MWith

ERROR
BIT14

8
r disables this
bit
so that it is read
only., and equal to zero.

:o:'.‘ they contng:
i

ror

order pari

21-18

address
of

the
er-

hito

address);

with BIT14
clesred,
they contain
the low
order parity error ad17-11 of
(Bits
dress
address).

BIT02

MWRITE

(odd)
other

when
parity

PARITY

414
= e b ot o g

ERROR

Normal

when set.

WRONG

parity

clear
(even

BITO0 ACTION ENABLE No
sction
when
clear;
trap
to
when set.

vector

114

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 44

SEQ 0043

2017

6.0

SUB-TEST SUMMARIES

6.1

Tests

TEST

BIT TEST OF ALL CSR’'S/MATCH ALL CSR'S WITH MEMORY
(CSR Access may cause wrong Type of Traps)
TEST

TEST BANK O ACCESSES
Failures are fatal.
TEST

EEST BANKS 1-%7: ggc‘T:L.) FOR Zgflosi Amdo'_ces
rrors

are

the confi.urotiox table

TEST

ogged

ECC INHIBIT MODE POINTER TEST
TEST

DIAGNOSTIC MODE DISPATCH ROUTINE
This test runs all the patterns
mode selected.

TEST

UNIQUE BANK TEST
Pattern 27

is run

in the

CVM.:4B0 MSV11-J MEMORY DIAG.

Mondey 07-Oct-85 16:57

MACRO Y05.02

Page 45

SEQ 0044

2064

5066
s4

6.2

228;%

6.2.1

7
74

g”
20;:

Tests

General Test Information

Actual Tests are identified by symbolic locations "MTPXYY" where X
may be any sub program indicator (A,B,C,etc) or 0 and YY will be the

number of

Set

test.

erocoduno for each test are identified b‘ symbolic locations

“MTOOYY” where YY will be the number of the test.

Tests reside in 4 scripts that are scanned for execution. Symbolic
is a table of tests that can run once for each
location "MKCSRT”

ECC bank. Symbolic location
"MKPAT” is
can run on each Bank of ECC memory.

S
20._6’

9
:

*
zgg

310
210§
210
;104
105
z;og
210

g%g:

table

tests

that

Symbolic location "MJPAT” is a tab{c of tests that can run on each

Bank of Parity
tests that can

memory.
Symbolic location “FSPAT" is a table of
run in Field Service Mode (command S).

The 1st 3 scripts are co:glctol

if not running under

controlled b{ the APT

E-table

(even

APT). ‘odificntion- o this table can be made

(1) with APT, or (2) manually.

389’3

2094

Example E-table Segment:

;sTHE FOLLOWING LOCATIONS SPECIFY WHICH TESTS

;ARE TO BE RUN FOR PARTICULAR MEMORIES

:REFEREME
THE TABLE LISTED BELOW TO RELATE BITS TO TESTS.
;BITO SET WILL RUN THE FIRST ENTRY IN THE TABLE, BITO SET

;IN THE SECOND WORD WILL RUN THE 17TH ENTRY IN THE TABLE...

INOTEssNULL TESTS DO NOT TAKE ANY TIME
3

$0DWO :
$DDW1:
$DDM2:
$0DW3:
$0DW4 ;
$DDWS :

.WORD
.HORD
.WORD
.WORD
.WORD
.WORD

177777
177777
177777
177777
177777
177777

RECOMMENDED VALUE

;ECC CSR TESTS
;ECC CSR TESTS
;:ECC TESTS
;:ECC TESTS
;PARITY TESTS
;PARITY TESTS

177777 TABLE = MKCSRT:
177777 TABLE = MKCSRT:
103777 TABLE = MKPAT:
177777 TABLE = MKPAT:
003777 TABLE = MJPAT:
177774 TABLE = MJPAT:

e s o

MACRO Y05.02

Monday 07 -0ct-85 16:57

Page 46

SEQ 0045

LR
X LT

1§nn-nmu-nmu-n'
P s e pen o o Seale
umrwm

RNV NN

s s e [liciciat
0t
gt e e

CVMJABO MSV11-J MEMORY DIAG.

6.2.2

Specific Tests

Basic Data Test

6.2.2.1

Test 0

Writes

Reads R2

into a 16K Benk.

This is used for Zeros and Ones testing and in Field Service Mode

any console selected Test.

It can execute out of the USER Instruction PAR's.
NOTE

It is
frequently modified dynamically
such
that
(1) it returns after writing
only
(the 1st NOP
is replaced with a
RET
)
or
(2)
it
only counts Errors
(the code PERRO2 and NOP
are
replaced
with INC S4PATERR).

for

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 47

SEQ 0046

-1

et et o Pt o P

e 1o

LSV T ST VTN NY ST VT ST N XY .NY

2142
;l‘!
144
145
146
147

6.2.2.2

Test 1

Address Test

Writes
Reads ean
incrementing
addressed into a 16K Bank.

pattern

equivalent

It can execute out of the USER Instruction PAR's.

physical

Monday 07-Oct-85 16:57

08 G047

Page 48

MACRO Y05.02

o Dt Pt

et e

et P

PSS
44 475 S44

s s e P
o

CVMJABO MSV1l-J MEMORY DIAG.

6.2.2.3

Test 2

Complement Address Test

Writes the complement of the physical address from high

addresses

low (write down) and reads from low addresses to high (read up).

This provides the complement of the coverage of Test 1 in both date

pattern and addressing sequence.

It can execute out of the USER Instruction PAR's.

—

[V INT VST VTN VT ST VY ST VYRN

:;:::vunw-uu-uu-o-P 0 s et b oo e
bhd
444 13 3
BR283333

CVMJUABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Monday 07-Oct-85 16:57

6.2.2.4

Writes

change.

Test 3

Page 49

3 XOR 9

Reads a Test that complements as

This test is run 4 times (1) with Zeros

address
Ones,

bits

(2)

with

aend

Ones

Zeros,
(3) with 401 Ones. and (4) with Ones 401.
The test of
the 401 is to force a the parity bits to become involved.

It can execute out of the USER Data PDR's, the User Instruction PAR's,
the Kernel Data PAR's and the Supervisor Data PAR's.

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Mondey 07-Oct-85 16:57

6.2.2.5

Test 4

Page S50

SEQ 0049

Rotating Zeros Test

Hrites & background
thru each par of

Zero and the word (2

pattern of Ones. Rotates a Zero Cnrr‘ Bit left
ztco (18 times) and then checks that the carry is
bytes) is still all Ones.

It can execute out of the User Data PAR's and the Kernel Date PAR's.
NOTE

is not uncommon to observe

the

detea
equal to the bad dats.
indicates that the carry was not
after 18 ROLB's.

rod

his
cleer

—

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Mondey 07-0Oct-85 16:57

Page S1

2220

6.2.2.6

Test S

Rotating Ones Test

Writes & background pattern of Zeros.
Rotates a One cerry bit left
thru each pair of bytes (18 times) end then checks that the Carry is a
One and the Word (2 Bytes) is still all Zeros.
This provides the complement of the coverage of Test 4 in data.

It cen execute out of the User Data PAR's and the Kernel Datas PAR's.
NOTE

It is not uncommon to observe
the
good
data equal the bad deta.
This indicates
‘t‘i&oj the Carry
was not
set
after
18
's.

SEQ 0050

CVMJUABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Mondey 07-0Oct-85 16:57

6.2.2.7

Test 6

Pege 52

Initiel Date Test

Writes Reads & double word first with all bits O except 1 (for every
bit.tpoi)tion). Second with all bits 1 except 1 (for every bit
position).

This is @ very quick check of the data peths.

p——

\‘\4\‘\<\4\0\0\os0~o\OfiQ\#\Q\Q\O\O\Q\Ofl\Q\‘\Q\Q A

| CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Monday 07-Oct-85 16:57

6.2.2.8

Test 7

Page 53

SEQ 0052

Address Bit Test

Writes & beck

of sll Zeros.

Read Address 1 for e O Byte.
-

1 for a non O Byte.

1
or each Address Bit position from Bit

V!ml.”sbl. 10, 20, 40, 100, 200, 400.

1000,

200C,

1oooo uoooo 100000)
fi:.unnt Aanu contents.
m 009 0

ed Address for & non-zero word.

This is @ very gquick check of the address bit unigueness.

4000,

1000C,

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 54

2287

6.2.2.9

Test 10

Byte Addressing Test

With ECC Disabled.

Writes all ones to a double word.
For each of the 4 Bytes

in the Double Word.

byte.
Clears one
Reads all 4
bytes from double word.
Checks for only proper b‘to clear.
All other bytes set to all ones.

This is only done on one double word address.
NOTE
This

is run for ECC memory only

SEQ 0053

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Monday 07-0Oct-85 16:57

Page 55

SEQ 0054

2312

”l!
14
2315

1¢

6.2.2.10

Test 14

Basic Double Bit Error Test

Write the CSR to enable diag mode with a double bit error

check bits of 110011 end Uncorrectable Error Indication
enabled.

Write first AUT in a 16k bank with data of all zero's.

Read address, this should cause & double bit error.

Read the CSR for check bits in (1) and Uncorrectable Error
Indicator.

Write ones to the high byte of the address under test.
Since
a DBE exsists at this address the write should be asborted.

Read address and check for a Parity trap to occur as a result of (S)

Repeat 5 and 6 for data of ones in the low byte and check for

This will write the check bits in (1)

is asserted and we check for a perity trap to occur.

BUS PBL

write abort and parity trap.

This test checks to see if a double bit error will be aborted and a
byte write of a double bit error will be aborted.
NOTE
This test

is only run for the MSV11-J

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Monday 07-Oct -85 16:57

Page 56

p—

23
23
3

6.2.2.11 Test 17 Holding 1's 0's Test
1.

Write a 16K Bank with

alternating

Read each Word for correct Test.

Do (1-2) again for a complement Test.

writing a Byte at a time.

Bytes

Zeros

This checks the memory for the capability of holding O's

1's.

Ones

CVMJUABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Mondsy 07-Oct-85 16:57

Page 57

SEQ 0056

2370
7
7
7
74

Syndrome Bits to the CSR on a SBE Test

Write CSR with check bits to correct bit 0 of the first AUT
N

Write AUT with dates of 0's creating a SBE.

16k bank from a O to a 1 with diag mode.

Read the AUT to clock the address and syndromes into the CSR.

Test 20

6.2.2.12

Read the CSR for the SBE indicator, bit 4.

Write the CSR to diag mode to clock the syndrome bits into
CSR bits S5-11.

Read the CSR for the proper syndrome bits.

Clesr CSR.

Repeat 1-7 for all 16 date bits.

Repeat 1-8 for data of ones so that & correction will occur
from a 1 to a zero.

This test checks to see that the EDC chip can detect Single Bit

errors for all 16 data bits by checking for CSR bité4 end
the proper syndrome bits are placed in the CSR.
NOTE
This test

is only run for the MSV11-J

that

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Monday 07-0ct-85 16:57

6.2.2.13

Test 21

Pege 58

Marching O0's

SEQ 0057

1's Test

Mrite a Background of alternating Bytes of Zeros

For the 16K Bank addressing Down
(a) Read check a word
(b) Byte Swap & word
(e) Read check a word

For the 16K Bank addressing Up
(a) :.:d g:::k e no:d

(b)
(c)

wor

Rzod check a word
the 16K Bank addressing Up

Read check a word

SRR

352-£ Eiaaa

Byte Swap a word
) Read check a word

the 16K Bank addressing Down
(a) :0:‘ g:::k a -:;d
e
a wo
(b)
(e)

Rzod check a word

This checks the

integrity of the 32 Bit Double Words.

It can execute out of the User Data PAR's.

NOTE

It is not uncommon to see
a misleading
error typeout because the second test in
each cese is based upon
a byteswap of
the first test which may or may not have
failed.

errors

second

If the error

report

indicates

in pairs with the bad bit

report

Inmg

the

same

in the

bit

position
relative
to
a byte then you
should ignore the second error report.

Ones

CVMJABO MSV11-J MEMORY DIAG.
2460
2461

MACRO Y05.02

Monday 07-Oct-85 16:57

6.2.2.14
1.

Test 22

Page 59

SEQ 0058

Refresh Test

Write a diagonal Test of ones on every KDIAG(TH) stripe
write zeros elsewhere.

This Test

is on addresses not bit positions.

Example:

[=T-T-ToX-T-1-1
o

OO+ O000+0O

't000

1001
1010
1100
t000
1001
1010
1100

o000
O0O0

LSB's

»O0O0O=O00O

MSB's
OO0+ OOO0Om

Address

NOTE

Example uses KDIAG of value 4 more typical is a value
of
.
Consult the symbolic definition of *KDIAG” in
the program listing to be sure.

Y
LLPy
83328

Disturb each row for > 3.2ms
Read check diagonal pattern

Co (1-3) KDIAG times moving the placement
stripe to cover all address positions.

Do (1-4) for a complement pattern

(zeros in a background of ones)

NOTE

This
test
is not
normally
executed
except
under APT
or
ACT.
It may be
invoked VIA Field Service
Command
13
(Kamikaze Mode).

the

diagonal

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Monday 07-0Oct-85 16:57

Pege 60

SEQ 0059

C-1- ENT.
YU ¥

N
w

-0
s s

6.2.2.15

Test 23

Shifting Diagonal Test

EEAERRRR

Similar in overall operation to test 22 except it
for refresh and disturb rows.

does

NOTE

This
test
is not
normally
executed
except under APT or ACT.
It may be
invoked VIA Field Service Command
13
(Kamikaze Mode).

not

delay

- CVMJABO MSV1l-J MEMORY DIAG.

MACRO Y05.02

Monday 07-Oct-85 16:57

6.2.2.16

Test 24

Page 61

SEQ 0060

Fast Galloping Pattern Test

This does a classical

llopi

pattern

except

incremented by 400 Octgi (ovc:g 64th double word)

that

NOTE

This
test
is not
normally
_executed
gxczt
P
or ACT.
It may be
invoked VIA Field Service Command
13
(Kamikaze Mode).

addressi

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Mondey 07-0Oct-85 16:57

Page 62

SEQ 0061

2557

6.2.2.17

Test 26

Random Data Test

Write Random Data in & 16K Bank while incrementing the Addresses.
Read check Random Data.

This routine regenerates the same random numbers

using

the

same

seed as the write sequence.
After the read check the seed is updated
so that the next use of this pattern will not invoke the same sequence
of random numbers.

If you wish to change the random sequence so that it is different than
any other run in the same configuration then there are 2 ways of doing
“l

Modify symbolic locations “SECDHI" and “SEEDLO" to any number

Enter Field Service Mode and execute this Test (command S)
on some (any good) bank for a short time (30 sec or so).

you like.

This cen execute out of the User Data PAR's, the
and the Supervisor Datas PAR's.

Kernel

Data

PAR's,

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Mondasy 07-Oct-85 16:57

6.2.2.18

Test 27

Page 63

SEQ 0062

Unique Bank Test

This Test uses Test O to write

read the Bank

number

each

HEE

It does not test Banks that require relocation to test.

It does not run as part of any

script but rather is always

normal pattern tests are complete.

run

after

MACRO Y05.02

Monday 07-Oct-85 16:57

Peage 64

SEQ 0063

s bt P

e e

BN
O

CVMJABO MSV1l-J MEMORY DIAG.

13
1

6.2.2.19

Test 30

Flush Out DBE's Test

This Reads each location then moves the old value back

done

with

possible).

in.

This

ECC Disabled and therefore corrects any DBE's or SBE's (if

It does not run as part of any script but r-thor is

elways

Just

prior to the End of Pass Code, as part of a Control "C' (Boot)

commend, es part of End of Pass shutdown for ACT or XXDP Chain
as part of h
ing sequence after an error if undor ACT or APT and as

pert of a shut

sequence directed by Switch8 (Halt Pro.rus

CVMJUABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Mondey 07-0Oct-85 16:57

6.2.2.20

Test 31

Page 65

SEQ 0064

SO0B-A-LONG Test

Retionalizetion

In order to concentrate the memory cycles of a test into a particuler
sddress, we must cut the overhead cycles to @ minimum. Freguently,
the

instruction

itself

provide adequate

data

set

that

(1)

background in which any complemented bit may find it hard to survive.
The SOB instruction is the only

PDP-11

instruction

single operend, (2) cen be repestedly executed at the seme PC and, (3)

cen escape this repetitious loop.

Hence,

it cen be possible to SOB a MOS cell

death

(or

lesst

:g:i:.'uuht)hi-). end to SOB @ core into over-heating (or st lesst warm
i

ort).

The SOB Routine will be loaded and called with RO set equal to the SO0B
constent “SOBK”,
R1 set equal to the complement of @ *“SOB RO, ."

Instruction "100776%.

Simplified SOB Example:

1s:

2¢:

S08
MOV
cHP
BEQ
SOBFAIL

RO,1$
R1.1¢

;S0B till RO underflows
iWrite complement of SO0B

R1,18
24

;Read check not SO0B
iSkip if OK
:Trep report error
sgodo =:
t slf moved
g
iForwe
word
end run egein

M%
SOBMOV

sounovz

The velue of the SOB constant cen be found at symbolic location "SOBK*
(typical 25 decimasl).
This test is not in the normal script of execution but n¥ be added
vie the APT E-TABLE, reference symbolic locastions "MKPAT”, "MJPAT"

*$0DW2-5".

Field Service
Mode commend 8

running this pattern.

the normal method of

NOTE
This
test
is
not
norsally
executed
except
under APT
or
ACT.
It may be
invoked VIR Field
Service
Command
13

(Kemikeze

| CVMJUABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Mondeay 07-0Oct-85 16:57

6.2.2.21

Test 32

SEQ 0065

Urite Recovery Test

This test ceuses a WRITE,

end

Page 66

READ, WRITE, READ,

if the 1st, 3rd, Sth,

...

...READ
is bed the

to occur

the 2nd, 4th, 6th, ... mis bad the program will

out the error.

am mey

memor

ori

gracefully type

‘if‘mfrom other toot.
in M it emloto
bank under test.
“f“.
small test program ec
min.
‘ifflwl.t to
: ‘?h:m i® nl' -“tri Pt
& Inmbon.
to at lout 5ee
mieh meBO Ty
d‘i' .i
h
sllow
thc
user
f.ilo‘.
Write

The test consists of 1/2 of the benk stored with "MOV R2,-(PC)*
ther 1/2 containing “177667". *177667" is the comp sment
R2 containe “"COM -(R1)" instruction
RO)” instruction.

on entry to the benk and R1 contains the highest test eddress in

i
m%f you 'und;h.mdthi B 80 far istheasrest is
easy.
follows:
1.
nOv
RS, -(BC
)' imtmtim oneutnln‘.

the contents of R2 n the eddress
i v.eotod
to -(PC).
eqlesents
2. Since na eonumo [ -con -(ll)' im'-uetlon it

"177“
* s0 .'tor the B
cleverly this is the "JW

i |

) it mlo 110
instruction.

This sequence continues until the "MOV R2,-(PC)”
instructions reach the middle of the test bank.

E-L BT
3V.23

SN NNSNNNNNSNNNNNNNSNNNNNNNNN

end

then the "JMP (RO)” instruction is met
end executed. RO contained the return address back
to test 13.
These steps sre repeated for each bank under test.

NOTE

This

ex
inv

to.t

“VIA

u ngt
Mmuy

r.ou

(Kemikaze Mode).

.'nrvocc

executed
It may be

Command

ned

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Mondey 07-0Oct-85 16:57

Page 67

SEQ 0066

2731

7
735
;
73
7

740
74
;:
744

745
;‘

749

74
7

6.2.2.22

Branch Gobble Test

This test loads & small routine

the

n-or‘

under

test.

The

arees.

The Branch Gobble's general format after you eliminate setup code
code to move the program along is as follows.
BGIEST:
BRGOBB:

O
SEC

1s:

28:

34:

ADCB
BMI

BGTEST
is

BRGOBB

B8vS

ERROR

CLv
INCB
B8CS
8vC
BMI
ERROR

:INC LOW BYTE
END LOOP AFTER 128 TIMES

BGTEST+1

+INC_HTGH eYTE

:BRANCH IF V-BIT SET (SHOULD BE)

;LOOP128 TIMES

em
TRAP

nCLEM V-BIT
;INC HIGH BYTE ONE LAST TIME
;:BRANCH IF C-BIT SET (SHOULD NOT BE)
:BRANCH IF V-BIT CLEAR (SHOULD
NOT BE)
a.llm IF N-BIT SET (SHOULD BE)
:ERROR
TR

BGTEST
34
34
4

;z.

4%:

765

‘u’

Exerciser

;

exerciser ever since.

This

and

: TEST WORD

INCB

758

into

routine moves itself along in memory one word after each pass so that
when it resches the end every
instruction has executed from onr‘
location with the exception of the beginning and end of each tes

7
7:0
7
7

Test 33

RETURN

code ’r

U(l

section of that

ionoll¥

came

from

the

POP-11

Femily

Instruction

he first MOS memorys fell succeptable to this

diagnostic

and

770

has

important

;;i

NOTE

17
774
775

This test
is not normelly
executed
except under APT or ACT.
It may be
invoked VIA Field Service Command 13
(Kamikaze Mode).

memory

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Mondey 07-0Oct-85 16:57

Page 68

SEQ 0067

32323238 23383%3£

6.2.2.23

Test 34

Soft Error Test

Rationalizetion

MOS chips have a failure mode in which thol can randomly pick or
bits.
This is ceused
Alpha
particles
rding the cell.
cell is very small (and
Yy ore) then the electrons displaced by the
Alpha particle are suffici ent to cause the cell to change from a one
to a zero or from a zero to a one.
This test is controlled

create

Test

am.
The confi
inval idated

This Test

the main

and

program so

that

used

on alternate passes of the

ation table is used to flag banks that have
ause another Test was written over this

is nothing more than a clever use of Test 0.

the

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 69

SEQ 0068

2807

6.2.2.24

Test 35

Uorst Case Parity Test

Force Hrite Wrong Parity in each 1K word block of the

Memory

Read with Parity Trapping enabled,

that

trep

sure

trap

Under Test.

making sure

occurrs.

Make sure error address bits are set correctly.
Write good parity without trapping,
occurrs when read.

and

make

NOTE
This test is run for parity memory which
is not controlled by the same CSR as the
program.

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 70

zlg:
Test 36 Correction Code Test

Mrite CSR with check bits to correct bit 0 of the first address

6.2.2.25

Write AUT with data of O's.

@ 16k bank from @ O to a 1 with diag mode.

Read AUT for correction of bit O from a O to a 1.

Repeat 1-3 for all 16 data bits.

Repeat 1-4 for data of ones so that a correction will occur
from a 1 to a zero.

This test checks to see that the EDC chip can correct Single Bit
Errors for ell 16k data bits from a 1 to a 0 and visa versa.
NOTE
This test

is only run for the MSV11-J

SEQ 0069

CVMJABO MSV11-J MEMORY DIAG.

.
MACRO Y05.02

7-Oct:S7
Monday
07-Oct
-85 16:S

6.2.2.26

Test 37

Page 71
7

SEQ 0070

Check ECC Disable Test

Write CSR with ECC disable, Diag mode, and SBE check bits
of 000010.

Write AUT with data of zero's.

This should write check bits to

memory
.

Read AUT for data of zeros

insuring no correction was made.

NOTE
This test

is run on the MSV11-J only.

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Monday 07-0Oct-85 16:57

Page 72

SEQ 0071

[
EST.
4V F 1

BLB0
000
o
s e e

“R-o

Test 41

6.2.2.27

Address to CSR on DBE Test

Write CSR with ECC disable, Diag mode, and Double Bit error
check bits of 010011

LU35 t.

2891

Write AUT with data of zeros creating a DBE.

Read AUT to detect DBE and to clock address into CSR
Read CSR for correct address in bits 5-11.

Increment address by lk and repeat 1-4 until 16k

is done.

This test insures that the correct address appears in CSR bits 5S-11 on a DBE
NOTE
This test

is run on a MSV1l1l-J only.

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 73

SEQ 0072

6.2.2.28

Test 42

Extended Address to CSR on Error Test

Write CSR with SBE check bits of 000010 with Diagnostic Mode.

g;éto low address in a 16k bank with data of zeros creating a
Clear the CSR.
Read address to detect SBE.

Read CSR for correct address and the SBE indicator bit #4,
Enable CSR bit 14 to check the Extended address bits.
Read CSR for correct address bits

Repeat 1-7 with a test address that is the highest in a 16k bank.
This test checks to see that the correct address bits apppear in the CSR.
This is also repeated for the Extended Address function in the CSR
NOTE
This test

is only run for the MSV11-J

SEEFRIRGEIEE IR,

2920

W———

CVM JABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Monday 07-Oct-85 16:57

6.2.2.29

Test 43

Page 74

SEQ 0073

UWrite Byte Test

Write CSR to Dn-g mode with check bits of 001100.
correspond to data of zeros.
Write first AUT with data of one in bit zero.
effectively creates a SBE in byte 0.

These

The write

Clear the CSR

Write byte 1 of the AUT with data of all ones.
Read CSR to check for SBE indication.
Write the CSR to Diag mode.

Ro.d the AUT to check for the correct data -- all ones in high byte
and all zeros in low byte.

Read the CSR to check for correct check bits corresonding to the date
read in (7).
These check bits are 000110.

Repeat (1)-(8) this time creating an error in byte 1 (2) and writing
byte 0 in (4).
This test checks to see that
a SBE will be corrected during the read portion of the
byte write and that correct chcckbnto will be generated on the write.
!

NOTE

This test

is only run for the MSV1l1-J

w——

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 75

SEQ 0074

Shifting Checkbits through the CSR Test

Write CSR to Diag Mode to Enable Checkbit register.

Test 44

Write CSR with check bits of 000001, ECC disable and Diag mode.

“w

6.2.2.30

Write memory with data of zeros.

NN
s

into memory.

Complement check bits pattern and write CSR as in (2).
Read CSR for complement check bit pattern.

Read memory to read check bits written

in (2)

Read CSR for corret check bits written

in (2).

into CSR.

This should write the check bits

Shift check bit pattern and repeat (1-7) till CSR bits 5-10 are done.

e bt e s s s s e

VR NOVBUWUN-O

2997

Complement check bit pattern in (2) and repeat (1-8) shifting a zero
through a field of ones.

10.

Repeat 1-9 for every 100 octal locations in 16k

This test checks the ability to read check bits from the CSR to memory and back.
The test is done twice. Once shifting @ field of a one thr
a field of zeros
eand a zero throw a field of ones.
This tests the Checkbit/Syndrome bit register
end Check bit RAM's.
This test is done for every 100 octal locations in 16K,
NOTE
This test

3040

is only run for the MSV1l1-J

MACRO Y05.02

Mundey 07-Oct-85 16:57

6.2.2.31

Test 45

OOQOMOUNE‘

SgEEEgEEes

CVMJABO MSV11-J MEMORY DIAG.

Page 76

228 007S

Syndrome Bits to the CSR on a DBE Test

Write CSR with Diag mode to enable Check/Syndrome bit Register.
Write CSR with DBE check bits of 110011 with Diag mode.
Write memory with data of zeros creating a DBE.
_

Clear CSR.
Read memory to detect DBE.

Read CSR for Uncorrectable error

indicator.

Write CSR to Dieg mode to read Syndrome bits into CSR.
Read CSR for correct Syndrome bits of 111111.

Repeat (1-8) with Muliple Bit Error check bits of 111100 and
corresponding Syndrome Bits of 110000.

This test checks the .bilit{ of the CSR to detect a DBE and read for the proper

Syndrome bits

rated by

the EDC chip.

This test

NN e~
~Noua

bits corn.pon,m: to a Multiple Bit error.

is then repeated with check

NOTE
This test

is only run for the MSV1l1-J

Va0

b
s s s b

AR333\R3RAR28
ARTR
TR E

CVMJUABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Mondey 07-Oct-85 16:57

6.2.2.32

Test 46
1.

oha oite

Pege 77

Check Single Bit Errors with ECC Disabled Test

Write CSR with check bits to correct bit 0 of the first address
in @ 16k bank from a O to @ 1 with diag mode and ECC disabled.
Write AUT with date of O's thus creating @ SBE.

Write the CSR to ECC disable.

Read AUT to detect SBE.

Check to see that no trap occured.

Read CSR to see that uncorrectable error (CSR15) is set.

Repeat 1-6 for all 16 data bits.

Repeat 1-7 for date of ones so that & correction will occur

Repeat 1-8 except in st
(3) the CSR is written to ECC Disable
end BUS PBL enable and (5) we check for traps.

from a 1 to a zero.

This test checks to see that SBE ere treated a uncorrectable errors with ECC
Disable.
The test is repeated 2 times, once with tr
disabled and agein
with it enabled.

this is done for all 16 possible

conditions.

NOTE
This test

is only run for the MSV11-J

——

CVMJUABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Mondey 07-Oct-85 16:57

Page 78

3117

3iis
3135
.

si
33
”

t;o

6.2.2.33

Test 47 NO CSR Update On SBE with exsisting DBE test
1.

Write the CSR to Diag mode to enable Checkbit/Syndrome bit Register.

Mrite the CSR with DBE check bits of 110011 and Diag mode.

MHrite CSR with SBE check bits of 000010 and Diag mode.

Write memory 4k sbove address in (3) creating @ SBE.

Clesr CSR.

Resd memory with address in (3) to detect DBE.

Read CSR for correct address and Uncorrectable error indicator

Read memory with address in (5) to detect SBE.

3. Write memory with deta of zeros cresting a DBE.

10. l.l:og.():SR for SBE indicator and no change in DBE status in CSR

This test checks to see that no update will occur in the CSR with @ SBE in

memory when @ DBE already exists.

NOTE

This test is only run for the MSV11-J

p—

| CVMJABO MSV11-J MEMORY DIAG.

"E
4

MACRO Y05.02

Mondey 07-Oct-85 16:57

6.2.2.34

Page 79

SEQ 0078

Test 999 Null Test

This is en instent return added to preserve the software structure.
This test repleces eny real tests when the APT E-Table does
specify a test to be run.

not

3~J~l~l
SUN=OOVR
~N N :.‘

S2IRTREN2EIIINZRER2S

O U

L (8

nnflpflhwmmo-mo—hmnhpnnnno-s
~N~N~N~

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Mondey 07-0Oct-85 16:57

7.0

PROGRAM FEATURES

7.1

Fast Dats Access Rates

One of the main arecas
environments
is speed.

Page 80

SEQ 0079

of concern
in testing memory
in systems
One of the prime reasons that system programs

like RSTS,IAS end MUMPS cen crash due to memory failures not
detectable by memory diagnostics (0-124K,0-2 MEG,etc.) is because of
multiple NPR devices contending for the bus.
After some delay a NPR
:: ice tbocuoo bus master and does several memory trensfers at memory
rates.

On the other hand most diagnostics when writing readi
and/or
checking patterns spend most of their time fetching instructions and
operands out of their program space and proportionally
little time
accessing the memory under test.

Thie diagnostic's error detecting abilities have been optimized around

the fl'iflrt design criteria of speed.
have been

7.1.1

To this end the following steps

taken.

Fast City

Utilizetion of Memory Management Registers as Non Memory Bus,
Non
Bipolar Memory.
Since User Mode is only used for relocation

and Date
the

UIPAR's,

The

program

e is never used, then subroutines cen be executed from
UDPAR's,

KDPAR's,

SOPAR's

and

with some Bit Pattern

restrictions the UIPDR's, UDPDR's, KDPDR's, and SDPDR's.

Supervisor

runs

Kernel

mode for mapping

Patterns are

subroutines

mode

purposes.
t

are

ond

Patterns

are

moved

referred to in the program as Fest City.

this

Bipolar

NOTE

18-Bit PDP-11's cannot execute from

PAR's

because

bits -ido*

Mode.

their

all peatterns

executed
in agnor;.
using
(reference Section
7.5).

7.1.2

SO0B's

the

PAR's are only 12

they also have no Supervisor

herefore,

executed

All core patterns and some MOS

User

are

Mode

region

CVMJABO MSV11-J MEMORY DIAG.

Mondey 07-0Oct-85 16:57

Page 81

Utilizetion of the full PDP-11
slgorithms (principally the S0B).

SEQ 0080

Instruction

Set

speed

pattern

3221

MACRO Y05.02

7.1.3

CACHE

&
w

315 )

CACHE is used between :ottom tests to decrease proggn pass times.
CACHE cen be defeated by the operator (reference section 2.4.3.1).

7.2

Benk Zero Testing

Bank Zero has been traditionally neglected by memory
the following reason.

The vector space exists there and

ALL

traps

must

diagnostics
not

access

for
test

pattern datea.
If the area is tested the diagnostic must not use any
treps, and it is against the rules for power to fail.

Systems with Memory Management cen overcome this because all treps asre
to Kernel Virtual space even if the power should fail (caution must be
observed because power up goes to gh;oicnl address 24 (becsuse the

Memory Menagement
Unit comes up

off)).

However, Catch 22 is that the di
mode because APT Accesses Physical

tic is not APT compatible in this
Memory Locations.

~own

The PDP-11/83 can over come this because the QBUS Map can fool APT.

Because of the previous srguments this program does not
relocate
in
the true since of the word (i.e.
no position independent code was
written (at least not on purpose))., but rather this 'ro.r- moves
and

A (:or:gfhr' r-":flz-od

complete

testing

:gocatn).

ero
or any other program

his

onnb;ogl the

space or privileged

-poeg'ouctll :: all other banks are tested. ??hc conditional test to

see

is protected is complemented when relocated).

NN~

BUWN-= OO

gReEE£egs

NOTE
The progrem will relocate
only
in
the
first
pass
under APT;
after this, the
gro.r- will remain fixed in Banks 0 and

7.3

Memory Configuration Map

CVMJUABO MSV11-J MEMORY DIAG.
3276

3277

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 82

SEQ 0081

This
is printed out immediately after o-xme.tho memory unless SWé
is set
(reference section
2.4.1).
It cen el
prmtcd et any leter
time in Field Service Mode (reference section
2
7)
Example:

p—

MEMORY CONFIGURATION MAP

“.3( —_— S

012345672123456701234567012345610123456701234567012345670123

MEMTYPE EEEEEEEPPPPPPPPPPPPPPPPPPPPPPPPEEEEEEEEEEECEEEEEEEEF "EEEEEEE
CSR
00000000111111112222222222222222“4““ 4444444444 44444440
PROTECT PP
I
I
I
1

4567C1234567012345670123456701234567012345670123456701234567
MEMTYPE EEEE
PROTECT

4444

Displeyed sre Banks 0-77 Octel (1 m words).

the

Fat

Terminal

Switch was set (reference section 2.4.1) then all Banks (0-177) would
be shown.
f this was an 18-Bit PDOP-11 (eg - 11/23), ornly Banks 0-7
would be printed.
The fields:

tnA0RS :
The sizing routine could not write zercs and ones

11, hence they are marked as bad with X's

Banks

ERRORS:
MEMTYPE
:

l.nlz- - 7 are flonong ! E (MSV11-J), and

Benks

10-37

are

{
xp‘
V11-L/P)
and Banks 40-77 are memory type
E(HSV 1-J
Banks 100-167 do not exist.
CSR:

|
.

CVMJUABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Mondey 07-Oct-85 16:57

3323

Page 83

SEQ 0082

Benks 0-7 are essi

3329

40-77 are assigned CSR 17210.

ggs

to CSR 172100,

10-17 to

CSR

172102,

program

space.

end 20-37 to interleaved CSR's 172104 and 172106 snd benks

PROTECT:

Banks 0 and 1 are protected because they are

Bank

f
!

end
1 can also be protected because

Y ere in the

bottom 16K of an MSV11-L/P CSR. The protection is hierarchicel
and
am .::eo overshadows MSV11-L/P protection. Banks 0

7.4

will not

tested until the

program

relocates.

Everything You've Always Wanted To Know About SUPERMAC ...

SUPER-MAC is @

set

structured

programming

macros

that

allows

programs to be written in a high level, easily understood language.

As & general rule, most SUPER-MAC statements can be single-line
statements or multiple-line (nested) block statements.
A single-line
statement must be completed on one source line; no continuation lines
are allowed.
Single-line statements should be as short and simple as
possible.
Comments u‘.olu be included on a source line.
All
the
mo
rules, conditions,
etc.,
that govern MACRO-11 also govern
-MAC.

should

for

Spacing on a source lne is very

be separated by a comma or a space.

-p.cig‘”

different

For

A+ B.

example:

The

important.

The

elements

Tabs should never be used

expression

A+B

interpreted

All the concitional statements can be written as multiple-line

blocks.

Each level of nesti

:n associated END statement.
WO spaces.

3
36

ach level of nesting should be indented

User
written macros or assembly
1
in_
a progru if desired.
As a

defined,

will cause

ams must
-MAC.

All

in SUPER-MAC.

in with

nested

within 8 block must be terminated with

einginsiructions
may be included
aid, if the symbol LST$$ is

rated code and labels to

the macro call SMACIT.

listed.

All

This call initializes

legal PDP-11 source and destination operands are legal

SEERELLRLET
Bttt
ris vt

gmm

Page 84

le Source File ABS
.ENABL AMA
.MCALL .SUPER

AGE

sLET EXAMPLES
LET
LET
LET
LET
LET
LET

:t.nmog

7.48.1

Monday 07-0Oct-85 16:57

-‘OOOOOOOOOO

§58883sagaaassgaaEstgEgegss

i
i
i
7
i7

MACRO Y05.02

CHIOMMOND>®

CVMJABO MSV11-J MEMORY DIAG.

JIF sxmss

IF A IS mue
MOV

END ;OF xr i
IF B IS FALSE

34,E

END
;OF IF B
xrnengmeuuztc i= D
IF ALT
C.D
Mov

10F
I

IFAEG.?C'ED

xnieaumocso 1
en.se

€d

xra i
Ea"admoa CEqd 1
ELoe
MOV

E.J

SEQ 0083

CVMJABO MSV11-J MEMORY DIAG.
3424

3387

SELEEES
FARI3

SEESSEEESEINU SALERZET

. SEEETRRLE

342

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 85

A
;OF IFB
END
IF RESLIJ IS EQ
A.B
MOV
END ;OF IF RESULT
BITSS‘E:T.IN A
IF

'l hrsosrIN A
D
J0F TF-

BITS

;ON.ERROR IS LIKE AN IF STATEMENT ON THE C-BIT
;ON.ERROR EXAMPLES

ON.ERROR
MOV
A.,B
ELSE
C.B
a'?'&()F”&l.ERROR

C.B

MOV
ELSE
MOV

A.B

ND hmon.NOERROR

THEN LET A :8= B

ON.E

:FOR EXAMPLES

FOR I :=
-5 T0
A
INC

END 66’ FOR I
FOR
= 0 T0
DEC

140 BY

ACRO)
END i FOR_RO
FOR
133 DOWNTO
:=

3 BY

A.B

END ;OF FOR I

;BEGIN EXMES

IN ALPHA
BEG
RO
\'[:]

167
0 T0
ACRO)

0 TlfiN LEAVE ALPHA

END1RoOFFO;o R400 T0
FOR

567

IFBGE ORTFEN LEAVE ALPHA

‘zF

H oaemm EXWLES
$RETURN
$RETURN ERROR
$RETURN NOERROR

;:CASE EXAMPLES
MOV

CAiE RO

A.RO

SEQ 0084

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Monday 07-0Oct-85 16:57

3::‘

END ;0F CASE RO

3485

.END
7.4.2 Sample Listing File (with No Exgmdod Macros) - .MAIN.
MACRO M1111 O1-APR-79 16:41
AGE 2

’i

1 000000

9
94
95

96
3497

g:’.
99
3
3
3
3
g

g
g

i io

3 lé

g 14

000040

13 000014

000000

7 000000
8 000002
9 000004
10 000006
11 000010
12 000012
15 000020
16 000022

.MAIN.

24 000100

000000

000000
000000

I
J

O1-APR-79 16:41

:IF EXAMPLES
000006

30 000130

012737

000034

000010

34 000164

:LET EXAMPLES

LET A :B= B

000023

35 000172

0
0

LET J := J +

012737

32 000136
33 000154

LET B :=C
« D
LET E :=F + 1
LET G := H +« 2

27 000114

28 000122
29 000122

0
0
0
0
0
0

LET RO := A

26 000106

;LST$$=0
BITS=40

PAGE 3

23 000072

31 000136
ssgg
35

A:
B
C
D
E
F

19 000024

4519
1

000000
000000
000000
000000
000000
000000

MACRO M1111

20 000030
21 000044
22 000056

.ENABL AMA
.MCALL .SUPER
. SUPER

S
6

15
ls
1

.ENABL ABS

2
3
4 000000

14 000016

B
C
D
E_

3478
3479
3480
g:ll

348

Pege 86

013737

000004

000006

IF A IS TRUE

MOV

23,0

MOV

34,.E

END ;OF IF A
IF B IS FALSE

END ;OF IF 8

IF A EQ B THEN LET C := D
IF
ALT B

MOV

ELSE

c.0

Monday 07-Oct-85 16:57

MACRO Y05.02

Pege 87

36 000174

013737

000010

000006

38 000202
39 000222

013737

000012

000014

41 000230
42 000250
43 000256
44 000256

013737

000012

000014

013737

000016

000022

013737

000010

000022

013737

000016

000022

013737

000010

000022

013737

000000

000002

58 000372

59 000400

013737

000002

000004

60 000400
61 000410

62 000416

013737

000004

000006

37 000202

40 000230

45 000276

46 000304
47 000306

48 000314

49 000314
SO 000334
51 000342
52 000344
53 000352
54 000352
55 000354

56 000362
57 000362

70 000436
71
72
73
74

LMAIN.

000440
000446
000450
000456

013737

000000

000002

013737

000008

000002

013737

000004

000002

013737

000000

000002

O1-APR-79 16:41

75 000456
76

IF A EQ 8 AND C NE D
MoV
F,G

END ;OF IF A

IF AEQ B ORC NE D
MOV
F,G
END ;OF IF A
IFB A EQ B AND C EQ
MOV

ELSE
MOV

H,J

E,J

END ;OF IFB A

IFB A EQ B ANDB C EQ
MOV
H.J
ELSE
MOV
E.J
END :OF IFB
A
IF RESULT xs €Q
MOV
A,.B

END ;OF IF RESULT
IF

ans ser IN A

6or Ié BITS

xrs orr IN A

em .or 1&

ON.ERROR
MOV
A.B
ELSE
MOV
C.B
END ;OF ON.ERROR

ON.

MOV
C.B
ELSE
MOV
A.B
END ;OF ON.NOERROR

PAGE 3-1
ON.ERROR THEN LET A
:FOR EXAMPLES

78 000474
79 000500

005237

000000

81 000516
82 000522
83 000534

005360

000000

80 000514

E,D

;ON.ERROR EXAMPLES

MACRO M1111

77 000466

MOV

END ;OF IF A

;ON.ERROR IS LIKE m xr sutenem ON THE C-BIT

65 000416
66 000420
67 000426
68 000430
69 000436

SEQ 0086

:B= B

FORI
:= -5T0

FOR
RO := O TO

140 BY

INC
A
END ;OF FOR I

DEC
ACRO)
END ;OF FOR RO
FOR I :=
133 DOWNTO

3 BY

——

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Monday 07-0Oct-85 16:57

Page 88

000542

063737

000000

000002

000570

116037

000000

000002

000550
000566
000566
000576
000604
000614
000620

SEQ 0087

ADD

u“;m
) Lénve ALPHA
&o
i 4oo 10 S67
O IHEN LEAVE
ve

000626

evo roa

000636

000636
000640
000644
000650 013700 000000
000654
000664
000666
000670
000672
000674

000700

U= OV NOVBWN-O

000676

SRETURN
SRETURN ERROR
SRETURN NOERROR
:CASE EXAMPLES
MOV
A.RO
CASE RO
A
8
c
D
E
F

000012

END ;OF CASE RO
.END

;:E%c Listing File (with Expanded Hucroo) -

0 M1111 O1-APR-79 16: 10 PAGE2

et 8 e

s 0 ot et

VB LINFO VRNV
W

bt e

000000
000002
000004
000006
000010

END AL
o'm

: SRETURN EXAMPLES

000001
mun

.MAIN.

000000
000000

ENM%IWS

.ENABL AMA
.MCALL .SUPER

000000
000040

.SUPER

000000

000014
000016
000020
000022

000000
000000

G:
H:

000002
000004
000006
000010
000012

A,B

END ;OF FOR I
;BEGIN EXAMPLES
BEGIN u.m
xn
FOR RO := 0 TO(

000000
000000
000000
000000
000000
000000
000000

MACRO M1111

O01-APR-79 16:1C

8:
$:
D:
E:
F:
I:
J:

PAGE 3

LST$$=0
BITS5=40

0
0
0
0
0
0
0

0
0

ALPHA

Monday 07-Oct-85 16:57

Page 89

23
24

27
28

31
32

000012
000010

000010

013737

000016
000002

000014
000014

062737

005737
001403
012737

Ad
A4

(2]
-

MOVB B8.A

IF A IS TRUE
TST A

000023

BEQ LO
MOV
23,0
END ;OF IF A

IF B IS FALSE

000034

MOV
Li:

023737
001003
013737

34.E

IF 8

A EQ B THEN LET C

L2:

013737

000403

L3:

013737

La:

013737

+ IF EXAMPLES

023737
002004

LET A :8= B

000002

LO:

005737
001003
012737

H e+
1=
G

.G
LET J := J +
ADD O01,J

062737
113737

14
T

013737
005237

omMMoO®>»

013737
063737

LET

013700

m- @Om®

iLET EXAMPLES

[

MACRO Y05.02

a8 353335
<0<~
&2 ;H

CVMJUABO MSV11-J MEMORY DIAG.

000012

000014

MOV

C,D

MOV

E,D

END ;OF IF A
IF A EQ B AND C NE D

MOV
F,.G
END ;OF IF A

:= D

CVMJABO MSV11-J MEMORY DIAG.

3691
369.
9

94
3695

MACRO Y05.02

Mondey 07-Oct-85 16:57

370

000230

023737

.MAIN.

000264
000266
000274
45 000276
46 000304
000304

001010
023727
001004
013737

718

47 000306

013737

3719
7
7
7
72‘

7
7

42 000250

000256

000306

48 000314
000314
49 000314

000314

000014

123737

013737

000000

000002

000004

000001

000016

000022

000010

000022

000000

000002

000008

000001

000016

000022

000010

000022

000352

000352
SS 000354

57 000362

000362

001003
013737

60 000400

000400

000000

L10:

032737

000000

000002

000004

000000

MOV

E,J

END ;OF IFB A
IFB A EQ B ANDB C EQ 1

ELSE

L12:

BR L13
MOV
E,J
END ;OF IFB A

IF RESULT IS EQ

8NE L14
MOV
A.B

END ;OF IF RESULT
IF

BIT

L1S:
000040

BNE L10
CH C, 1
BNE L10
MOV
H.J
ELSE
B8R L11

CMPB A.B

000002

000040

F.G

BNE L12
CHPB C, 1
BNE L12
MOV
H.J

L14:
032737

MOV

END :OF IF A
IFB A EQ B AND C EQ 1
CMPB A.B

L13:

000370 oogws
S8 000372 013737
S9 000400
000400

;:i

L6:

L11:

S2 000344
53 000352

000344

000012

000403

56 000362
000362

7
7
7
740

123737

000342

51 000342

7
7

735

CHP A.B

BEQ L6
cH L7
C,D
BEQ

L7:

001010
123727
001004
013737

sS4

013737

000322
000324
000332
S0 000334

7
7

IF A EQ B OR C NE D

M1111 O1-APR-79 16:10 PAGE 3-1

183
7
710
71
71
71

7 ’
7
718

000002

000246 001403

000250
43 000256
000256
44 000256

714

000000

000236 001404
000240 023737 000004 000006

37
70
704
705
7

370

SEQ 0089

LS:

000230
41 000230

uo;

i
393’0

Page 90

BITS SET.IN A

BITS.A

BEQ L15
MOV _ 8,C
END ;OF IF BITS
IF

BITS OFF.IN A

8IT

BITS.A

w——

CVMJABO MSV11-J MEMORY DIAG.
3;‘5

i
fis
3751
3

Monday 07-Oct-85 16:57

MACRO Y05.02

61 000410

013737

Page 91

000004

SEQ 0090

000006

MOV

62 000416
000416
63
i
65 000416

END ;OF IF BITS
L16:
JON.ERROR IS LIKE AN IF STATEMENT ON THE C-BIT
;ON.ERROR
EXAMPLES

000416
66 000420
67 000426
000426

103004
013737

68 000430

013737

000430

ON,

000000

000002

000403

L17:
000004

000002

000436

L20:

70 000436

MACRO M1111
000436

71 000440
72 000446

O1-APR-79 16:10

103404

013737

000446

000403

73 000450

013737

000450

74 000456

000004

000000

000466
000474

$3g282

NN NNNNNN

000466
76
77 000466
78 000474
79 000500

900500

000002

END ;OF ON.ERROR
ON.NOERROR

8CS L21

000002

L21:
L22:

103003
113737

C.B

PAGE 3-2

000456

75 000456
000456
000460

8ct L17
MOV
A.B
ELSE
BR L20
mov

69 000436

LMAIN.

c.D

000000

L23:

MOV
ELSE

C.B

MOV

A.B

B8R L22
END

;OF ON.NOERROR

ON.ERROR THEN LET A
BCC L23
MOVE B.A

:B= B

iFOR EXAMPLES

012737

177773

005237

000000

37 000020

023727

000512 003770

000020

000514

<5360

000526

020027

80:

000522 062700 000004

000140

MOV

-S.I

INC
A
END
;OF FOR I

cHP I

o
000000

FOR
I := -STO 23

INC 1

000023

€0:

14
i: 005000

81
16
82 000522

000020

BLE |6

FOR RO:= O TO 140 BY 4
CLR RO
DEC
ACRO)
END ;OF FOR RO

ADD 4.no

CHP RO, 140

- CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Mondey 07-0Oct-85 16:57

Pege 92

SEQ 0091

000532
83

003771

000334 012737

000542

000550
000556
000564

El:

000133

063737

BLE B1
FOR I :=
133 DOMNTO
MOV
133.1

3 BY

ADD

END ;OF FOR I

‘s:t'n. Iz.g

162737
023727
002366

E2:

8GE 82

;BEGIN EXAMPLES
BEGIN ALPHA
FOR RO :=
CLR RO

005000

000576

005737
002415

4
92 000614
000614

.MAIN.

T
T

14
: 3

T
T
T
T
T
T
T

000167
E4:

O1-APR-79 16:10

FOR RO :=

MOV

000636

96
97 000636

% 000636

400,RO

85:

F 8

005737

002004

€3

END ALPHA

: SRETURN EXAMPLES

m 000261
000207

000241
000207

567

O THEN LEAVE ALPHA

1OF FOR RO

3771

000207

400 TO

PAGE 3-3

% gfl!‘l

000634

T
T
:¢

BLT E3
END ;0F FOR RO
INC
RO, 167
BLE B4

000620

ACRO).8

e IF B LT O THEN LEAVE ALPMA

012700

MACRO M1111

93 000620

4
T

005200
020027
003766

MOVB

000002

116037

167

89 000570

O TO

SRET

CVMJABO MSV11-J MEMORY DIAG.

Monday 07-Oct-85 16:57

MACRO Y05.02

100

3853

101 000650

102 000654
000654

i
38

000660
103 000664
104 000666
105 00067C
106 000672
107 000674
108 000676
109 000700

004737
000000
000002
000004
000006
000010
000012

000700
000702

062616
013646

130 000708
111
7.5

000000

SEQ 0092

1CASE EXAMPLES

MOV

CASE RO
MOV RO, -(SP)

010046

000656 006316

000700

SL @sP

000700

JSR PC.L24
A
8
C
D
E
F
END ;OF CASE RO

L24:

ADD (SP)e,
MOV 8(SP)+,-(SP)

004736

JSR PC,a(SP).

000001

.END

Memory Management Mapping

7.5.1

Memory Management Mapping For The 11/83

PAR

SUPERVISOR

KERNEL

USER

0
1
2
3
4
S

Program
Program
Program
Test Ares
Test Area
Test Area

Program
Program
Program
Program
rogram
Program

Dst Bk/Fst Mem
Src Bk/Fst Mem
Src Bk/Fst Mem
Src Bk/Fst Mem
Dst Bk/Fst Mem
Dst Bk/Fst Mem

Perif Page

Dst Bk/Fst Mem

832228 88sss

013700

Page 93

7.5.2

Test Area

Map to CSR's

Dst Bk/Fst Mem

Memory Management Mapping For QBUS-11's With Supervisor Mode (eg 11/238)

PAR

SUPERVISOR

KERNEL

USER

Program

Dst Bk

4
S

Test Area
Test Area

Program
Program

Dst Bk
Dst Bk

Perif Page

Dst Bk

1
2
3
6
7

Program
Pr
Test Ares

Test Area

Perif Page

Program
Program
Program

Map to CSR's

Src Bk
Src Bk
Src Bk

Dst Bk

CVMJUABO MSV11-J MEMORY DIAG.
3903

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 94

SEQ 0093

7.5.3

3906

PAR

KERNEL

USER

3908

3909

Program

3910
3911

4
S
6

Progrem
Program

Pro.rulSrc .l:

’8
9
914

2
3

Program

Pro.rProgrem
Map to CSR's

Tnt Area/Dst Bk
Test Area/Dst Bk
Test Area/Dst Bk

3907

91S

Memory Management Mapping For QBUS-11's W/o Supervisor Mode (eg 11/23) -

Perif Page

rogram/Dst
Bk

ogra/Src
Area/Src Bk

Perif Page/Dst Bk

CVMJABO MSV11-J MEMORY DIAG.

3919

MACRO Y05.02

HMondey 07-0Oct-85 16:57

.LIST

000000

CENABL

gyg

'DSABL

INOTE:

Page 96

SEQ 0094

TOC

ABS

AMA

GBL

CVMJAO.SML IS THE SUPER.MAC SOURCE AND IS RELEASED WITH

:THIS PROGRAM. ATmese . MCALL sutmms nereutnct THAT FILE.

25
3926
3927
go

JMCALL

SMACIT
Ac...um
LEMITL, .EMITR
'MCALL
.IFOPR,
Gévu.OPADD
éa.
i:t
h.
T8
"MCALL
au:
REQ.m.i
RGE
,RGT
,RLE
in
mx
m.os
iuxs.ub
RCS,RCC
-MCALL
.OR, .xmix .LEAVE, .GOTO,
OR rr:n ELSE, WHILE ,CASE

"MCALL rofi T0.DOWNTO, REPEAT ,UNTIL,ndu BEGIN
'MCALL $$END,LEAVE, JUMPTO,GOTO,PUSH, m‘

’3

'MCALL .SIMPLE,.ARITH,ORB.ANDS. xro.unuu unn.sa.ou ERROR, ON. NOERROR
ocm..oimnu
"MCALL

NLIST

935

9
9
3939

3940 000000

LIST

000000
163000
000001

CNLIST

TTM
MC.SYM

M0.CND,ME

LST8s= ©
$SWR=
163000
$TN=
1
SMACIT

;I WANT FAT PAPER!

;DON'T LIST MACRO DEFS
&
cowxuom.s € EXPANSIONS

:L.IST MACRO CALLS, SYMBOL TABLE

:DEFINED TO LIST SUPERMAC EXPANSIONS
;USE THESE SYSMAC SWITCHES
IFIRST TEST NUMBER TO ONEC1)

CVMJABO MSV11-J MEMORY DIAG.

DEFINE

TRAPS

Monday 07-Oct-85 16:57

.SBTTL

3943
3944

;AND INDEXES INTO A TABLE AT LOCATION "$TRPAD“ WHICH SENDS THE PROGRAM TO
3“‘ SPECIFIC ROUTINE TO HANDLE THAT SPECIFIC TRAPS TASK.

sfli ULTIMATE DESTINATION OF A TRAP INSTRUCTION CAN BE GUESSED AT AS FOLLOWS

:EXME:

987

3309
989

3990

3992
3938

+ENTER KERNEL MODE

IN THIS CASE THE CRF HAS $KERNE LISTED AS 032546

AT LOCATION 32546 YOU FIND THE ROUTINE $KERNEL

NOTE THAT CRF SYMBOLS ARE TRUCNATED TO 6 CHARACTERS
SYMBOLIC NAMES GREATER THAT 6 CHARACTERS ARE USED SO I CAN
REMEMBER WHAT THEY MEAN!

104401
104402
104403

104405

104407

TYPEIT=
TYPOC=
TYPOS=
TYPON=

{'YPOS'

ALL GOOD TRAP ROUTI'ES RETURN VIA AN "RTI" INSTRUCTION
104401
104402
104403
104404

104405

:TYPBN= 104406

Y _TYPEOUT ROUTINE
uTYPE OCTAL NUMBER (WITH LEADING ZEROS)
:3TYPE OCTAL NUMBER (NO LEADING_ ZEROS)
:3TYPE OCTAL NUMBER (AS PER LAST CALL)

:: TYPE DECIMAL NUMBER (MITH SIGN)
1:TYPE BINARY (ASCII) NUMBER

GTSWR=
CXSWR=

104407
104410

$3GET_SOFT-SWR SETTING
13 TEST FOR CHANGE IN SOFT-SWR

104413

ROCHR=
ROLIN=
RDOCT=

104411
104412
104413

:3T7TY TYPEIN CHARACTER ROUTINE
+:TTY TYPEIN STRING ROUTINE
: sREAD AN OCTAL NUMBER FROM TTY

104415
104416

SAVREG= 104415
RESREG= 104416

: sSAVE RO-R5 ROUTINE
: iRESTORE RO-RS ROUTINE

KERNEL= 104417

;ENTER KERNEL MODE

104410

104411
104412

104414

104417

RDDEC=

104414

; sREAD A DECIMAL NUMBER FROM TTY

3994
3995
3996

104420
104421
104422

ENERGIZE=104420
DEENERGIZE=104421

;TURN ON MEMORY MANAGEMENT & TRAPS
; TURN OFF MEMORY MANAGEMENT & TRAPS

3998
3999

104423
104424

CACHON= 104423

:TURN ON CACHE

3997

‘e

NOP
NOP

ADD A DOLLAR SIGN TO THE SYMBOLIC NAME AND CHECK THE CRF FOR SOMETHING CLOSE

3 :

g’“

NOP

3964
3965
3966
g“?

TRAPS

aAT $TRAP THE PROGRAM PICKS UP THE RIGHT BYTE OF THE TRAP INSTRUCTION

3968

3984
3983

SEQ 0095

sTO SYMBOLIC LOCATION “$TRAP"

961

33:2

IHERE IS MOM TRAPS WORK IN THIS PROGRAM
:ALL TRAPS EXECUTE A “TRAP” INSTRUCTION WHICH TAKES THE PROGRAM

3939
gm

g”;

;«TRAP DEFINITIONS

3970
397
397
397
3974
3975
976
977
3978
3979

DEFINE

~age

sALL ENTRIES HERE MUST HAVE A CORRESPONDING ENTRY IN THE
sTRAP TABLE “S$TRPAD” (NEAR END OF PROGRAM).

3945
3946
3947
3948
3949
3
3951
3
3
g

MACRO Y05.02

KMAP=

104422

CACHOFF=104424

;MAP KERNEL 1 TO 1

:TURN OFF CACHE

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 98-1

104425
104426

LOADCSR=104425
READCSR=104426

:LOAD CORRECT CSR
:READ CORRECT CSR

104427
104430

PERRO1=
PERRO2=
PERRO3=
PERRO4
=
PERRO7=
PERR10=
PERR11=
PERR12=

104427
104430
104431
104432
104433
104434
104435
104436
104437
104440
104441
104442
104443
104444
104445
104446
104447
104450
104451
104452

:PROGRAM DETECTED
:PROGRAM DETECTED
:PROGRAM DETECTED
;PROGRAM DETECTED
:PROGRAM DETECTED
:PROGRAM DETECTED

PERR13=
PERR14=
PERR15=
PERR16=
PERR17=
PERR20=
PERR21=
PERR22=

:PROGRAM DETECTED
:PROGRAM DETECTED
;PROGRAM DETECTED
:PROGRAM DETECTED
:PROGRAM DETECTED

:PROGRAM DETECTED
:PROGRAM DETECTED

:PROGRAM DETECTED
;PROGRAM DETECTED
1PROGRAM DETECTED
:PROGRAM DETECTED
;PROGRAM DETECTED
:PROCRAM DETECTED
:PROGRAM DETECTED
:PROGRAM DETECTED
:PROGRAM DETECTED
:PROGRAM DETECTED
:PROGRAM DETECTED
;PROGRAM DETECTED
:PROGRAM DETECTED
;PROGRAM DETECTED
:PROGRAM DETECTED
:PROGRAM DETECTED
:PROGRAM DETECTED
:PROGRAM DETECTED

PERR43=

:PROGRAM DETECTED

;PROGRAM DETECTED

SEQ 0096

MACRO Y05.02

Monday 07-Oct-85 16:57

ECCDIS= 104470
ECC1DIS=104471
ECCINIT=104472
ECC1INIT=104473
104474
CBCSR=

CB1CSR= 104475

WASSBE= 104476
WAS1SBE=104477
WASDBE= 104500
WAS1DBE=104501

CLRCSR= 104502
CLR1CSR=104503
CHKDIS= 104504
CHK1DIS=104505
ENASBE= 104506
ENA1SBE=104507

TSTREAD=104510
INVALID=104511
ERRGEN =104512

CBREG
=104513
=104514
SYNREG

Page 98-2

;:DISABLE ECC ON ALL CSR'S
;:DISABLE ECC ON SELECTED CSR
s INITIALIZE ALL ECC CSR'S
;INITIALIZE
1 SELECTED ECC CSR

iWRITE GENERATED CHECKBITS IN ALL CSR'S
1 SELECTED CSR
sWRITE GE'ERATED CHECKBITS IN
:WAS THERE
A SBE ON ANY CSR?

A SBE ON 1 SELECTEO CSR?
sWAS THERE
:WAS THERE A DBE ON ANY CSR

:WAS THERE A DBE ON
1
SELECTED CSR?
lCLEM ALL CSR'S

;CLEAR 1SELECTED CSR

;DISABLE ECC
& WRITE CHECKBITS FROM ALL CSR'S
;DISABLE ECC
& WRITE CHECKBITS FROM
1 SELECTED CSR

sENABLE TRAPS ON SBE' S FROM ALL CSR'S
1 SELECTED CSR
ON SBE'S FROM
;ENABLE TRAPS

;TEST LOC (R1)
& TST FOR SBE (WITHOUT FETCHES)

lINVALIDATE BACKGROUND PATTERN ON “BANK"
:CHECK ERROR ADDRESS

:ENABLES CHECKBIT REGISTER
;:ENABLES SYNDROME BIT REGISTER

SEQ 0097

&V?f#o lASiéPOP11 ST FAG

MACRO Y05.02

Monday 07-Oct-85 16:57

.SBTTL

4061

DEFINE

Page 100

BASIC PDP11 STUFF

;#INITIAL ADDRESS OF THE STACK POINT
2000
: sFIRST AMESS OF THE STACK
KERSTK= STACK
: s KERNEL STACK
SUPSTK= 740
: s SUPERVISOR STACK
USESTK= 700
1 sUSER_STACK
STACK=

ERROR=EMT
SCOPE=I0T

i BASIC

L STKLMT=177774

HSTACK LIMIT REGISTER
1+ sPROGRAM INTERRUPT REQUEST REGISTER
NHARDHME SWITCH REGISTER

PSW=

177776

PIRG=

177772

DDISP=
LKS=

177570
177546

DSWR=

177570

DEFINITION OF ERROR CALL
DEFINITION OF SCOPE CALL
+ sPROCESSOR_STATUS WORD
i3 BASIC

;HARDWARE DISPLAY REGISTER

nLIPE CLOCK (KW11-L) STATUS REGISTER

: tHISCELIi:'EWS DEFINITIONS
: :CODE FOR HORIZONTAL TAB
12
::CODE LINE FEED
CR=
15
: :CODE CARRIAGE RETURN
CRLF=
200
::CODE FOR CARRIAGE RETURN-LINE FEED
MFPT=
7
+;CODE FOR PROCESSOR TYPE INSTRUCTION

HT=
LF=

l;gE'RE‘RAL PURPOSE REGISTER DEFINITIONS
+ s STACK POINTER
|KSP'SP
IIKEML STACK POINTER
SSP=5SP
: s SUPERVISOR STACK POINTER
USP=SP
1 sUSER_STACK POINTER
;PC=R7
: : PROGRAM COUNTER
;#"SWITCH REGISTER” SWITCH DEFINITIONS

SW1S=
SWi4=
SW13=
SWi2=
SWil=
SW10=

100000
40000
20000
10000
4000
2000

SWa=

1000
400
200
100
40
20

SWO=

SW9=
SWg=
SW7=
SW6=
SWS=
SW3=
SW2=
SWl=

10
4
2

«DATA BIT DEFINITIONS (BITOO TO BIT1S)

8 IT1S= 100000

B8ITi4=
BIT13=
BITi2=
B8ITil=
B8IT10=
BIT9=
BIT8=

40000
20000
10000
4000
2000
1000
400

SEQ 0098

Vil-J MEMORY DIAG.
SIC POP11 STUFF
000200
000100
000040
000020
000010

MACRO Y05.02

Monday 07-Oct-85 16:57

BIT7=
BIT6é=
BITS=
BITa=
8IT3=
8IT2=
BITi8IT0=

Page 100-1

200
100
40
20
10
4
2
1

sBASIC “CPU“ TRAP VECTOR ADDRESSES

ERRVEC: 4

TIME OUT AND OTHER ERRORS

L TBITVEC=14

i TRTVEC=
1BPTVEC=

10TVEC= 20

e et et
ot et b o b

R FY B

} JRESERVED AND ILLEGAL INSTRUCTIONS

14
14

PURVEC= 24

L TR BIT

+ 1 TRACE TRAP
| IBREAKPOINT TRAP (BPT)

+ s INPUT/OUTPUT TRAP (IOT) +#SCOPEss
{ IPOMER FAIL

EMTVEC= 30

{IEPULATOR TRAP CENT) 4sERRORes

;TPVEC= 64

11TTY PRINTER VECTOR

CACHVEC=114

| ILINE CLOCK (KWil-L) VECTER

| CACHE ERROR INTERRUPT VECTOR

;PIRQVEC =240

: 1PROGRAM INTERRUPT REQUEST VECTOR

TRAPVEC=34
TKVEC=
60

I "TRAP" TRAP
{1TTY KEYBOARD VECTOR

LKVEC= 100

PARVEC=CACHVEC

bbEbE 22pbobn RPN BB LEDNE LD

DaeeEed T X r-:n:v:nnn:
- sogdgum»
=3 et
) S o itet 33

RESVEC= 10

HMVEC=

177746
177750

250
“SBTTL DEFINE
JHENERR : 177744
ONTRL = 177746
MAINT
= 177750

177754

DATARG

177766

.SBTTL
DEFINE
CPUERR = 177766

JHITHMIS = 177752
= 177754

.SBTTL

| (MEMORY MANAGEMENT VECTOR
CACHE REGISTERS
: 1CACHE ERROR REGISTER
| (MEMORY CONTROL REGISTER
: (MEMORY MAINTENENCE REGISTER

: {HIT MISS REGISTER 1 IMPLIES MIT IN CACHE
i iDATA REGISTER

DEFINE

CPU REGISTERS
:1CPU ERROR REGISTER HOLDS CONDITION THAT CAUSED

MEMORY MANAGEMENT REGISTERS

; ®MEMORY MANAGEMENT STATUS REGISTER ADDRESSES

177572
177574
177576
172516

MMRO=
MMR1=
MMR2=
MMR3=

177572
177574
177576
172516

177600

UIPDRO= 177600

;#USER "I" PAGE DESCRIPTOR REGISTERS

:UIPDR1=
1 UIPDR2=

177602
177604

:UIPDR3=

177606

:UIPDRS=
:UIPDR6=

177612
177614

IUIPDRQ'

;UIPDR7=
1UDPDRO=

:UDPDR1=
1 UDPDR2=

177610
177616

;#USER "D" PAGE DESCRIPTOR REGISTORS
177620

177622
177624

SEQ 0099

MSV11-J MEMORY DIAG.

CVMY
DEFI

Page 100-2

SEQ 0100

177626
177630
177632
177634

177636

;s *USER “I* PAGE ADDRESS REGISTERS

FASTCITY=UIPARO

177652
177654

UIPARO=
UIPAR1=
UIPAR2=
UIPAR3=
UIPAR4=
UIPARS=
UIPARG6=

177660

UDPARO= 177660

;UVIPAR7=

177640
177642
177644
177646
177650
177652
177654

:PATTERN PROGRAM SPACE

;PATTERN PROGRAM SPACE
;PATTERN PROGRAM SPACE
;PATTERN PROGRAM SPACE
;PATTERN PROGRAM SPACE
;PATTERN PROGRAM SPACE

177656

;PATTERN PROGRAM SPACE

s+PATTERN PROGRAM SPACE

177676

; *USER “D" PAGE ADDRESS REGISTERS
:PATTERN PROGRAM SPACE
1+PATTERN PROGRAM SPACE
;1UDPARL=
177662
;PATTERN PROGRAM SPACE
177664
;UDPAR2=
177666
:PATTERN PROGRAM SPACE
;UDPAR3=
177670
1PATTERN PROGRAM SPACE
;UDPAR4 =
177672
:PATTERN PROGRAM SPACE
;s UDPARS =
177674
:PATTERN PROGRAM SPACE
;UDPARG =
UDPAR7= 177676
;PATTERN PROGRAM SPACE

172200

SIPDRO= 172200

;#SUPERVISOR "I" PAGE DESCRIPTOR REGISTERS

sSIPDR1=

;1 SIPDR2=
;SIPDR3=
:SIPDR4 =
SIPDRS=

angg33

PNWYY
YT
-]

177640
177640
177642
177644
177646
177650

;SIPDR6=

» W=
O

;SIPDR7=

-e e

HMonday 07-Oct-85 16:57

;UDPDR3=
;UDPDR4 =
;UDPDRS =
;UDPDR6=
;UDPDR7=

4175

)

MACRO Y05.02

MEMORY MANAGEMENT REGISTERS

1 SDPDRO=
:SDPDR1=
1 SDPDR2=
: SDPDR3=
1SDPDR4 =
;SDPDRS =
;1 SOPDR6 =
1 SDPDR7=
172240

172246

172252
172254

SIPARU=
:SIPARL=

;SIPAR2=

SIPAR3=
SIPAR4=
SIPARS=
SIPARG=
:1SIPAR7=

172202

172204
172206
172210
172212

172214

172216

;#SUPERVISOR “D“ PAGE DESCRIPTOR REGISTERS
172220

172222
172224
172226
172230
172232
172234

172236

;#*SUPERVISOR “I“ PAGE ADDRESS REGISTERS
172240
172242

172244

172246
172250
172252
172254
172256

s TEST
s TEST
:TEST
; TEST

AREA
AREA
AREA
AREA

AR EELERALE AR LERE LR ERR LRI

ERRERLN

agag

anc838

.b.......bb..b.

Y MANAGE
Se""f.‘? HENOA

Y DIAG.

REGITEIS

Y05.02

Monday 07-Oct-85 16:57

172272
172274
172276

SDPARO=
sSOPAR1 =
1 SDOPAR2=
:SOPAR3=
;1 SOPAR4 =
SDPARS=
SDPARG6=
SDPAR7=

172300

KIPDRO=

172260

;#SUPERVISOR “D“ PAGE ADDRESS REGISTERS

172260
172262
172264
172266
172270
172272
172274
172276

s#KERNEL “I" PAGE DESCRIPTOR REGISTERS
172300

172302
172304
172306
172310
172312
172314
172316

sKIPDR1=
1KIPDR2=
1KIPDR3=
1KIPDR4 =
sKIPDRS=
1KIPDR6=
1KIPDR7=
;KDPDRO=
1KDPDR1=
s KDPDR2=
sKDPDR3=
1KDPDR4 =
;KDPDRS=
:KDPDR6=
1KDPDR7=
KIPARO=
1KIPARL=

lKIPM 1KIPARS=

KIPAR‘-

KIPARS=
KIPARG=

1KIPAR7=

KDPARO=

1KDPARL=
i KDPAR2=
1KDPAR3 =
1 KDPAR4 =
i KDPARS =
KDPARG=
KDPAR7=

Page 100-3

;#KERNEL "D” PAGE DESCRIPTOR REGISTERS

172320
172322
172324
172326
172330
172332
172334
172336

s#KERNEL

“I" PAGE ADDRESS REGISTERS

172340
172342

172344
172346

172350
172352
172354

172356
;#KERNEL “D” PAGE ADDRESS REGISTERS
172360

172362
172364
172366
172370
172372
172374
172376

SEQ 0101

MSV1il-J MEMORY DIAG.

Q-BUS MAP REGISTERS

MACRO Y05.02

Mondey 07-Oct-85 16:57
.SBTTL

170200
170202
170204

4
4
4
4
4
4
4
4
4
a
4
4
4
4

4
%
4
4

El
4
4
4

4
4
4
[
4
“
4
4

DEFINE

MAPLO = 170200
MAPHO = 170202
MAPL1 = 170204

sMAPHL = 170206
sMAPL2 = 170210
sMAPH2 = 170212
sMAPLS = 170214
1MAPH3 = 170216
;MAPLS = 170220
IMAPHA = 170222
sMAPLS = 170224
sMAPHS = 170226
sMAPL6 = 170230
sMAPHE = 170232
sMAPL? = 170234
1MAPHT = 170236
iMAPL10 = 170240
sMAPH10 = 170242
tMAPL11 = 170244
;MAPH11 = 170246
tMAPL12 = 170250
sMAPH12 = 170252
;MAPL13 = 170254

sMAPH13
sMAPL14
;MAPH14
;MAPL1S
;MAPH1S
tMAPL16
sMAPH16

=
=
=
=
=
=
=

170256
170260
170262
170264
170266
170270
170272

;MAPH17
;MAPL20
;MAPH20
;MAPL21

= 170276
= 170300
= 170302

iMAPL17 = 170274

= 170304

;MAPH21 = 170306

."m.a = 170314

MAPH23
sMAPL24
;MAPH24
;MAPL2S
1MAPH2S
iMAPL26
MAPH26
;MAPL27
iMAPH27

=
=
=
=
=
=
=
=
=

170316
170320
170320
170324
170326
170330
170332
170334
170336

;MAPL30 = 170340

4
4

;MAPL31 = 170344
:MAPH31 = 170346

4340

MAPH32 = 170352

4339

102

Q-BUS MAP REGISTERS

;¢THE LOMER 16 BITS OF THE MAP REGISTERS ARE LABELED 'MAPLXX'
;#THE UPPER 6 BITS OF THE MAP REGISTERS ARE LABELED 'MAPHMXX'

4
4

MAPH30 = 170342

iMAPL32 = 170350

SEQ 0102

BELLLLLRBEREES
RO

sMAPL33
sMAPH33
sMAPL 34
i MAPH34
1 MAPL3S
sMAPH3S
sMAPL36
1 MAPH36
sMAPL3?7
s MAPNS7

SEQ 0103

170376

000174
000176

DISPREG=174
SWREG=
176

.SBTTL

DEFINE

SOFTWARE SWITCH & DISPLAY REGISTERS

172100

.SBTTL
CSRADD=172100

DEFINE

CONTROL STATUS REGISTERS

.SBTTL
FIRST=60000

DEFINE

PARAMETERS
1START OF THE 16K TEST PATTERN AREA

a 7776

Fage 102-1

Monday 07-0Oct-85 16:57

]

MACRO Y05.02

RRENDRDS

MAP REGISTERS

SRR

CVMJABO MSV11-J MEMORY DIAG.

LAST=157776
SIZE=40000

;END OF THE 16K TEST PATTERN AREA
:SIZE OF THE 16K TEST PATTERN AREA (FOR SOB INSTRUCTIONS)

1000080 000002080200020200000003020002020200500000200000000000400000»

.NLIST

TMMD

;DON'T NEED TO SEE THEM ANY MORE

$038
:

"SV‘I-J MEMORY DIAG.

000000
000000
000177

MACRO Y05.02

Mondey 07-Oct-85 16:57

.SBTTL
=0
'MORD
REPT

000000

.SBTTL

Pege 115

SEQ 0104

TRAP CATCHER
0,0

177

3 MORD

.+2,HALT

ACT11 HOOKS

14THE HOOKSIazzwxaeo av ACT11 ARE DEFINED AND SETUP BELOM:

1)L0C.46

2)L0C.52

.
e
4

BIT 14-5 PROGAARMEMORY SIZE

BIT 13=1 PROGRAM RE

S MANUAL INTERVENTION

BITS 12-0

4
.0

=0 NOT MEMORY SIZE

$ENDAD

MANUAL

MUST BE

DEPENDENT

ION NOT REQUIRED

+31)SET LOC.46 TO ADDRESS OF SENDAD IN .S$EOP

.%L

g;*z
HOOKS

. =24

13SET POWER FAIL TO POINT TO START OF PROGRAM

1 sPOINT TO APT I'OIIECT ADDRESS PNTR

200

. =44

ormum m:%z RUNNING

01’
078

PROGRAM NEEDS HOOK

BIT 1S=1 PROGRAM SHOULD BE POMER

“END-OF -PASSTM HOOK

=ADDRESS OF END OF PASS ROUTINE
MODIFIED BY ACT1l.

132)SET LOC.52 TO INDICATE MEMORY SIZE DEPENDANT

1:FOR APT START UP

;S0 RT11 CAN START HIYH RUN COMMAND

$APTHDR ;;POINT TO APT HEADER BLOCK
. =200

0OC

3881 oouio
7

%vgr 177777 002626
3 7 003670

START3: BR
"m

START1
START2

N
START2: SET

START
's'gnn
RESTART

START1: CLR

'"s'ncx START

: “NORMAL* START
{RESTART (SAVE ERROR ACCOUNTING)

MOV @-1,RESTART

Mondey 07-Oct-85 16:57

swtgsvu-.: %’%&9%10 zwo ¥U5.02
3

.SBTTL VARIABLES
INITIALIZED TO ZERO
soTHIS TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS

S085S
7
10

000000
000000
00000
000000
000000

D02C

000

0020

000000

D029

000000

0020

000000

103 002¢
io. 002C
0S5 0020

000000
000000
000000

107 0020
18’ 0020

000000
000000

10 002¢

113

0020
D020
0020

000000

115
1”
1
lg

002¢
0020
0C
0

000000

002020

too 002¢C
1

D02030
D02040
02050

1
1
1
1
1

1
1
1

s sCONTAINS ITEM CONTROL BYTE

LASTERROR: .WORD 0

000000

ERRSP:

.WORD

BADPC:

C00000

000000

.WORD

;CONTAINS PC OF ERROR

;CONTAINS SP OF ERROR FOR TYPEOUT

O
O
O

;CONTAINS PSW OF ERROR
1 ;CONTAINS ADDRESS OF 'BAD' DATA
SS OF PARITY E

O
O

: :CONTAINS ‘GOOD’' DATA
: ;CONTAINS 'GOOD2' DATA

GOOD :
GOOD2:
GOOD3:

BAD:

.WORD
.WORD

.WORD

.MORD

BAD2:
.WORD
BAD3:
.WMORD
BADXOR: .WORD

$AUTO:

.WORD

NOPAR: O
NONEM: O
BANK :
0
BANKINDEX: 0
CPUBIT: O

.MORC
.WORD
O
O

0,0
O

0
O
0

PATERR: O

000000
0060000
000000

MUT:
0
PATTERN:O
KPFLAG: .WORD

000000

RRFLAG: .WORD

000000

cCWTAINS PC OF em FOR TYPEOUT

BADPSW: .WORD

ADDRESS: .WORD
PADDRESS: .WORD
PHYADD: .WORD

000000
000000
000000
mg

000000
000000
000000
000000

:NUMBER OF ERRORS ON LAST PASS

:CONTAINS SP OF ERROR

FATALS:
SKPERR:
NEMCNT:
PARCNT:

000000
000000
000000

SW: .WORD

000000

ACFLAG: .WORD
MKFLAG: .WORD
PFLAG:
.WORD
RLFLAG: .WORD
BMFLAG: .WORD
EQFLAG: .WORD

TMFLAG: .WORD
INTFLAG: .WORD
INT64K - 3 WORD
PMEMFLG: . WORD

;CONTAINS PSW OF ERROR FOR TYPEOUT
;22 BIT PHYSICAL ADDRESS

|
t
\

: sCONTAINS 'BAD’ DATA

: sCONTAINS '
' DATA
ucounxns ‘BAD3' DATA
:XOR OF GOOD & BAD = BAD B

’;_AU‘I’WTIC MODE INDICATOR roa APT,ACT, &€ XXDP

AL ERROR INDICATOR
|USED TO SKIP ERROR MESSAGE IN “SERRGEN"
;NON-EXISTANT MEMORY COUNTER (HOLES)
;PARITY ERROR COUNTER
;PATTERN ERROR COUNTER
1NO PARITY ERROR MODE INDICATOR
.no NON -EXISTANT MEMORY (HOLES) MODE INDICATOR
sMEMORY BANK UNDER TEST
;USED TO INDEX INTO CONFIG TABLE
:CONTAINS 1 BIT TO IOENTI?Y CPU TO CONFIGURATION TABLL

;MEMORY UNDER TEST AG
.PMTERN NUMBER UNDER TEST
:BANK IS PROTECTED REGION
OF ECC

:BANK CAN
ACCESSED BY mxs CPU
IIF SET INDICATES MSVil-J OR MF11S-K UNDtR TESTsesssssses ?
:BANK IS IN PROGRAM SPACE

0
0
]

;PROGRAM IS RELOCA
FLAG
: "BANK IS IDENTIFIED AS BAD MEMORY" FLAG
: "BANK HAS EQB MEMORY" FLAG

ABORTFLAG: .WORD 0

{

+ sCONTAINS 'GOOD3’ DATA

O
O
O

O
O
0
0

nCMTAINS ERROR FLAG

.MORD

000000
000000
000000
000000

1
0021
883182

S139 002144

$ITEMB: .BYTE

000000
000000
000000

135
1
136 0021
137 002140
138 002142

TTERN NUMBER
!AN( € SIGN

. WORD

116
1
2

0
(V]

ERRPC:

000000

1
1
112
127 88114

SPATMAR: .BYTE
$BANK:
.BYTE

000000

000000
000000
000000

114 0020

;1 sSTART OF COMMON TAGS
tUSER FRIENDLY FLAG

$ERFLG: .BYTE

200

D02C

aOUSED IN THE PROGRAM.
SCMTAG:
UFDSET:0

SELONLY:0
uSELECT ONLY BANKS MARKED BY FIELD SERVICE MODE FLAG
DIAGFLAG:0
:SET FOR SHIFTING DIAGONAL ES
KAMIKAZE : 0
;SET FOR KAMIKAZE MODE TESTING
SKIPKAMI: O
sUSED TO SKIP RESTORING KAMIKAZE MODE WHEN MODIFIED
sNEXT TWO BYTES ARE DISPLAYZD IN TO'E DISPLAY REGISTER

000
000

288 6108

Page 117

sllfl( IS WHERE

AM RELOCATION IS REQUIRED TO TEST

:*TYPE OF MEMORY TO TEST” FLAG: O = PARITY, 1 = ECC
; "BANK IS INTERLEAVED” FLAG#4880805640080000000000000008 7 s
H “BANK IS 64K INTERLEAVED" FLAG8880888080008 0000000000 e ? Ll
: "MEMORY UNDER TEST IS A MSV11-J" FLAG
|
: “ABORT OCCURED” FLAG

CVYMJUABO MSV11-J MEMORY DIAG.

VARIABLES

MACRO Y05.02

INITIALIZED TO ZERO

$140 002146
3141 002130

S1i2
002132
5143 002134
144 002156

000000
000000
000000

CTLKVEC: .MORD
CSR: ~ .MORD
CSRNO: O
SAVCSR: .MORD
OLDCSR: .WORD

3146 02160

000000

SUPDRO: 0

$145

000000
000000

Mondey 07-0Oct-85 16:57

000000
000000
000000

SUPDR1: 0
SUPDR2: 0
SUPDRS: 0

181 002172
002174
152

000000
000000

SUPDRS: 0
SUPDRG: O

153
1

002176

000000

185
1
3137
1
51
60

T
164

3163 002
3167

168
169
170
17
17

78
1
180

DETRO:
DETR1:
DETR2:
DETRS:
DETR4:
DETRS:

DETPSW: 0

DETSP:

000000

230 000000
000000
000000

000000
000000
000000
000000
000000
000000
000000

DETFLAG:0
CONTFLAG: 0

000000

17
174

175
176
17

DUMMY: O
;DUMMY LOCATION FOR ADORESS PASSING
THESE LOCATIONS STORE GPR'S & PSW DURING DETAILED ERROR PRINTOUTS

000000
000000
000000
000000
10 C00000
12 000000

co2226

000000
000000

TOTCSRS: .MORD

CSRFIRST:.WORD

DATBUF: '.UORD
ISTOAT: [WORD

0.0
010

CSRLAST: .WORD
CSRFBANK: .WORD
CSRLBANK
: .WORD
CSRINT: .WORD
SPLTCSR: .WORD

000000 000000
000000 000000
000000

DBEMSK: .WORD

000000
000000

SAV4: = .WORD
SAVPAR: .WORD

O
O
O
O
O

: 'MORD 0.0
0.0
SUPDOADD
: .MORD O

:DETAILED REPORT FLAG

iCSR'S HAVE BEEN TESTED FLAG
i1 BIT PER EXISTING CSR, EG:CSR O REPRESENTED BY BI7 15.
E

iFIRST ADDRESS UNDER CONTROL of THIS CSR

:
r
‘
"

i TMO WORD DATA BUFFER
i TWO WORD TEST DATA

:TWO WORD SINGLE BIT ERROR MASK
i TWO WORD DOUBLE BIT ERROR MASK
i ADDRESS OF SUBROUTINE TO EXECUTE IN SUP' .«VISOR MODE

PASFLG: .BYTE
UPPFLG: .BYTE
PASSNO: .WORD

O
O
O

1
74 000000
76 000000
1
5185
000000
3186
000000
187
000000
5188
000000
189 002310 000000

SAVMON: .WORD
REALPAT: .ORD
OLDCACHE
: .MORD
PARTHERE
: .WORD
FSSTACK: .WORD
NE
:'WORD

OO
O
O
O
O
O

CHECK:

CBITS:
MASK:

.WORD

CSR1S:

.WORD
.WORD

.WORD

O
O

iCHECK BITs TO BE WRITTEN
T MASK FOR CSR

‘WORD

IVALUE TO BUMP THE PC BY TO RECOVER AFTER A PARITY TRAP

18
1

s
0
72

000
000
000000

;HOLDS OLD KERNAL STACK POINTER IN CASE OF CNTL/K
iDATA TO OR FROM CSR
iCSR ADDRESS NUMBER (4 LSB'S)
O CATION 70 SAVE CSRNO DURING FS COMMAND
OLD CSR NUMBERCUSED IN INM PTR TEST)

SUPDR4: 0

000000

O
O

SEQ 0106

iTMESE LOCATIONS STORE GPR'S DURING SUPERVISOR TESTS

162
14
5148 002164
149 00216

O
O

Pege 117-1

130 002312
191

000000

194

002322

000000

§196 002326

000000

132
19

195

000000

6 000000
000000

002324 000000

MONFLG: .WORD

SOURCE: .WORD

8ITNO:

.WORD

iLOCAL LOOP PASS CONTROL
:LOCAL LOOP PASS CONTROL
iLOCAL LOOP PASS CONTROL

O
O

1USED 1O SAVE KERNAL PAR
{USED
TO
SAVE KERNAL PAR S
RETURN TO FONTTOR FLAG

iSOURCE OF DATA WORDS FOR CHECKBZT GENERATION SUBROUTINE

+31.L.C. sREV

1 XXDP
TOR RETURN ADDRESS
iREAL PATTERN UNOER TEST
{BACKED UPVALUE OF CACHE CONTROL REGISTER
IDARITY TRAPS SOMETINES GO T0 AODRESS STORED MERE
iSTACK SAVED MERE IF IN FIELD SERVICE MODE
{USED FOR RELOCATION TO A NEW BANK
iCHECKBITS TO BE LOADED INTO CSR

P25k AL 1-9 PATTERN

iBIT POINTER

AL 1260 10 ZERG

Y05.02

Mondsy 07-Oct-85

CSRINC: .WORD
CSRLOOP:.WORD
SUCCESS:.WORD
.WORD
ZEROS:
TIME:
L.WMORD
SKIPMK: .WORD

NULLFLAG: .WORD

QVFLAG: O
ACTFLAG:0

(-]

byt

gPrg o

Page

117-2

SEQ 0107

;VALUE TO INCREMENT ADDRESS BY TO REMAIN IN THE SAME CSR
:LOOP CONTROL FOR CSR TESTING
:FLAG SET BY succ:ssru.n. TASK OR SUBROUTINE
;FOR AID IN "MOV* INSTRUCTIONS
:SECONDS THAT BATTERIES SHOULD LAST
sFLAG TO SKIP MKCONTROL SUBROUTINE
:SET WHEN RUNNING NULL PATTERNS
XXDP CHAIN MODE
iFLAGS QUICK VERIFY PASS UNDER APT, ACT,

:FLAGS APT AUTOMATIC MODE PROGRAMMING RUL
m&c;'é:ormmmmmue

e aOOOOOOOOOO

-4

m
wn

O
©
O
O
O
O

16:57

:FLAGS ACT AUTOMATIC MODE PROGRAMMING RUL

.’TFL‘GSO
XXDPCHA

R-

sV 1y
AR

: sCONTAINS NULL CHARACTER FOR rxus
: 1CONTAINS @ OF FILL CHARACTER
: 3 "TERMINAL NOT AVAILABLE*" ruus
: sESCAPE ON ERROR ADDRESS
;USED FOR ALTERNATE DATA PATTERNS

;
;COUNTS DIAGONAL STRIPES
'
:BACKED UP COPY OF STRIPES
~
:NO TABLE BEING PRINTED - NOW
aSIZE OF 11745 MOS MEMORY IN K WORDS#sssssssscssssss ? sssses
;SIZE OF MF11S-K MEMORY IN K WORDS#ssssssesssssssss ? ssssse
:SIZE
OF MSV11-L/P MEMORY IN K WORDS
ssornsvu.:mvxuxms
‘

aSIi’E OF 0 BUS PARITY MEMORY IN
K WORDS

AGS N TOO MANY ERRORS HAVE BEEN PRINTED FOR A BANK

zFLAG

PATTERNS TO READ ONLY

: THE ADDRESS TO RUN CSR TESTS ON

;sHIGHESY ACCESSABLE BANK OF MEMORY THRU Q-BUS MAP
;FLAG TO ALLOW STOPPING WITH SWITCH REGISTER
:AMOUNT OF PARITY MEMORY ACCORDING TO APT
;AMOUNT OF ECC MEMORY ACCORDING TO APT
;FLAG TO DISABLE FIELD SERVICE MODE
: "THIS IS NOT AN ERROR" FLAG

:
BANK Loaoeas ARE lELOCMED T0

;USED FOR JUNK
;QUICK STOP FLAG FOR APT POWER FAIL
:"NO SCOPE LOOP ALLOWED"” FLAG
1 "FIELD SERVICE

- NO INTERNAL INTERLEAVE" FLAG

uAPT SIZING INFO FLAG
TRUE WHEN IN FIELD SERVICE COMMAND 7
sCWIGWATIM ERROR FLAG
USED FOR GENERAL PWOSE INDEXING
.uo 22-BIT MODE FLAG
;:NO SUPERVISOR MODE FLAG
;HOLDS THE CSR'S ERROR ADDRESS

MSV11-J
CVMJABO
TRTIAL 2268 10 ZERS
GARTABLES

5244 002462

002470
002476

5245 002

5246

10
16

000000

1
00.

5254 002544

0,0,0,0,0,0,0,0

;POSSIBLE CSR'S

;USED TO HOLD LINKS TO PATTERNS WHICH

000000
000000

000000

000000
000000
000000
000000
000000
000000

LINK1:

LINK2:
000000

- 117-3

000000

Page

CSRINF0:0,0,0,0,0,0,0,0

000000
000000

000000

Monday 07-Oct-85 16:57

000000

000000
000000

000000

Y05.02

CSRHOLD:0
KFLAG: ©
PGMCSR: .WORD
INMECC: .WORD
INHB
:.WORD
FULLREL: .WORD
$CMTGE:

;USED TO STORE INFORMATION ABOUT THE 16

;CAN EXECUTE IN THE PAR/PDR‘'S OR NOT
0,0

O
O
O

;+END OF COMMON TAGS

SEQ 0108

;USED TO STORE CSR \m.ues FOR CSR TESTS
tUSED TO FLAG MF11S-K MEMORY TO TESTStsssscssscsssssssssses
;POINTS TO PROGRAM CSR
.
;+FLAGS INHIBIT ECC TESTS ON RELOCATION
:

MACRO Y05.02

D
CVMJABO flSVll J MEMORY

VARIABLES

INITIALIZED TO NON ZERO

5:33.
9 002550
1

526
gs:l

000401
001014

.SBTTL

000000

CACHKN: 401.0
CACHKF: 1014

88;;3 040000

002556

Monday 07-0Oct-85 16:57
VARIABLES

TESTMODE ; coooo

000012
000177

ERRMAX :
LASTIAN(171

000000

ENDFLG: O

SEQ 0109

INITIALIZED TO NON ZERO

;CACHE CONSTANT (MOVED TO CONTRL TO TURN ON CACME)
;CACHE CONSTANT (MOVED TO CONTRL TO TURN OFF CACHE)

sUSED TO SELECT THE PROPER TEST MODE FOR A PATTERN RUN
1MAX # OF ERRORS PER BANK WITH SW1l
;HIGHEST BANK OF MEMORY

000000

PASCNT: 0

;HIGHEST BANK OF MEMORY+1 (IN PAR FORMAT)
.Eooxns
ADDRESS
:END
F
1USED 1’0 BUMP STACK ON FIRST CALL TO GTSHWR
aPASS COUNTER

177777
176543
123456
176543
123456
177777

KSTACK: STACK
LOADHOME : 1
WORST:
177777
SEEDHI: 176543
SEEDLO: 123456
MSEEDH: 176543
MSEEDL: 123456
HEADER: 177777

s STACK BEGINNING
1HOME BANK OF LOADERS
;SET IF TESTING BANKS IN WORST FIRST MODE(1ST PASS)
: WORKING SEE) HI (USED FOR RANDOM NUMBER GEICRA’N;
;WORKING SEED LO (USED FOR RANDOM NUMBER GENERATOR
;MASTER SEED HI (USED FOR RANDOM NUMBER GENERATOR)
tMASTER SEED LO (USED FOR RANDOM NUMBER GENERATOR)
;USED 77 PRINT HEADINGS ONLY ONCE

79 002620
5280 002622
;a
002624
2
002633
83 0026

052525
000000
000000
000000
000000

SOFTPAT:52525
SLPADR: .WORD
SLPERR: .WORD
RESTART:0
$ERTTL: .WORD

O
O

gg“ 002632

000377

BAKPAT: .WORD

377

5266
gfi;

5269 002574
70 002576
71 002600
72 002602
7 m
74
75 002610
79 002612
77 002614
78 002616

87 002634
S

002636
91 002640

g 002642
002644
002646
002650
00265
002‘3‘
57

5299 002660
S
002661
5301

177000
160000

Page 119

LASTBLOCK:177000
ENDADD: 160000

SWRFLG: 0

000000
000031

SOBK:

177777
000003

;PATTERN FOR SOFT ERROR BACKGROUND TEST
+ sCONTAINS SCOPE LOOP ADDRESS
:6C0NTAINS SCOPE RETURN FOR ERRORS
ESTART (START ADD 202) FLAG
nCONTAINS TOTAL ERRORS

177400

BACKGROUND PATTERN
|SHAPPED BAKPAT

SWR
.WORD
DISPLAY .WORD

DSHWR
DDISP

nADDRGSS OF SWITCH REGISTER
;ADDRESS OF DISPLAY REGISTER

$FILLC: .BYTE
$BELL:
.ASCIZ

12
<207><377><377> ;;CODE FOR BELL

SWAPAT: .WORD

1882888888880 8288

377

077

015
012

:FOR ALO IN "MOV” INSTRUCTIWS
;COUNTER FOR FLIPING DATA ON WORST CASE MISE TEST

a8k kbssbstssssssssssas NOTE THESE TWO LOCATIONS MUST STAY TOGETHER ouuuu‘oo

177570
177570

207

1S0B CONSTANT

S:
177777
FLIPLOC:3

177400

177560
177562
177564
177566
012

25.

000

377

$TKS:
$TKB:
$TPS:
$TPB:

177560
177562
177564
177566

$QUES:

.ASCII

$CRLF:
$LF:

.ASCII
.ASCIZ
.EVEN

/2/

ARRR AR EARERRRR RSB

<15>
«<12>

REER445408228040802804404088000800000000

nTTY KBD STATUS
::T7TY KBD BUFFER
nTTY PRINTER STATUS REG. ADDRESS
;3 TTY PRINTER BUFFER REG. ADDRESS
+ s INSERT FILL CHARS. AFTER A "LINE FEED"

s sQUESTION MARK

: ;:CARRIAGE RETURN
: sLINE FEED

CVMJABO MSV11-J MEMORY DIAG.
CONFIGURATION TABLE

MACRO Y05.02

Monday 07-Oct-85 16:57

.SBTTL

Page 121

CONFIGURATION TABLE

sCONFIG:FIRST 16K CONFIGURATION WORDS (2 EACH)
i
2ND
16K CONFIGURATION WORDS (2 EACH)
R

200TH

16K CONFIGURATION WORDS (2 EACH)

zCWIGLRM’IW uoaos

;

BIT O

ERRORS PRESENT

BIT 2-4

RESERVED

BIT 11

RESERVED

BIT 15

LOADERS HOME BANK

BIT 1

;
;
;

:
;
;
;

BIT S
BIT 6
BIT 7
HIGH:

% 88& rd 000201

éO'FIG: .REPT
CONFIEND:

SKIP ECC LOGIC TESTS FLAG (I'SKIP)
PROTECTED REGION OF ECC MEMOR
PROTECTED (PROGRAM SPACE)
BIT 8-11 CSR CODE
BIT 12-15 RESERVED
BIT 0-7
NUMBER OF ERRORS
BIT 8-10 MEMORY TYPE
BIT 12
BIT 13
BIT 14

'
p
i

201

MEMORY SUCESSFULLY ACCESSED

RESERVED
"BACKGROUND PATTERN VALID" FLAG
BANK SELECTED FOR TEST BY FIELD SERVICE MODE

SEQ 0110

CVMJABO MSV11-J MEMORY DIAG.
MACRO Y05.02 Monday 07-Oct-85 16:57
$000000000060888068888 MAIN $52408848448285840588888888
5331

S332 003670

START:

.SBTTL

SUBTST

:#SUBTEST

SUBTST

882888 80000

RR AR AR

ARRARRERNRNENAR0RANRS

<<SAVEMT>>

SAVEMT

;SAVEMT SAVES THE EMULATOR AND PRIORITY LOCATION

RRRR000000000000

;UNDER THE NAMES OF SAV30 AND SAV32.

gg’
7

33 LCP/ORION ROUTINE TO SAVE EMTULATOR AND PRIORITY

003670
003674
003676
003704
003706

005737
001034
C32737
001430
012737

003722
0037
0037
0037
003740
003746

001403
012737
104042
005060
013737
013737

003756
003760
003762
003764
003766
349 00 7’3

000000
000000
000000
000000

1 003774
003776
003776

000005

003756
000040

000052

177777

003762

003714 032737 000100 000052

003754

0037

3 004002

000404

105737

001001
005037

010637

177777

003764

000042
000030
000032

003756
003760

EMTSAV: TST
BNE
BIT
BEQ
MOV

SAV30
VMKOR
#8IT5,8052
VMKOR
#-1,UFDFLG

i3
;3
i3+
::
i3

FIRST TIME THROUGH ?
BRANCH IF BEEN HERE ALREADY
ARE WE IN UFD MODE ?
LEAVE IF NOT
SET UFD FLAG

BEQ
MOV
EMT
CLR
MOV
MOV

14
#-1,VUQUIET
42
42(R0O)
30,SAV30
32,SAV32

i:+
3+
+3
i3
33
i3

BR_IF NOT
SET QUIET MODE
GET ADDRESS OF XXDP DCA TABLE
CLR XXDP+ "DRSERR"
SAVE EMULATOR ADDRESS
SAVE EMULATOR PRIORITY LEVEL

i3+
i+
;s
;s

PUT EMULATOR INFO HERE
PUT PRIORITY LOCATION
USER FRIENDLY MODE FLAG
UFD QUIET MODE FLAG

BIT

1$:

SAV30:
.WORD
SAV32:
.WORD
UFDFLG: .WORD
UQUIET: .WORD
VMKOR:
7578

BNE

056736

NORES:

002276

004024
9 004

360 0040

022700
001374
012737

RESET
CLEAR

s ;FIRST LOCATION TO BE CLEARED

CMP

#$CMTGE RO

s sDONE?

SUBTST

<<CLEAR NON-PROGRAM SPACE>>

CLR

BNE
MOV

HERE

$ENV
NORES

#$CMTAG.RO

MOV

002556

33 GET AROUND TAG AREA

O
O
O
O

1 :SAVE XXDP MONITOR RESTART ADDRESS

MOV

000177

VMKOR

SP ,SAVMON

002000

1$:

:3 ARE WE IN QUIET MODE ?

:3CLEAR RETURN TO MONITOR FLAG

MOV

002544

001*6.5052

MONFLG

002274

004006 013706 002574

SAVEMT

g:. 003670

INITIALIZE VARIABLES TO ZERO

1828884880480 4482ER 40808004 LARRRAARREERRR0R0R 00000000000

5335

<<INITIALIZE VARIABLES TO ZERO>>

1908888848488 88848488888848888888288
8888800400048 RRERRRRRRRSRRALALRERAAARRARN0AS

;#SUBTEST

#s2ss88808888482888324% MAIN 2008222008000t nttssttitnts

18888888 48428484/ 5208885884880

$334 003670

SEQ 0111

1 9888888888484888888888888888888882888R088882
080840000 RLRRRALRRR0R00000R0000

s333

Page 122

KSTACK , SP
(RO)s

1s
@177 ,LASTBANK

CLR

MONFLG

:3SETUP THE STACK POINTER
: sCLEAR MEMORY LOCATION

;LOOP BACK IF NO
;RESTORE LASTBANK (THIS MUST BE DONE PRIUR TO SYSTEM SIZING)

MACRO Y05.02

C VYMJABO
MS
C LEAR

Monday 07-Oct-85 16:57

Pege 122-1

SEQ 0112

i 98885848882 888428304884828888888888882
8888888888088 802 0080000000000 0 000000000000

1#SUBTEST

CLEAR NON-PROGRAM SPACE

s THIS ATTEMPS TO GET RID OF ANY PARITY ERRORS BY WRITING INTO
;EVERY LOCATION THAT IS NOT LOADED INTO BY THE PROGRAM OR ALLOCATED

~ =4

uaunun

338 &EEREES>

(884848408 8888888880888L885888088800000004800004000000840088088080000000000000

003820

02002
103773
005037

000001

;70 THE XXDP LOADERS

MOV

002076
24:

160000

002076

CLR
CLC
ADC
CMP
BLO
CLR

&1, NOPAR

;PARITY ACTION = COUNT & IGNORE

(RO)+

RO, 2160000
NOPAR

;RESTORE DEFAULT PARITY ACTION

VMUABO MSV11-J MEMORY DIAG.

AR OO PROGRAN SPACE

MACRO Y05.02

Monday O7-Oct-85 16:57

SUBTST

S373 004062

000401

$376 004066
004066

012737

004162

000004

377 004074
78 004102
7

012737
000007

004106

000010

004104
al 004106
S 004114

000413
012737

047030

004114

104401

071545

004%;0
004 s

010046
OOSOgO

000000

PROTYP:

000034

000012
004064

000010

004146

012737

004162

94 004154
88: 60

005737
7
37

177746

012737

004

001436

004

012737

004212

005037

004; 6

MOV
MFPT

1$:

032737

3’ 004240
w
g:
004
1
1

37
005037

0
74

1
14 004
S415S 004310
S416 004316
004316

<<TYPE OF SYSTEM SIZER>>

022737
001003
052737
012737

TYPE OF SYSTEM SIZER

004234

000007
%40000
456
060262

28
#$TYPE, 34
MSG130

.DSABL

CRF

,MSG130

RO. (SP)

(’:#"

CWTRL

060412

TST
BR
CLR
MOV
BEQ

SET4

3%:

cMP

002556
002552

S¢:

64:

000020

172516
000004

224%:

CCH(N
OZEROS DT11

PROTYP

;+LOAD TRAP VECTOR
;TELL THEM BAD PROCESSOR TYPE
13K SAVE RO
uK CLR tC AND tZ POSSIBILITIES

;3K SEE IF THIS IS A UFD Alfl" SITUATION
;3K IF NOT RESTORE RO AND HAL
;NO NEED TO GO ON
;RESTORE TRAPS TO 10
sMOV THE CODE TO PROTYP
3

:SEE IF CACHE REGISTER RESPONDS
;BRANCH IF CACHE AVAILABLE
:NO CACHE ON SYSTEM

;D0 NOT PRINT CONTRL ERROR MESSAGES

;IS THIS A 11/83/84
;YES 3

CLR
BIS

MMR3

oB8IT4 ,MMR3

;SEE IF THERE IS 22-BIT ADDRESSING

-1

|BRANCH IF 22-BIT RELOCATION
;SET FOR NO 22 BIT ADDRESSIMS
;sHIGHEST BANK OF MEMOR
:MAKE TESTMODE USER
3
;CLEAR SOME ERROR DATA TAGS

BNE
INC
MOV
MOV
INC
CLR

CLR

004064

934

aA CODE IN THE LOWER BYTE OF RO
;INDICATES THE PROCESSOR TYPE. 1-11/“
:13=11/23, S=11/83/84 (Orion)

044

BIT

4%:

212,10
RO,PROTYP

|'I’RAPST0 10 = BAD PROCESSOR TYPE
;TYPE
OF PROCESSOR TEST: THIS INSTRUCTION
; (AVAILABLE ON NEMER PROCESSMS MY) PLACES

SET4

Hggm

000004

000005

004342

BR
MOV
TYPE

'.BgABL

000422

060264
060424

€1%,10

000004

2%:

:SKIP OVER VARIABLE LOCATION

03‘
gg:_ .4

PC.ABORT
(SP)+,RO

000020

002454

SYSSIZ

JSR
MOV
HALT
MOV
MOVB

172516
172516
737 800020
172516

00 00;
37
012737
8%;; 7
7
37

SYSSIZ: SET4
rggm

022737 000005 004064

004

002544
002336

.WORD

MOV
CLR

052220

88:

TYPEIT

0041
004737
0041
012600
’00043000000
91 004
012737
92 004142 110037
004146

SEQ 0113

|‘“‘..‘.‘.‘.“.“.‘...‘...‘.“‘.‘.“.“.“.‘.“‘...‘....‘...‘...‘..“..‘.‘....‘

ggn 004062

- 123

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

:1#SUBTEST
75 004064

Page

CLR
CLR

cMP
BNE
BIS
SET4
MOV

.DSABL

C.f‘lé )
981IT4,MMR3

NO22BIT

@7 ,LASTBANK
#140000, TESTMODE
NOSUPER
DTS+10

DT14.+10
DTS.12
DT14.12

#5,PROTYP
224
OOITC MMR3
070 4

CRF

BRANCH

.CPU TYPE = 11/83/84
:NOBRANCH
|SET uP 22 BIT ADDRESSIMS

;TRAPS GO
T

MACRO Y05.02

free
0f Svsttn'sizeR

CLR

005037 052364

g1 sois 005737 177766
i & 012737 177111 052364 00‘360
004364
5421

012737 034002 000004
gsz'm 000005 004064
oo;

oo&os

177766

Monday 07-Oct-85 16:57

TST

1014:

mv*s‘

CPERRF

90177766

©-1,CPERRF

MOV
cHP
BNE

OTIMEOUT,4
05 ,PROTYP
101

.DSABL

CRF

CLR

CPUERR

Pege 123-1

SEQ 0114

F
iCLEAR THE

;IS THERE A CPU ERROR REGISTER?

;s YES-TRAPPED
:ENABLE TRAPS TO 4

;IS THIS AN 11/03/“ ?
:BRANCH IF

3CLEM out 'l’ii CPU ERROR REGISTER BITS
;THAT A EXPECTED TRAP COULD HAVE SET

CVMJABO MSV11-J MEMORY DIAG.

TYPE OF SYSTEM

SIZER

MACRO Y05.02

S424 004364

SUBTST

012737

012737
oou 4 012737
013737
004430
013737
004436 012737
004444 012737

5434 004452

S 004452
004460
w
4
004502
004510

177777

176543
123456
002606
002610
000377
177400

002612

002606
002610
002602
72604
002632
002634

125

SEQ 0115

<<INITIALIZE VARIABLES TO NON ZERO>>

s $SUBTEST

INITIALIZE VARIABLES TO NON ZERO

|.‘..‘..‘.“....“‘..‘.‘.“......0.“‘..‘...“.“.....“““‘..‘.“.‘....‘.‘....

SET
MOV

WORST
o3, FLIPLOC

MOV
MOV
MOV
MOV
MOV
MOV

0176543 ,MSEEDH
0123456 ,MSEEDL
MSEEOH, §e£ou
MSEEDL , SEEDL
osn.liuo
0177400

SET

HEADER

MOV

@-1,MORST

MOV

@-1,HEADER

;PRIME THE RANDOM NUMBER GENERATOR
;BOTH HIGH AND LOM WORDS

SUBTST «xumlu.mvecroasn

;.‘.‘..“.‘.“...O.“.“.‘.“...‘0‘..‘....‘.‘.‘.‘.O“...‘.“.“‘.."...‘.....‘..

1 #SUBTEST

C12737
012737
012737
012737
012737
012737
012737

051054
000340
051410
ggouo
057034
000340
oasm

000020
000022
000030
000032
000034
000036

012737
000
012737 033632 000114
004
012737
000340 000116
s gg:
o:gv 7 034026 000010
S4 012737 000340 000012
004
012737 034002 000004
004570 012737 000340 000006
004576 012737 034014 000250
ggo 004604 012737 000340 000252
1 004612

Page

] $82088286820828288288888308820808202888828880088880405842 0202080033008 000000000000

5425 004364
#4 012737 177777 002600
339
012737 000003 002616

oouos

Monday 07-Oct-85 16:57

1044

INITIALIZE VECTORS

] 5888840258848 54828888888088888488088020880488042088288848822888882808008008000080000

MOV
MOV
MOV
MOV
MOV
MOV
MOV

MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV

CACHON

©$SCOPE ,IOTVEC
9340, I0TVEC+2
mEMTVEC
MIVEC+2
omcb
TRAPVEC
0340 ri»vec.z
Niou

Mvecoa
i PARVEC
o.uo
nivecoz
muos RESVEC
RESVECs2
nméom.mvec
ERRVEC+2
6»
MMVEC
0340 ,MMVEC+2

1107 VECTOR FOR SCOPE ROUTINE
s iLEVEL7
i 1ENT_VECTOR FOR ERROR ROUTINE
s sLEVEL7
mw
VECIO0R FOR TRAP CALLS
iLEVEL
7
..vou-:a FAILURE VECTOR

i
LEVEL7
:GET READY FOR PARITY ERRORS
;RESERVED INSTRUCTION TRAP

;SETUP
TIMEOUT ERRORS
;SET PRIORITY OF ERROR TRAPS
;VECTOR FOR MEMORY MANAGEMENT
:TURN CACHE ON

CVMJABO MSV11- J MEMORY DIAG.

!flITI&Ilfi VECTORS

‘

MACRO Y05.02

SUBTST

S454 004614

<<INITIALIZE PATTERNS>>

INITIALIZE PATTERNS

s sSUBTEST

: THE ”T E TABLE DE TERMINES WHICH PATTERNS ARE GOING
Y
B T SET REPRESENTS A PATTERN TABLE ENTRY THAT IS 10 BE LEFTY
1EACH
1 ALONE (1’0 BE _RUN). EACH BIT CLEARED lE'!ESENT'S.:LPslgm'mffl.E ENTRY

057004

0&702

D¢

D¢
DC

000010
0047

0047

000010

SEQ 0116

|‘.‘..““‘....“.‘.‘.‘...‘.“...‘...“.O...‘..“..“.‘.‘.‘.0..“.‘...‘..‘.‘.‘..

Peage 127

1888888288888 888488888888880088888880888880088880880088028820880080280080000080000000

Monday 07-Oct-85 16:57

A
1 THAT IS l’O BE OVEN.IVED WITH THE ADDRESS OF

MOV

MOV
MOV
MOV

mo)
RS
sch
ou.
”

CALL
MOV

muc
(ao)

MOV
CALL
MOV
MOV
CALL
HOV
MOV
MOV
CALL
MOV
MOV
au

oie. R2
PATPL
(RO)+ ,R1
. ,R2
PATPLUG
(RO)+,R1
MIPAT
016. ,R2
PATPLUG
(RO)+,R1
8. ,R2
PATPLUG

MOV
ROV
MOV

017316
0047
000010
0047

né
"‘""‘%x
n:gaiRS

SUBAAA

PATPLUG: SUBTST

<<SUBR

PLUG IN NULL PATTERNS>>

1#SUBTEST

SUBR

PLUG IN NULL PATTERNS

1088888508888888482888288058808283888288803880288288828888288800458888830088808800880000
1828588888888 888808488888088408888882888888888888248848888388088888888880808828808%

5484

000001

002452

FOR I

:= @1 TO R2

R1
ROR
ON. NOERROR

ErtH
m‘

024106

000002
002452
0V2452

MOV #MT0999, (R3)

END ;OF on.zaioa

ENDlW“
RETURN

MOV 01,1
BO:;::::3

+IF CARRY CLEAR

B8CS LO
LO:3:s5333

BLE
EO:3333333

' w Rali.“l w;ug&

MACRO Y05.02

5494 004770

tiondey 07-Oct-85 16:57

Page 129

SEQ 0117

SUBAAA: SUBTST

<<CLEAR THE CONFIGURATION TABLE>>

1sSUBTEST

CLEAR THE CONFIGURATION TABLE

18888688688088686088084808800080888080000008800000000880040000000008000000000000

1668686006608048000886808008880880880080888000808080008008888080480080080008000000000

1 THIS ZEROS (UNLESS WE STARTED AT ADDRESS 202) THE CONFIG TABLE
sWHICH IS FULLY DISCRIBED AT LOCATION “CONFIG*".

.ENABLE LSB
IF RESTART IS FALSE

1s:

003670

MOV
CLR

cHe

TST RESTART
BNE L1

SCONFIG.RO
(RO).

:c.:urmo.ao

EJ 10F IF RESTART
OV

002106

Liz:sss3ss

IT1,CPUBIT

SET ID BIT

SUBTST <<SIZE FOR A MARDWARE SWITCM REGISTER>>

] 282882850200 488888808888820880888882882880000888288888480888082008802080845088880800800

1] $55888884888888028888888288000828882488820282888082882882288082888482428808400800080000
#SUBTEST
SIZE FOR A MARDWARE SWITCM REGISTER
+1IF NOT FOUND OR IT IS
1 EQUAL TOR ~-17. SETUP FOR A SOFTWARE SWLTCH SEGISTER.

177570
177570

MOV
S0SWR , SWR
MOV
#0DISP,DISPLAY
IF 0-1 EQ BSWR

005062

365005
177766

'of

00°

5521

012737

434

#38.4

MOV

177777

104
50 ifi

SET4

005054

000176
000174

.DSABL

175566

38:
2¢:

CRF

:TRAPS TO 4 GOTO 3¢

1 1SETUP FOR A HARDWARE SWITCM REGISTER
ino A HARDMARE DISPLAY REGISTER
:IF NO TRAP FROM REFERENCE TO GSMR AND GSMR = #-1
P @-1,85MR
BNE L2

+ sBRANCH IF NO TIMEOUT

BNE
CLR

i
v
én.na

BRI
TP NGp /e T
;CLEAR OUT THE CPU ERROR REGISTER BITS

.DSABL

CRF

.nnvn #24,(SP)
RESA
4
STIMEOUT,
MOV

MOV

#SMREG

SDISPREG,DISPLAY

END ;OF IF @-1
.DSABL

LS8

11SET UP FOR TRAP RETURN
JRESET TRAPS TO & TO DEFAULT
H

;THAT A EXPECTED TRAP COULD MAVE SET

s sPOINT TO SOFTMARE SMR
o
IE R

ERER]

gmnwiszx%ack“sw Y05.02
5524 005120

Mondey 07-0Oct-85 16:57

Pege 131

SUBARB: SUBTST

<<SETUP ACT, APT, & XXDP>>

;s*SUBTEST

SETUP ACT, APT, & XXDP

SEQ 0118

;0.‘.‘..‘."...“..‘...0.“...‘..‘.0..‘“..‘.‘.0‘....‘...0..“..“..‘.‘...‘..."
|.“..‘...O......"...‘..‘..‘.‘.......‘.....‘.‘0‘.‘...“..‘..‘.....““...‘.‘..‘

;THIS SETS UP A BUNCH OF FLAGS TO TELL THE PROGRAM EVERYTHING

5529 0C
5530 'y

531

0C
0C

5532 oc
00

5533 od

005037

056724

32737
1403

000040

012737

177777

32737
1403
012737

IT CARES TO KNOW ABOUT APT,

sPASS

&R
056737

IFB #BITS SET.IN SENVM

SET

$TPFLG

ACT,

& XXDP.

JCLEAR PASS COUNT

;INDICATE NO TERMINAL

END ;0F IFB #BITS

056737

APTSIZE

MOV

END ;0F IFB #BIT7

SET

1777177

DOS17

CMPB SENV,01

@APTDOWN,PWRVEC
#$SWREG,
SWR

5540 0C
541

5542 0OC
5543

5544 00
5545

IF 42 NE OSTACK AND 42 NE &0

3727

it
001421

012737

013737

177777
177777

3727
1004

000042

012737

177N

013730

177777

CMP 42,0STACK
BEQ L7
L

IF 42 EQ @SENDAD

SET

END ;0F IF 42

5547

END ;0F IFB SENV

MOV
o

#-1.ACTFLAG

BR L11
et

XXDPCHAIN

END ;OF IF 42

5546

g2 Hsremom

ACTFLAG

ELSE

002354

@-1,.APTFLAG
@-1,.QVFLAG
@-1,8AUTO

BR L6
LS:s3333s

SET QVFLAG, $AUTO

000403
012737

MOV
MOV
MOV

;USE APT SWR

5539 od¢

BNE LS

APTFLAG,QVFLAG, $AUTO,QUICK

MOV
MOV
ELSE

@-1,.APTSIZE

L8:335333

IFB SENV EQ @1

056736

@-1,.8TPFLG

BITE #BIT7,SENVM
BEQ L4

5534 0C

MOV
L3:3358183

IFB #BIT7 SET.IN SENVM
SET

1777717

BITB #BITS, $ENVM
BEQ L3

L4d

MOV
s

L7?:53838383

#-1,XXDPCHAIN

CVMJUABO "'SVII-J "‘MV DIAG.
SETUP ACT, APT

xXXDP

MACRO Y05.02

Mondey 07-0Oct-85 16:57

Page 131-1

SEQ 0119

005316

Lé:3s3::3

5549 005316

SUBTST

;*SUBTEST
g
S

D¢
0
00
0C

5553 0C

0C
5554 0C
0

ggg D0

000200
000200

002664
002670

013730

000042

177777

5558
5559

BIS
- @BIT7,CONFIG
BIS
@BIT7,CONFIG-4
IF @SENDAD NE 42

002276

SET

MONFLG

ERROR .64

ELSE

PROTECT PROGRAM & LOADERS

1008000600008 800000888000800800000000088080800000000088000000000000000000000000000

IF NO22BIT NE @0

002454

0C
0

5557 OC

<«<PROTECT PROGRAM & LOADERS>>

1008860068800 0800800808800000000000000000000800000800800000008000000000000000000000

071472

TYPE

TYPEIT

.DSABL
END

MSGO00

,MSGOOO

CRF

END ;0F IF @SENDAD

;PROTECT PROGRAM SP
;:PROTECT LOADER SP
iNOT ACT-117

(BANK 0)
(BANK 1)

R ::smuo.aa
TST NO2281

sRETURN TO XXDP MONITOR
; ILLEGAL PROCESSOR

BEQ L13
MOV

@0-1.MONFLG

BR L14

L13:3533333

: TYPE PROGRAM TITLE
:

)

Li€:;::3:3
L12:333333

DIAG.

MACRO Y05.02

Monday 07-Oct-85 16:57

SUBTST

Page 132

SEQ 0120

<<CHECK FOR CACHE AND MEMORY MANAGEMENT>>

198 8 048 8 02800808808808020028808280088488888288880888800080080020800000000000000000

s #SUBTEST

CHECKX FOR CACHE AND MEMORY MANAGEMENT

188006860800800000080008804000080080088880000008804880000000000000000400000000000

;¢ THIS FIGURES OUT IF THERE IS A CACHE AND MEMORY MANAGEMENT
i M flQsSYSTEH. AND WHETHER IT IS ENABLED OR DISABLED.

SET4

000004

012737

005737

000004

012737

005737
0137

000004
177750

032737
001415

;;7! 005440
74

104401

071150

052737
042737

000400
000077

104401

071620

104401

071162

038.4
CRF
CONTRL
1%
o1s.4
CRF
MMR3
4,-(SP)
eias.a

BEQ

nuu

8IT

TYPE

TYPEIT

177730

177734

12¢:

nno 80177750
,M1184

.DSABL

CRF

BIC

077,90177734

BIS

081T8,80177730

TYPE

nouim

MOV
8R

(SP)»
48

TYPEIT

.DSABL é

000004

2B
3519
W
000004
012637

MOV
.DSABL
isT
SET4
MOV
.DSABL
TsT
MOV
MOV

148:

MOV

TYPE

(SP)+
MSG1
H

;IS THERE A CONTROL REGISTER?

;IS THERE A MMR3 REGISTER?
11V SAVE OLD TIME OUT
11V PASS ON KTJ11

13V TEST FOR 1184

:3V ELSE REPORT 1183

::V REPORT 1184

13V SET ABILITY TO CLEAR

:3V UNIBUS MEMORY ACCESS

13V TO UNIBUS

13V AND REPORT NO UNIBUS
:3V MEMORY ACCESS AND CONTINUE
::V ALSO RESTORE OLD TIME OUT

: 11783

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

CHECK FOR CACHE AND MEMORY MANAGEMENT
76

gsszg

fi 012737 177777 002276

18:

4%:

3
5587

000404

104064
052737

000014

177746

032737

000004

177746

042737

001004
032737

005544

104401

fi3p gosseg

5590 005550
539

005566

5595 005;7;
005572

000010

coiess 071224

104424
013737

002544

177746

177746
7%:

.DSABL
BR
SET

ERROR
BIS
BIC
BIT
BNE

Peage 132-1

SEQ 0121

CRF

a4
MONFLG

+64

@B8IT2!BITS.CONTRL
@BIT2!BIT3,CONTRL

oonz. CONTRL
“ITS CONTRL
HSGIZI

,MSG121

:PROCESSOR NOT SUPPORTED
:NO_MEMORY MANAGEMENT

BY TF.CIS 0

+SET CACHE DISABLE BITS
:CLEAR CACHE DISABLE BITS
:IS THE BIT SET?
:BRANCH IF THE IIT IS SET
lIS THE BIT SET?
1BRANCH IF THE IT IS SET
: CACHE BYPASSE

CRF

002546

CACHKN, CACHKN+2
CICI'.(N

005037

002544

104401

071174

"“nsé{'{o

104401

071203

MSG120
MSG120

000404

:‘

000014

Monday 07-0Oct-85 16:57

CRF

:SAVE _INFO ABOUT CACHE
:CACHE CANNOT BE USED - IT'S BYPASSED

:CACHE AVAILABLE

STIC

MACRO Y05.02
CVMJABO MSV11-J MEMORY DIAG .
CHECK FOR CACHE AND MEMORY MANAGEMENT

5597 005576

HMonday 07-0Oct-85 16:57

SUBTST

gga 005576
005600
005604

1044 1.
0057
001011

002456

005606

042737

030000

7 005626

012746

006606

000740

ig 005630

052737

030000

012746
006606

000700

g& 005614

S606 00562;
005622

Sé612 88;:36

36
S‘R 005642

g:ls 005644

<<SETUP USER & SUPERVISOR STACK>>

052737

010000

DEENERGIZE
TST
NOSUPER
BNE
1]

$617
5618

177776

S621

5S$:

BIS

#B8IT12.PSW

PUSH

#SUPSTK

MTPI

SSP

Sé622

:SET PREVIOUS MODE TO USER

BIS

#BIT13!8IT12,PSW

PUSH

QUSESTK

MTPI

usP

MOV QUSESTK, -(SP)

GET SOFTWARE SWITCH REGISTER IF NECESSARY

IF $AUTO IS FALSE

023727

002636

000176

012737

177777

002566

005037

002566

001006

104407

005676

msoo

MOV @SUPSTK, -(SP)

3“.‘....‘...““..‘.‘..‘.t‘..‘.‘..‘.““‘.“.“.“““‘.........‘...“....‘..“

RARAARERRRRNNS

SUBTST <<GET SOFTWARE SWITCH REGISTER IF NECESSARY>>

002062

00000000

g...‘......“‘0‘.“....‘...““.“.‘“‘..‘.0...0‘..“.0“.“.‘.t““..“..“....

005737
001012

9 005670

sTURN OFF MEMORY MANAGEMENT
;IS THERE A SUPERVISOR MODE?
;NO-SKIP SUPERVISOR SETUP.

;SET PREVIOUS MODE TO SUPERVISOR
oBIT13!8IT12,PSW
BIC

177776

SETUP USER & SUPERVISOR STACK

8288888 8888488220888 882 0202823008082

;#SUBTEST

S616 005644

SEQ 0122

|.".‘.‘.‘........O.‘..‘....‘i.‘..“.“.‘..‘..‘.‘...“‘...‘..‘....“...‘...‘....

;0 2TEST

S603

Page 133

IF SWR EQ #SWREG
SET

TST $AUTO
BNE L15S
;IF SOFTWARE SWITCH REG SELECTED

CMP SWR, #SWREG

BNE L16

SWRFLG

GTSWR
CLR

:IF NOTCAPT OR ACT)

:3SET FLG TO BUMP STACK
MOV @-1,SHWRFLG

::GET SOFT-SWR SETTINGS

SWRFLG

;sCLEAR IT FOR REST OF PROGRAM

END ;OF IF SWR

L16::3:33:

END ;0F IF SAUTO

76
76

SUBTST

S624 005676

L1S::33333

«<<GET MEMORY MANAGEMENT READY>>

;.0‘.‘..‘.0‘..“....0‘.‘.“.“‘..‘.‘.“.‘....“‘.t.““......“...‘.O‘.“...‘...

;#SUBTEST

5625 005676
$626 005700
005700
005702
005706

010346

104422

005712
5627 005714

012603
104420

012703
004737

GET MEMORY MANAGEMENT READY

(2808 40 R004R00ARAERRSERSARRARRARARRRAASRRRSSA0RR00080004000000000000004

KMAP
MAP

000200
035604

MOV
CALL

.DSABL

ENERGIZE

#200,R3
MAPPER

;MAP KERNEL SPACE 1 70
1
;MAP SUPERVISOR SPACE ( TESY MEA) 70 1
V R3,-(SP)

CRF

: TURN ON MEMORY MANAGEMENT

MOV (SP)+,.R3

CVMJABO MSV11-J MEMORY DIAG.
GET MEMORY MANAGEMENT READY

MACRO Y05.02

5630 005716

Monday 07-0Oct-85 16:57
NEMWTST

005716

«<<BIT TEST OF ALL CSR'S>>

BIT TEST OF ALL CSR'S

1888848884888 8888040888448044888040000880008000888080800000000800000000000000000

000004

TST1:
SCOPE
;e THE FIRST PART OF THE CWIGU!ATIW ANALYSIS DOES THE FOLLOWING:

g:li

i®

3
S634
S63S

1.
;s
s

g:gs

1) FINDS IMICN CSR'S RESPOND, AND PUTS THEM INTO THE CSR INFORMATION

TABLE, AND STORES ANOTHER BIT FOR "TOTCSRS".
2) TESTS THE CSR BITS COMMON TO ALL CSR'S.
3) FIGURES OUT IF THE MODULE IS A ECC, OR PARITY MEMORY

4) TESTS THE BITS PARTICULAR TO THAT TYPE
OF CSR.

S) IF ANY BITS TEST BAD IN THE CSR UNDER TEST, THE CSR OK BIT IN THE
s
I
CSR INFORMATION TABLE IS CLEARED
T arrtcgarmuon BITS ONE THROUGH THREE FORM
A CODE WHICH GIVES THE TYPE

38
39

1
g::g

is
i*

e
e

S644
g::z

m“‘z

[ (= o
BITO

TYPE

MSV11-L/P
MSvV1i1-J

PARITY
ECC

0
1

;&% THIS MEMORY CODE WILL BE USED IN THE SECOND PART OF THIS ANALYSIS

g:” 005720
005722

1 005724

005005
005000

012703

172100

736

012737

006112

000004

7
0057
8837
762
m@
770
1
175
772

5662 005776
005776
006002
5663 006004
S664 006012
006012
S665 006012
g::’ 006014
006020

006020
0060;3
5668 0060
S669 006036

$670 006040
006040
S671 006040
5672 006044

RS
RO

;RS IS THE TOTAL CSR NUMBER
;RO IS A TABLE INDEX

MOV
SET4

o1, NOPAR
#CSRBMP

;:IGNORE PARITY ERRORS

.DSABL

CRF

MOV

REPEAT

S654 005744

744

CLR
CLR

MOV

0057
012737 000001 002076
005736

5655

SEQ 0123

188888888848 888888888888408800008008808088408R080004045440000000000000000000000

s#TEST 1
5631

Page 135

005713

705

000001

042760
052760
005013

000006
000030

012713

020000

032713
001403
052760

020000
000001

005013
004737

006306

026027
100004
016037
104021

062700
062703

;R3 HAS THE CSR ADDRESS

9CSRBMP, 4

TST (R3)

BIS
CLR
BIC
BIS

Bl:333:33

;:D0ES THIS CSR RESPOND???

#1.RS
iMARK IT IN CSR MAP
R4
;:CLEAR THE LAST CSR INDICATOR
#6,CSRINFOCRO)
;CLEAR UNUSED BITS
@BIT4!BIT3,CSRINFOCRO) ;YES-MARK IT IN CSR INFORMATION TABLE
CLR (R3)
;CLEAR THE CSR UNDER TEST
LET (R3) := #BIT13
xIS THIS AN ECC MEMORY?2?

002462
002462

IF 0BIT13 SET.IN (R3);IS BIT 13 SET

000030

002462

002052

MOV #BIT13,(R3)

BIT 001713 (R3)
BEQ
L
8IS #8ITO, CSRIM"O(RO):HARK IT IN THE TABLE AS BEING A ECC FEMY
END
L17:5333353
CLR (R3)
;CLEAR CSR UNDER TEST
CALL RMWCSR
;BIT TEST OF ALL BITS IN CSR'S
IF CSRINFOCRO) MI 030 ;D0 WE HAVE A LEGAL CONFIGURATION?

002462

MOV CSRI'FO(RO) BAD :MOVE IN BAD DATA
END

000002
000002

©CSRADD,R3

NXTCSR:

ERROR

ADD #2.RO
ADD #2.R3

s
;GO TO NEXT CSR
;GO TO NEXT CSR

CMP CSRINFO(CRO),
030
BPL L20

L20:33353533

J_MEMORY DIAG.

fiAB0 BI
BTT e ST OF ALL CSR'S
5673 006050
5674

5673
5676

MACRO Y05.02

Monday 07-Oct-85 16:57
RS
ASL
ON.ERROR

006305
103001
005204

INC R4

Page 135-1

1 SHIFT CSR MAP
:IS THERE A CSR O

;YES-SET CSR PRESENT FLAG
:

081330
865764
001

100000

010537
004737

002224
006122

00137

007002

062706
000137

sUNTIL ALL CSR'S ARE DONE

ROR

RNE

224

;:RESYNC RS
:WAS THERE A CSR 0?
;:BRANCH IF NOT EQUAL

22%:

CMP RO, 940
81
El:sss3:

#BIT15,R5
BIS
LET TOTCSRS := RS

:YES SET IT IN CSR_TABLE
:STORE CSR MAP IN TOTCSRS

CALL CSRMAP
JUMPTO
CTEST

:PRINT CSR MAP

: ADD
CSRBMP

JMP

@4,5P
NXTCSR

BCC L21

L2l:ss3333

UNTIL RO EQ @40

TST

0527

SEQ 0124

BEQ 22%

MOV RS,TOTCSRS
JMP CTEST

;FIX STACK POINTER FOR NON-EXISTANT CSR TRAP

:GO ON TO NEXT CSR

CVMJABO MSV11-J MEMORY DIAG.
BIT TEST OF ALL CSR’'S

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 136

SEQ 0125

5690 006122

CSRMAP: SUBTST

<<PRINT CSR REGISTER MAP>>

;sSUBTEST

PRINT CSR REGISTER MAP

180888888404 4888880888848808800008088808080R808880800800808
0400000000000 0000000
;888888888888 80488888888440088000800800840048880040048040800880000000000000000000

2R3EEEE &
s
e fn

704 006172
705 006174
006174

5706 006202
006202
5707 006206
006206
5708 006206
5709

12
1:

006222
;710 0062

5712
sn

34
006234

5714 006242
006242

S716

066134

000011

110237

000007
000060
066132

104401

066132

104401

066130

006252
5717 006252
006252

000020

104401

065614

.DSABL

CRF

1s:

TYPE

MSGO16

;PRINT CSR NUMBERS

CLR
REPEAT

:
:

MOV
CMP

R1,.R2
09.,.R2

:
:

ADD

@7.R2

,MSGO16
CRF

ADD

#60,R2

;:TYPE SINGLE SPACE

CRF

s
:

TYPE
MSGO09
TYPEIT
,MSGO09

; TYPE MEMTYPE

REPEAT

CRF

IF CSRINFOCRO) NE @0 ;IS CSR NONEXSISTANT?2??

000001

002462

000105

066132

IF #BITO SET.IN CSRINFO(RO)
MOVB
ELSE

000403
—

066132

MOVB

@'E,.MSGO1S ;IT IS A MSVil1-J

@'P,MSGO1S ;IT IS A MSV11i-L/P

4
[ 4

000040 ~066132

066132

END

MOVB &'

TYPE MSGO15

TYPEIT

CMP R1,916.
BNE B2
E2:333333

B3:3:33:3:

TST CSRINFO(RO)
BEQ L24

BIT #BITO,CSRINFO(RO)
BEQ L25
BR L26
L2S::33333
L26::35333:

ELSE

000403

104401

INC R1
UNTIL R1 EQ #16.

.DSABL

032760
001404
112737

112737

TYPE MSGO1S

002462

000120

;MAKE IT ASCII

MOVB R2,MSGO15

DSABL

B2:3:3333

;JUMP AROUND NEXT INSTRUCTION

TYPEIT
,MSGO1S
DSABL
CRF
TYPE MSGO14
TYPEIT
,MSGO14

005760
001414

112737

;PRINT TITLE

,MSGOO8

BPL

005201

020127
001356

MSG008

TYPEIT
DSABL

w
~3
o
]

uuun

~
4eegeey
¥y
3233292 32

5693 006130

TYPE

TYPEIT

071440

;:CLEAR CSR INFO POINTER

CLR

5691 006122
5692 00‘{%4
006124

,MSGO1S

BR L27
LB ss5535:
i
L27:3::5333
;:TYPE MEMORY TYPE

MACRO Y05.02

5722

0062

3753 008383 000000

Page 136-1

SEQ 0126

066130

CRF
.DSABL
TYPE MSGO14

TYPEIT

: TYPE SPACE

000002

onr 00,0020,

{POINT TO NEXT ENTRY

,MSGO14

TYPE
MSG129
TYPEIT
,MSG129

071542

000207

Monday 07-Oct-85 16:57

.DSABL

TRACE:

RETURN
.WORD

CRF

.
;

CMP RO, 040

BNE B3
E3:333833

MEMORY DIAG.

61375 MAP

C VMJABO MSV1l-J
PRINT CSR RE

MACRO Y05.02

Monday 07-Oct-85 16:57

3
§

SEQ 0127

<<READ AND WRITE ALL CSR BITS>>

SUBTST

Page 137

19888888828888888884888428888888888888888888888880080805
0200000800000 000000000000

s #SUBTEST

READ AND WRITE ALL CSR BITS

1888888888888 82848828082888808088888A58840880
2088000000000 0000000000800 08000000 0

THIS ROUTINE “"RWCSR” CHECK TO SEE THAT THE CSR CAN BEWRITTEN ON CORRECTLY
BY WRITING AND CHECKING FOR THE FOLLOWING PATTERNS:
1

- -

3-SHIFTING A ONE THROUGH A FIELD OF ZEROS

8
8883333333388
edecaesrreiascs 0050

: geazzazzss

4-SHIFTING A ZEROS THROUGH A FIELD OF ONES

5738

739

740

5741

5743 006

010446
010546
013746

5747

002152

010337

002034

032760
001403

000001

012705

017740

3749
373
5753

3
74
74

5754 006404
006404
10
3
7
757

LET ADDRESS := R3
002462

12
006420
006420

5758 006420

MOV UIPARO, -(SP)

:GET CSR NUMBER FOR POSSIBLE ERROR

MOV RO,RS

177777
002322

:= $017740

LET RS

:= 90700322

END

002322

005037

002044

010437

002150
000010

002462

MOV RS.CSRNO
MOV

LET CSR1S

;MASK FOR MSV11-L/P

:= 177777

1SET CSR1S TO ALL ONES

BR L32
L31:333333

MOV €070032.RS
L32:333333

LET (R3) := @0

;CLEAR BITS FOR GOOD DATA
10-ccer >CSR

LET R4 := (R3)

;MASK OUT UNWANTED BITS

BIC RS5,.R4

LET CSR := R4

:BAD DATA=CSR

ERROR +35
BIC #BIT3,CSRINFO(RO)
END

;BIT SET ERROR
;CLEAR CSR OK BIT

LET (R3)

sONES--->(R3)

:= CSR1S

MOV #177777,.CSR1S

CLR (R3)

MOV (R3).R4

;D0 WE HAVE A CORRECT READ

:GOOD DATA=0'S

:GET BIT MASKS FOR

MOV #017740,.RS

BIC RS,CSR1S

LET GOOD := @0

R3,ADDRESS

BIT #B8ITO,CSRINFOCRO)
BEQ L31

;MASK FOR MSV11-J

IF R4 NE #0

005704
001410

1GET ADDRESS FOR POSSIBLE ERROR

;IT IS A MSV11-L/P

ELSE

070032

IF #BITO SET.IN CSRINFOCRO) ;WHAT KIND OF MEMORY IS THIS???
LET RS

011304
040504

624033
2760

:= RO

LET CSRNO := RS

005013

gigffiifiii

5750

LET RS

000402

012737
040537

;SAVE R4,RS, AND UIPARO ON STACK

ASR RS

010537

012705

PUSH R4 ,RS,UIPARO

MOV RS, -(SP)

177640

€10005
006205

w
~
&
w

5744 006

‘UCSR:

TST R4

BEQ L33
CLR GOOD

MOV R4 ,CSR

L33:3:53343

013713

002322

043573
083411
013737

002322

010437
04010
2760

002150
000010

002462

002264

012737

177777

MASK OUT CORRECT FIELD

CLR

JCLEAR OUT CSR

(R3)

023727
001003

002264

012702

000001

'WAS PATTERN WRITTEN CORRECTLY?

cre Ra.CSR1S

ET CSR := R4
=

ERROR +10

BAD DATA=CSR

S,
MOV R4,CSR

BIT CLEAR ERROR

oo I 981T3,CSRINFOCRO) ;CLEAR CSR OK BIT

REPEAT

SET UP LOOP COUNTER

Loliitisis
CLR PASFLG

IREPEAT WITH A FIELD OF 1S THROUGH 0'S
'

§ thkdleH 1°s

INC PASFLG
e DIPARS := 0.1

: INCREMENT LOOP
C
LUNERUSER PARCFOR BIT COUNTER

IF PASFLG EQ 01

JPASS 1

LET R2 := 01

ELSE
LET R2 := 0177776

177776

MOV (R3).R4

;GOOD DATA = ALL LEGAL BITS SET IN CSR

000402

MOV CSR1S,(R3)

LET GOOD : CSR1S

LET PASFLG := 00

177640

SEQ o128

LET R4 := (RS)

IF R4 NE CSR1S

002264

005237

012702

Page 137-1

BIC RS.R4

002322

005037

Mondsy 07-Oct-85 16:57

END

REPEAT

Cre PASFLG.
01

aleanis >FIELD OF ZEROS

MOV #1.R2

:PASS 2
30----- >FIELD OF ONES

100 BITS 0-4 AND 13-15

MOV @-1,UIPARO

8R L36

L3S:::5:53:3

MOV #177776.R2

L36:::::33

INC UIPARO
s INCREMENT BIT POINTER
IFCPRSFLE EQ 01 AND' 88110 OFF.IN CSRINFOCRO) ;

I ERRE

Cre PASFLG01
.

L37

BIT HSITO.CSRINFOCRO)

Emnc #8IT14,R2

;IF THIS IS PASS 1 ON A MSV11-L/P,.CLEAR BIT 14
3

IF PASFLG EQ #2 AND #BITO OFF.IN CSRI'FO(RO) a”““'

CMP PASFLG,#2
BNE L4O

BIT L“‘%TO.CSIWO(RO)

002462

E'.’llti 08IT14:!BIT2,R2

;IF THIS IS PASS 2 ON A MSV11-L/P, CLEAR ECRSRD BIT AND

LET (R3) := R2

tWRITE DATA

L40:;:3:53353

MOV R2,(R3)

—

006420
5759 006424
0064

MACRO Y05.02

-J MEMORY DIAG.

READ ANO WHITE
ALL CSR BITS

CSR 8ITS
CSi
RERD Ak WHTEALL

Y DIAG.

MACRO Y05.02

188 Sesics

BIC RS.R
LET R4 -- (R3)

790
006606 sl
91

5792
€
37"
57”

BIC RS.R4
IF R1 NE R4

010437

ERROR +35

000401

197
00

104010

ELSE

me’m +10

:GET GOOD DATA
1GET DATA THAT IS READ

MOV R2,.R1
MOV (R3).R4

;MASK OUT CSR BITS
;IS DATA CORRECT?77?

m ui

IF PASFLG EQ @1

3727
1002
006302

ASL

ELSE

000402

SEC

000261
006102

ROL R2

BNE L&2

;BIT SET ERROR

;PASS 2

;BIT CLEAR ERROR

muc @BIT3,CSRINFOCRO) ;CLEAR CSR OK BIT

042760

GET GOOD DATA AND MASK IT OUT

-e
LET CSR:= R4 'GET GOOD DATA
IF PASFLG EQ @1 'SELECT
ERROR DEPENDING ON PASS W
v 01
'
CHP PASFLG,

010137

o5
oo

;

SEQ 0129

LET GOOD:= R1 ;BAD DATA = CSR CONTENTS

795
0G

798

Paege 137-2

LET
R1 := R2

5787 006600

Monday 07-0Oct-85 16:57

:GET DATA FOR NEXT LOOP

BR L43
L&82:5:5333

L83:;::5:33

L&81l::333:3
CHP PASFLG,#1
BNE L44

;SHIFT 1 ACROSS 0'S

1SET CARRY

BR LAS
L84:;;:;5:3:

sROTATE A O ACROSS A FIELD OF ONES
H

177640

000017

UNTIL VIPARO EQ #15.

UNTIL PASFLG EQ @2

3727

1267

L8S:5553:3
;UNTIL ALL BITS ARE DONE

g: .UgPMO.QIS.

;DONE WITH 2 PASSES

O“’ :‘ASFLG.O‘&
€4,

IF @BITO SET.IN CSRINFOCRO) THEN JUMPTO DONE ;IF MSVii-L/P DO ONE LAST MRITE

BIT 6817y, CSRINFOCRO)

032760
001
00013

0V6766

012713

140005

011302
042702

LET (R3) := #140005
LET R2 := (R3)

JMRITE ONES TO CSR WITH Ecohid'8it enaeLen
READ CSR FOR CORRECT BITS
W .
SI0)

037772

020227

140005

BIC #37772,R2
IF R2 NE $140005

JCLEAR UNMANTED BITS
1UAS WRITE CORRECT

MOV (RS).R2

CMP R2, 0140005

mv”éam 8%

se1e S08743 012737

MACRO Y05.02

001411

se15

5821

140005
002150
000010

005013
177640

000

002044

Monday 07-Oct-85 16:57

Pege 137-3

LET GOOD := #140005

;GOOD DATA

LET CSR := R2

1BAD DATA

SEQ 0130

BEQ LS1
MOV #140005,G00D
MOV R2,.CSR

+BIT CLEAR ERROR
ERROR +10
BIC #BIT3,CSRINFOCRO) ;CLEAR CSR OK BIT!

END

LET (R3) := 0

sCLEAR OUT CSR

POP UIPARO,.RS,.R4

;RESTORE UIPARO,R4, AND RS

RETURN

LS1:338331

CLR (R3)
m (SP no

nov

V}}éJm gnfi.

Sc"'.‘a’%"i‘n

007002 104424

7 007004

007012
007
007
007032
007
00704
007
007
007
007
007
007
007070
007072
00707
oovozs
0071
s oonos
007110
007112
007
9 007

012737

012737
012701
0 73
012737
37
013703

333‘

MACRO Y05.02

177777

002532

002000 172350
002412
100000 002412
100002 002414
002152
002224

103407
700 000002
010037 002152
005703
001465
767
€00240
ooo;u

LTEST: CACHOFF
MOV

as:

14:

032760

000001

002462

01277

1; 000002

012760
012771
012771
012760
1
oggoa
032760
001003
704
100412
720
ogoao
g‘gcav
704
012702
30 7
010037

172100 S$:
xgug 000000
123456
000002
172100
64:
172100

001014
052760 000004 172100
012771 uuss 000000

104
ouvn
05
727
75 007274 00 u;
76 007 76 oo%;s
av 007
0127%7
78 00731
007310

104401

Page 139

s€q 0131

s THE FOLLOWING ROUTINE DETERMINES WHICH CSR CONTROLS PROGRAM SPACE

;iao ogu%“ 2100

007142
7150
7156
7164
007172
717
007
9 3373}
7212
007214
7216
7
7
007
007
007
007
007242
007
71 007
72 007
73 007
74 007

Monday 07-0Oct-85 16:57

000001 002462
177773
177700
000040

002532
0V0000 000000
000000 000002
002532 177777

007320

001000 172350
071334

78:

8s:
38:

MOV
MOV
MOV
MOV
CLR
CLR
MOV
NOP
ASL
BCS
ADD
MOV
TST
8EQ
B8R
NOP
cLC
BIT
BNE
8IS
MOV
MOV

MOV
MOV
MOV
MOV
ST
MOV
BIT
BNE
TST
8MI
8R
NOP
ASH
8IC
MOV

cHP
BNE
MOV

NOP
CLRCSR
MOV
MOV
cHP
8EQ
JMP
FINTS: MOV
TYPE
T;;E.LIT

0177777 PGMCSR

oresrioo
©100000, esuoo

imu

:SET UP MAP REGISTER

:CLEAR CSR COUNTER
;0BTAIN CSR MAP

:DEBUG AID
:PUT HIGH ORDER BIT INTO C BIT
:BRANCH IF CSR EXISTS
{UPDATE CSR COUNTER

2%
02.R0O
RO.CSRNO
R3
3%
as
#8IT0,CSRINFOCRO)

S$
#81T2,CSRADD(RO)
0123456 ,8(R1)
nzuso 82(R1)

ADDCRO)

oo.csnoo(ao)
0123456, 3(R1)
oxz.uss 82(R1)
20006 , CSRADD(RO)
o( 1)
CSRADDCRO) . R4
#81T0,CSRINFOCRO)
74
R4
8
1s
°-5.Re
o+C77,Ra
040,R2

R2.Re
14
RO, PGMCSR
00,8(R1)
#0.82(R1)
PGMCSR, 0177777
FINTS
CLRMEM
01000, KIPARS
MSG126
ézfscxzs

;IS MAP EMPTY?

:BRANCH IF SO
:DEBUG AID
;CLEARCARRY
:IS THIS PARITY MEMORY?
:BRACH IF NOT
:SET WRITE WRONG PARITY
;WRITE DATA

;RESTORE CSR

;CLEAR THE CSR UNDER TEST
{WRITE DATA
:SET DIAG CHECK MODE
;MRITE CHECKBITS TO CSR
;MRITE CSR 10 R4
sPARITY MEMORY?
;BRANCH IF NOT
:PARITY ERROR?
;BRACH IF SO
:TRY NEXT CSR
:DEBUG AID
;LOAD IN CORRECT CHECK BITS FOR MSV11-J

:CORRECT cuscxonsr
:BRANCH

:DEBUG AID
;CLEAR ALL CSR'S
:RESTORE TEST LOCATIONS
;IF PROGRAM CSR NOT FOUND GO TO FINT
:GO TO SIZING ROUTINE IF FOUND
;
:ERROR - PROGRAM CSR NOT FOUND'!

CVMJAB0 MSV11-J MEMORY DIAG.
READ AND WRITE ALL CSR BITS

005037

002532

5881 007320

Mondey 07-0Oct-85 16:57

Page 139-1

SEQ 0132

:SET TO DEFAULY OF 0

CLR

PGMCSR

SUBTST

<<CLEAR ALL MEMORY SPACE FROM BANK 2 ON>>

1908 8 8 840 88800088480008808088000888088888800080800802400808028080000000000000000

1 #SUBTEST

CLEAR ALL MEMORY SPACE FROM BANK 2 ON

| 0880885880888 8828008808028002880800000802020080888080004808000880000000308080000000000000

AND

&umv tms

uTNIS ROUTINE CLEARS ALL MEMORY SPACE BEGINNING AT ADDRESS 200

+CONTINUES UNTIL THERE IS NO vtnonv LEFT. IT SHOULD CLEAR ANY
IN
;CREATED BY THE LAST ROUTINE, AND CLEAN UP ANY JUNK LEFT MANGING AROUND

sHIGHER MEMORY.

CLRMEM: SET4

007430

005037
012737
12737
01270
020

006304
000001
002000
100000

002076
172350

177777

006304

117776

1s:

172350
172350

034002
000005

177766

004064

101¢:

;R1 MAPS TO KIPAR4
sWHOLE 16K BANK DONE?

;E0B_FLAG SET?

:CLEAR CMTENTS €& INCREMENT

§%8

;GO TO NEXT BANK IF SO
9200 ,KIPARS4
€177600,KIPARS

CLREX

TRACE
:%00000 Rl

eTIMEOUT,4

1018
CPUERR

.DSABL

:SET MAP FOR NEXT BANK

AT THE PERPHERIAL PAGE

;CLEAR NEXT BANK

TRACE

CLR
RES4
MOV

006304

; IGNORE PARITY ERRORS
:SET UP MAP TO START AT BANK 2

TST

CLR

CLREX:

2100000,R1
m 0117776

CLR

BEQ

006304
100000

TRACE
€1 ,NOPAR
92000,KIPARS

sNONEM TRAPS GO TO CLREX

;KEEP _GOING IF NOT
sUSE TRACE FLAG TO FLAG END OF BANK

177600

28:

OCLREX
OCLREY . 4
CRF

MOV

38%%

006304
000200

MOV
.DSABL
CLR

#3238

012737

(=]

5879 007314

MACRO Y05.02

05,PROTYP

CRF

;IS THIS AN 11/83/84 ?
:BRANCH IF NCT
:CLEAR OUT THE CPU ERROR REGISTER BITS
;THAT A EXPECTED TRAP COULD HAVE SET

CVMJABO MSV11-J MEMORY DIAG

MACRO Y05.02

cua ALL MEMORY SPACE FROM BANK
2 ON

ANA2:

S911 007460

Mondsy 07-Oct-85 16:57

SUBTST

SEQ 0133

<<MATCH ALL CSR'S WITH MEMORY>>

30..‘.".‘.....“"....0..0.......0‘.‘...‘.‘.‘.“‘......‘.‘....0.‘.....‘.....‘.‘

1 #SUBTEST

MATCH ALL CSR'S WITH MEMORY

|“.‘.....‘.‘..0..‘...“...‘0‘.0‘...‘.‘0...0...“.‘.........‘.““.“..........‘

591
91
914
915

;¢ THE SECOND PART OF THE ANALYSIS MATCHES UP THE CSR'S WMITH THE MEMORY, AND
;¢ INSTALLS ALL THE INFORMATION FOUND IN THE CONFIGURATION TABLE. FOR ECC,
;¢ THIS IS DONE BY TAKING EACH CSR FOUND IN THE PREVIOUS sscuou s:unt ALLY
;¢ AND CHECKING THROUGH
ALL OF MEMORY, ONE BANK AT AT TIME, TO SEE WHICHM BANKS

916
17

Page 142

;¢
RESPOND TO THE CSR IN QUESTION. THE FIRST oouLe WORD m\xaIN EACH BANX IS
:# WRITTEN WITH DATA AND DIAGNOSTIC cuzcx MODE SET IN THE CSR AND ARE CMECKED

g:t.

;¢ FOR EACH BANK THROUGH USE OF TESTADD AND

KERNEL INSTMTIO‘ PAGE ADDRESS
;¢ REGISTERS 4 AND S. IF WE GET THE PROPER CHECKBITS BACK

s¢
IF NOT, THE ROUTINE CHECKS FOR SINGLE OR DOUBLE BIT mioas
;¢ IF ONE OR THE OTHER IS FOUND, THE Eaaoa ADDRESS IS CHE

;

;¢ TO SEE IF IT IS THAT BANK,

IF IT IS, WE HAVE A MATCH.

n THE END OF EACH

;& BANK PASS, FOR EACH CSR PASS, THE PROGRAM COMES UP WITH A NUMBER, STORED IN

;¢ "I", WHICH DENOTES THE FOLLOWING:

MEMORY DESCRIPTION

eesesssscsccssasemeee

i
i
i

0
1
2

NON-EXISTANT MEMORY
MSV11-L/P MEMORY
MSV11-J MEMORY

NOTE THAT PARITY MEMORY WRITES WRONG PARITY TO THE DOUBLE WORDS. THEN LOOKS
FOR THE PARITY ERROR BIT TO BE SET.
IF THE BIT IS SET, WE HAVE A MATCH.
012737

010532

005037
01270

002314

SET4
MOV

01008
01008 .4

CRF
CHECK
STESTADD,R1
TOTCSRS,R3

01370

RO
RS

NO2281T
ti:sm.om
002556

74:

:}71.usnm<

LASTBANK , R2
R2
9. .R2

.
X

172350
172352

,.§§,

5962 007614

3.|issruocx

ENDFLG

sCLEAR CHECK
:SET UP THE VIRTUAL ADDR. POINTER
;MOVE CSR MAP INTO R3
sCLEAR THE CSR POINTER
:CLEM THE PROGRAM CSR STATUS POINTER
;00 WE HAVE 22 BIT ADDRESSING
?
;BRANCH IF ME

s ADJUST LlST.LOCK INDICATOR FOR 124K MACHINE

$BRANCH WER NEXT PIECE OF CODE
lIS TICRE Q@-BUS MEMORY ABOVE 177760007
1BRANCH
IF NOT
:SET UP A NEW LAST BLOCK INDICATOR

sR2 IS INDEX FOR CONFIG TABLE
;:CLEAR END OF MEMORY FLAG
:SET KIPAR4 FOR BANK 1

1
:SET KIPARS FOR BANK

:DOES mxs CSR EXISTT

IF IT DOES EXIST
:BRANCH
:INCREMENT THE CSR POINTER
tSTflE IT IN CSRNO ALSO

2388
Sad

18:

:NE MEMORY TRAPS GO TO 100¢

012737

172350

24
21000,KIPARS

;:ARE THERE ANY MORE CSR'S TO DO?

:nmcn IF ALL CSRS NOT DONE
;RESTORE KIPAR4

-J MEMORY DIAG.

RATE
ALL CSR'3
N WITH MEMORY

001200
002574
010542

5963 007
5964 0076
5965 007634
00 7640
97 007“4

MACRO Y05.02

172352

002152

100000
120002

000040

134:

002412 45%:

002414
002664

010430
002452

438
as:

000000

002452

000000

000002

343:

3383
S
&
NBWN-O

838858

002150
002434
000002

002462

010430

177773
177700

000040
0V2316

MOV

ss'cnorr

MOV

MOV
BIT
BEQ
JHP

CLR
ST
INC

BIT
BNE
BIS
MOV
MOV
CLR

a1s:

MOV
MOV
JMP

PUSH

002462
172100
000000
000002

000001

Monday 07-"ct-85 16:57

002316

774:

010256

RO, CSRNO

oeno CSRINFOCRO)
umz CSRADD(RO)
0123456, a(R1)
0123456, 82(R1)
CSRADDCRO)

B8R
414
MOV
0123456, 3(R1)
MOV
0123456, 82(R1)
CLR1CSR
CB1CSR
NOP
TST
a(R1)
READCSR
NOP
MOV
CSR.R4
NO
MOV
R4, TEMP
CLR1CSR
POP
82(R1),8(R1)

BIT

42s:

Page 142-1

BNE
ST
8MI
JMP
ASH
BIC

MOV
NOP
cHP
NOP
BEQ
JHP
]

SEQ 0134

;RESTORE KIPARS
.u:stoae STACK
1P TO_SUBAAS IF ALL CSR'S ARE DONE

MAKE sule CSRNO IS UPDATED
iTURN THE CACHME OFF

+SET UP VIRTUAL ADORESS TO KIPAR4
:SET UP vxnuu ADCRESS TO KIPARS
:IS THISA BANK TO SKIP ECC/LOGIC TESTS?
iNO- BRANCH 'cxr
AROUND
INSTRUCTION
iYES - GO TO END OF
;CLEAR THE MEMORY cowmuuuou COUNTER
;TEST TO SEE THAT THERE IS MEMORY PRESENT
:MEMORY PRESENT
:SAVE THE LOCATIONS UNDER TEST

MOV 8(R1),-(SP)

MOV 82(R1).-(SP)

;IS THIS PARITY MEMORY?
iNO - BRANCH
:SET WRITE WRONG PARITY
:SET THE FIRST LOCATION UNDER TEST
:SET THE SECOND LUT
;CLEAR THE CSR

s TEST LOCATIONS
;SET THE FIRST LOCATION UNDER TEST
:SET THE SECOND LUT
;RESET CSR
;SET DIAG. CHECK MODE IN CSR UNDER TEST
;DEBUG AID
;READ THE FIRST LUT m uure CKBITS. INTO CSR
:READ THE CSR UNDERT
:DEBUG AID
:GET me cuscxans FROM THE CSR
:DEBUG
A
: SAVE xu rem FOR LATER
:RESET CSR
:RESTORE LOCATIONS UNDER TEST

98IT0,CSRINFOCRO)

:IS THIS PARITY MEMORY?

o+C77,.R4

sINTO A USABLE FORM.

423
R4
25
68
©-5.R4

040,CBITS
CBITS.R4

254
224

:NO- BRANCH
iDID WE GET A PARITY ERROR?
:YES - FILL IN courxc TABLE
iNO- JUMP TO END OF BANK
MANIPULATE THE CSR BITS

1MSV11-J CHECK BITS
:DEBBUGGING AIDE
;D0 THE cr:cxsns COMPARE TO WHAT WAS WRITTEN?
:DEBBUG
A
:BRANCH xr rnen: IS A MATCH
;ELSE BRANCH IF NOT THE SAME

;¢ WE COME HERE IF THERE IS A MATCH

254

MOV

NOP

RO,R4

MOV (SP)+,82(R1)
MOV (<®)..8(R1)

;GET THE CSR NUMBER
:

C VMJABO CS‘.J MEMORY DIAG.
WITH MEMORY

MATCH ALL

6016 010122

000304
042704
050462
016004
042704
000304
050462

MACRO Y05.02

Mondey 07-Oct-85 16:57

ASR

170377
002664
002462

15%:

177770

SEQ 0135

+SET IT UP FOR USE IN THE

SWAB
BIC

R4
9170377,R4

;CONFIGURATION TABLE.
;CLEAR OFF EXTRANEOUS BITS

MOV
BIC
SWAB

CSRINFOCRO),R4

:GET MEMORY TYPE
iCLEAR OFF THE EXTRANEOUS BITS
;MOVE INTO PROPER POSITION

8IS

BIS

002666

Pege 142-2

R4, CONFIG(R2)
ovc7 R4

m.courxc.z(ae)

iPUT CSR NUMBER IN CONFIG. TABLE
;SET IT INTO THE CONFIG TABLE

;& THIS SECTION IS EXECUTED ONLY WHEN THE BANK=1
i ®

001000

172350

244%:

010430
100020

002434

304%:

002434
177767
000001

012737

Og 737

053737
000240
000465

000001
002666

002664

177777

002450
002664
002666

002670
002672

10¢:

cHP

€1000,.KIPARAS

8EQ
JHP
BIT
BEQ
MOV
ASH
cHP
8GT
8IS
INCB
SET
BIS

304
1
0BIT15!BIT4, TEMP
104
TEMP R4
©-9..R4
u R4
ooxro CONFIG(R2)
CONFIG+2(R2)
CONFGERROR
CONFIG+4,CONFIG

BIS
NOP
.

CONFIG+6,CONFIG+2

:IS THIS BANK
1 ?

:BRANCH IF TRUE
;ELSE JUMP TO END OF THIS BANK
i{WAS THERE A SBE OR DBE?
:BRANCH IF NOT
i1GET CSR CONTENTS
:MAKE ERROR ADDRESS INTO BANK @
;ERROR IN BANKS O OR 1?7
:BRANCH IF NOT
:SET ERROR FLAG IN CONFIG TABLE
;ADD ONE TO BANK ERROR COUNT
:PRINT CONFIG TABLE
MOV
@-1,CONFGERROR
:SET UP INFORMATION IN BANK ZERO
;DEBUG AID
:BRANCH

:0 IF CHECKBITS DID NOT MATCH, WE COME HERE
1

032737
001001
000460
013704
042764

010046
010146
016401

072127

042701
052764
016400
042764
042700
006300
006300
060001
010104

010374

012601
012600
072427
020437
001001
000403

100020
002152

000006

002150

22%:

177773

177037

172100

27%:

000005
172350

:SBE OR DBE FLAGS SET?

CSRNO, R4

:GET CSRNO

84
64

BIC

96, CSRADD(R4 )

:BRANCH IF TRUE
sCNECK T0 SEE IF IT IS MSV11-J

xTURN OFF DIAG CHECK & ECC DISABLE

PUSH

RO.R1

:SAVE RO & R1

MOV
ASH

csaaoo(as) R1
#-5,R

;GET CSR INFORMATION
:SET UP ERROR ADDRESS

MOV
BIC
8IC
ASL
ASL
ADD
MOV
POP

CSRADD(R4),RO
981714, CSRADD(R4)
#tC740.R0
RO
RO
RO,R1
R1.R4
R1.RO

ASH

#5.R4

;SET ERROR ADDRESS UP IN PAR uonixon

354

:YES - MARK INFO IN CONFIG TABLE

BIC
8IS

172100

#BIT15!8174,CSR

BNE
BR

MOV

172100

172100
177600
040000
172100
040000

BIT

cHP
BNE

ncrn R1
BIT14 csnmo(an

R4 .KIPAR4
284

MOV RO, -(SP)
MOV R1.-(SP)

:GET EXTENDED ERROR ADDRESS BITS

{READ FROM CSR
:TURN OFF EQB BIT
:SET UP EXTENDED BITS

;SET UP TOTAL ERROR ADDRESS
;SAVE IN R4

;RESTORE RO & R1

MOV (SP)s.

MOV (SP)e

:DOES IT EQUAL KIPAR4?
:BRANCH IF FALSE

CVHMJABO MSV1 -J MEMORY DIAG.

'S WITH MEMORY

MATCH ALL C

MACRO Y05.02

172352

28%:

002666
i
s
b

35%:

177777

010116

002450

Monday 07-Oct-85 16:57

#81T70,CONFIG(R2)

CONFIG+2(R2)
CONFGERROR

254

:YES - MARK INFO IN CONFIG TABLE

R4 ,KIPARS
63

INCB
SET

JHP
L

SEQ 0136

;DOES IT _EQUAL KIPARS?
:BRANCH IF FALSE
ISEY BANK ERROR FLAG
: INCREMENT BANK ERROR COUNTER
:PRINT CONFIG TABLE

cHP
BNE
BIS

Page 142-3

MOV_

#-1,CONFGERROR

;#END OF BANK ROUTINE
i *

64:

002564
001000

172350
177000

e
o

DN
O

177777
007650

062700

70%:

;CLEAR THE CSR UNDER TEST

;ARE WE AT TOP OF MEMORY?

TST

ENDFLG

ADD
MOV
CMP
BNE
SET

#1000,KIPAR4
KIPAR4 ,KIPARS
#177000,KIPARS
704
ENDFLG

IIF SO THEN EXIT
:UPDATE CONFIGURATION POINTER
;UPDATE KIPAR4 TO NEXT BANK
:AND UPDATE KIPAR4
;ARE WE AT BANK 177
:BRANCH IF NOT
sWERE AT LAST BANK

JMP

454

BNE
ADD

172350
172352
172350

172350

CLR1CSR

CcMP
BLOS
JMP
ADD

704
#4 ,R2

LASTBLOCK,KIPAR4
19%
45%
#2.R0

MOV

;HAVE WE DONE THE WHOLE MEMORY SPACE?
iR-C
;BRANCH IF DONE

007550

JMP

;JUMP IF NOT DONE
;sINCREMENT CSR POINTER
;DEBUG AID
;TURN ON THE CACHE
;JUMP TO TRY NEXT CSR

010430

ADD
JMP

@4 ,SP
64

sRESTORE STACK
:GO TO END OF BANK ROUTINE

007650

000002

19s:

NOP

CACHON

@-1,ENDFLG

iR-C
iR-C

-J MEMORY DIAG.
'S WITH MEMORY

MACRO Y05.02

Monday 07-Oct-85 16:57

SUBAAS: CACHON

104423
104472

ECCINIT

18 8 8 8 8484

NEWTST

Page 143

SEQ 0137

1MAKE SURE THE CACHE IS ON

s TRAP ON DOUBLE BIT ERRORS (NORMAL)

«<<TEST BANK O ACCESSES>>

884888880 8808888840088
R 04000 2R RN LR L 0050000000000 00 00000

TEST BANK O ACCESSES

JeTEST 2

'SINCE EVERY LOCATION IS EITHER LOADED OR WRITTEN INTO BY THE PROGRAM

e 3e
i32282 -53 e e £3
§§§3§ pw§§nn

'PRIOR TO THIS POINT - THEN A PARITY ERROR IMPLIES THAT THERE IS
A

os NOEN

000000

-0

lu:rauwnnu»-nwOV
NOVMAWN

{IF IT GETS ANY PARITY TRAPS.

000000

Y
Y- X
T

ks o

P
[

383WEeqR2

iHARDWARE FAILURE IN THE MEMORY.

Y. Y

'THIS DOES A “TST* INSTRUCTION ON EVERY LOCATION IN BANK @0 TO SEE

L Yy

%;;5‘...;6;;...‘.‘.“........‘.‘.‘.“...‘......“‘.........‘...‘........“.“‘.

gesan
e

002072

012737

002070
000001

012737

033736

005000
012701

040000

104424
005720

077102

005737

002070

005237
104004

b
P

Clgg oiggis 00140¢
162737

00000

002064

005237
104003

010656

010664

MOV
SET4
MOV
.DSABL
CLR
gg

ggoz;

:SEE IF I CAN DO A READ ACCESS WITHOUT A PARITY TRAP|

MOV
CACHOFF

CACHON
sSEE IF ANY FAILURES
1ST
PARCNT
BEQ
FY)
FATAL
3
INC
FATAL $
ERROR

.DSABL

CRF

002064

NEMCNT
34
:2.ADDRESS
FATALS

053737

002106

002664

3%:

.DSABL
BIS

CRF
CPUBIT,CONFIG

012737

034002
000005

000004
004064
-

MOV
cMP
BNE
CLR

OTIMEOUT,4
#5,PROTYP
101
CPUERR

OO&OO&
005037

000002

177766

2s:
002034

\CLEAR PARITY ERROR COUNTER

;SET THE NO PARITY ERROR FLAG
:CLEAR NON-EXISTANT MEMORY ERROR COUNTER
:SET THE NON-EXISTANT MEMORY ERROR MODE TO COUNT

1sT
?fiu
INC

2737

6128

PARCNT

#1,NOPAR
NEMCNT
@1, NONEM
ONONEXIST
ONONEXIST,4
CRF
RO
@SIZE,R1

104423
002072

61
612

002076
002100
000004
18:

005737
001403

THESE ERRORS ARE COUNTED AND A FATAL ACTION IS TAKEN

BEQ

ERROR

RES4

DSABL

CRF

:TRAPS TO 4 GOTO NONEXIST

:TURN CACHE OFF

:TURN CACHE ON
s ANY mmv ERRORS?
:NO - SKI
:SET FATAL INDICATOR

sANY NON-EXISTANT MEMORY (HOLES)?
:SKIP IF EQUAL
;UPDATE 1ST ADDRESS FAILURE FROM AUTO INCREMENT @
:SET FATAL INDICATOR
;SET CORRECT ACCESSED BIT ON BANK O

;RESET TRAPS TO 4 TO DEFAULT

;IS THIS AN 11/83/84 ?
;BRANCH IF NOT
:CLEAR OUT THE CPU ERROR REGISTER BITS
;THAT A EXPECTED TRAP COULD HAVE SET

GUMIABO MVILJ MEMORY OIAC.

MACRO Y05.02 Mondey 07-Oct-85 16:57 Page 143-1
SUBTST

6129 010706

SEQ 0138

<<ENABLE ECC FOR CORRECT TRAPS>>

1880488488488 8888888488888888858800088
8040088004800 488000808000000000000000000000

;#SUBTEST

ENABLE ECC FOR CORRECT TRAPS

1888888484858 28888884400808088888088808880888808
000000000000 00880008400000000000

6130 010706
010706
010714

o S17

0107
0107
0{07
61;} 0107
0107
6134
01073
61

032777
003
737
01402

104506
000401

104472

000001

171722

IF @SWO SET.IN @SWR OR ACTFLAG IS TRUE

002350

BIT #SWO,B8SWR
BNE LS2

Lsa,.
ENASBE
ELSE

ECCINIT
END ;O0F IF &SWO

TST ACTFLAG

., BEQ LS3

:TRAP ON SINGLE BIT ERRORS
LS3:;

BR LS4
3

;TRAP ON DOUBLE BIT ERRORS (NORMAL)
LS8:::5::3

CVMJ

MSV11-J

MEMORY DIAG.

EW&OECC 300 C&ECY TRAPS

MACRO Y05.02

6137 010732
1

.
.
|

6138
6139

Monday 07-Oct-85 16:57

NEWTST

Pege 145

SEQ 0139

<<TEST BANKS 1-200 (OCTAL) FOR ZEROS & ONES>>

3.‘.‘.‘.‘..‘.".‘.‘....‘....“.‘..“““..“‘....‘.....‘...““‘“‘.‘.‘...‘.“.‘

;#TEST 3

TEST BANKS 1-200 (OCTAL) FOR ZEROS & ONES

2808888252058 8883384482328882888228088882490800588240000000 0200000000000 000ttt tas

1sT3:

010732 000004

SCOPE

{EACH BANK IS TESTED FOR EXISTANCE AND IF IT EXISTS
;THEN IT IS TESTED FOR ZEROS & ONES.

;EXCEPT -

6140

6141
6142
614

;

PROTECTED BANKS (WHERE THE PROGRAM IS) ARE ONLY TESTED BY
“TST* INSTRUCTIONS LIKE BANK €0
{ANY BAD BANKS ARE LOGGED IN THE CONFIGURATION TABLE.

6144

THIS ROUTINE IS ONLY DOING A SMART SIZE - NOT ACTUAL TESTING!

6145 010734 005037 002102
6146 010740 012737 000001 002076
6147 010746 012737
6148 010
010754

6149 0107

012737

CLR ~
ROV

002100

033736

000004

sen

02 .NONEM
ONONEXIST

:SET NO PARITY ERROR FLAG
:SET NON-EXISTANT MEMORY MODE TO EXIT TEST LOOP
:TRAPS TO 4 GOTO NONEXIST

MOV

OMTSTS+4, LINKL

sSET UP LINKS

MOV

012737 011506 002522

6150 0107
3 011510 002524
MOV
TAG9$: INC
002102
6151 010776
6152 011
ozs 37 002556 002102
CHP
6153 011010 ga
8LO
6154 011012 013701 002102
MOV
6155 °§1333
906301
ASL
6156 011
301
ASL
MOV
:1 011022 010137 002104
1 “i
o%gosv 002074
CLR
6159 011032
005037 002072
CLR
6160 011036
005037 002070
CLR
6161 011
MAP
ouoag 010346
MOV
011044 013703 002102
011050

004737

CALL

035604

011054 012603
“‘i oixog: 105761 002664

BANK
©1,NOPAR

SNONEXIST.4

OMTST3+6.LINK2
BANK
LASTBANK , BANK
TAG2$
BANK,R1
R1
R1
R1,BANKINDEX
PATERR
PARCNT
NEMCNT
BANK
BANK,R3

. .
TSTE CONFIG(R1)

100342
BHI
TSTBANK
012777 000207 171430 WARNL: MOV
0207,
SLINK1
RO
ormst
MOV
012700 060000
MOV
010004
oszze R1
MOV
012701 040000
01010
MOV
R1,R3
CLR
R2
104424
CACHOFF
TESTAREA
053737

002552

‘"‘ 011120

004737

011502

28:

005037

002102

TAG2¢:

6173 011124
6174 011126
6175 011130
6176 011132
6177 011134
6178 011140
011140
011146

104417
104423
00024
000416

177776

012737 034002 000004
022737 000005 004064

{BANK + 4

;CLEAR
PATTERN ERROR COUNTER
:CLEAR PARITY ERROR COUNTER

:CLEAR NON-EXISTANT MEMORY COUNTER (HOLES)
:MAP SUPERVISOR SPACE (TEST AREA) TO BANK

MOV RS, -(SP)

MAPPER

6163 011062
6164 ouogo
6165 011072
011076
6166
6167 011100
oug ouioo
6169 011106
6170 011110
6171 011112
011112

:DONE?

{YES - SKIP TO NEXT TEST

8IS

Eggmooe.psu

CALL

MTSTS

KERNEL
CACHON
NOP
B8R
TAG3$
CLR
BANK
RES4
MOV
OTIMEOUT,4
CHP
@5, PROTYP

;IS THIS BANK PROTECTED?

.,
MOV\') (SP)+.R3

:YES - GO TEST BANK SPECIAL
PUT “RETURN” INSTRUCTION AFTER WRITE ROUTINE
;DATA IS ZEROS
:TURN CACHE OFF
;ENTER SUPERVISOR MODE

GO TO SYSTEM TEST MODE

;ENTER KERNEL MODE
:TURN CACHE ON
:SKIP NEXT INSTRUCTION
;RESET TRAPS TO 4 TO DEFAULT
;IS THIS AN 11/83/84 ?

MEMORY DIAC,

VMJABO

fy o

011154

0111

011162

L X X-]

aanN

00000000000
000000000000
0000

P e s bt e e e (s b 8 P s e 0 b

NOO

OOO o

-t
et b

“n RSoaN Susuwme (-]

ok P

C
T Y -

R
gpwnnnwvnvnnnwnv
SKSER et sSEERRRERREAAN

§g5F A%
S3TRRR2N28I23R

ek ot ot ot et (o et ot

1176

saass

‘qh

61
6185

nnvnnnnnnnusasgeass 38388833

61.1

005037

WACRO 103,02

177766

toys,

005037

002076

00140
00067
104424

002070

053737

002552

005737
€010
737

002074

sies 000557
005737
11’3
1174

s et et Pt o

i1
6181

Mondey 07-Oct-85 16:57

R
00 T COETAL) FOR ZERDS& OMES
001002
BNE

TAGSS:

14:

004777 171310
104417
104423

177776

002072

001027
003787 002070
001024
012700 060000
010004
012701
01010

040000

012777

104424

000240

171230

CS3737

002552

177776

004737

011502

013700
005737

002104
002074

013702 002614

104417
104423
000240

001006

001406
052760

000001

002664

012737

177777

002450

002106
010776

ELR

NOPAR

002664

34:
4$:

145-1

;BRANCH IF NOT

SEQ 0140

ICLEAR OUT THE CPU ERROR REGISTER BITS
,THAT A EXPECTED TRAP COULD HAVE SET

BR
SUBAAI
TST
NEMCNT
BEQ@
18
BA
TAG9$
CACHOFF
TESTAREA

,INDICATE DEFAULT PARITY ACTION

CALL " SLINK2
KERNEL
CACHON
NOP

JFINISH PATTERN
{ENTER KERNEL MODE
i TURN CACHE ON

BNE
957
BNE
MOV
MOV

iYES - SKIP
IANY NON EXISTANT MEMORY
iYES - SKIP

BIS

TESTHODE.Psu

TST
BNE
TST

PATERR
28
PARCNT

Remont

28
OFIRST.RO
RO,R4

MOV
MOV

OSIiZE.R1
RI.RS

MOV

9000240,8LINK1

ONES,R2

BIS

IESTHODE.Psu

KERNEL
CACHON
NOP

GALL ~

MTST3

MOV
TST

BNE

BANKINDEX.RO
PATERR

BNE
TST

3%
NEMCNT

TST

002070

$760
000137

CPUERR

CACHOFF
TESTAREA

003787 002072
001003
737

1018

MOV

Pege

BEQ
BIS

SET

BIS
P

JANY TRAPS?

INO- SKIP
INOW - TRY NEXT BANK
iENTER
TURN CACHE
OFF MODE
SUPERVISOR

160 TO SYSTEM TEST MODE

iDEBUG AID

ANY PATTERN ERRORS
IYES - SKIP
PANY PARITY ERRORS

:DATA IS ONES

iPUT “NOP" INSTRUCTION BACK TN SUBROUTINE

ITURN
CACHE OFF
{ENTER TEST MODE

;60 TO SYSTEM TEST MODE

;00 IN MEMORY IF NOT

iENTER KERNEL MODE
i TURN CACHE ON
iDEBUG AID

.ANY PATTERN ERRORS?
iYES - SKIP

PARCNT

IANY PARITY ERRORS?

4§

INONE- SKIP

@BITO,CONFIGCRO)

CONFGERROR

CPUBIT.CONFIGCRO)
TAG9S

iYES - SKIP
iANY HOLES?

iSET ERROR BIT IN THIS BANK

iFORCE PRINTING OF CONFIGURATION TABLE
4SET ACCESSED BIT

1. CONFGERROR

TEST A PROTECTED BANK

010

012737 000001 002100

012700
060000
012701 020000

TSTBANK:PUSH

MOV

MOV
MOV

iasr
ao
20000, R1

MOV R1,-(SP)

:SET NON-EXISTANT MEMORY TO COUNT

MACRO_Y05.02 ozslfiy 07-0ct-85 16:57

c VMJABO MSY

758*

6225 01141

6226 01 14 12

200 (“1&) FOR ZEROS &

011412

053737

27 011420

005720
0771

10441

012737

002552

TESTAREA

177776

lIS
TSY

000002

S08
KERNEL
CACHON

MOV
POP

002100

012601

005737
001406

000001

012737

177777

BIS

SET

002450

077
000207

TESTMODE , PSW

CRF
(RO).

R1,.4%

#2 ,NONEM
R1

tENTEll TEST MODE
:GO TO SYSTEM TEST MODE

;ENTER KERNEL MODE
:TURN CACHE ON
;RESET NON-EXISTANT MEMORY TO EXIT TEST LOOP
MOV (SP)+,R1

@BITO,CONFIG(R1)

CONFGERROR

TST PARCNT

BIS

CPUBIT,CONFIG(R1)

END ;OF IF NEMCNT
MTST3:

3s:

MOV

TAG9$
R2,(RO)+
R1.MTST3

(R4)+,R1

R1,.R2

34
PATERR
R3,24

BEQ LSS

;ERROR BANK

MOV

#-1,CONFGERROR

LSS:s:3331

IF NEMCNT EQ @0

002106

002074

s TURN CACHE OFF

END ;OF IF PARCNT

002070

010776

SEQ 0141

IF PARCNT NE @0

002072

761

020103
st

Page 145-2

CACHOFF

104424

AgAEI2883T

TST NEMCNT
BNE LS6

;ACCESSED BANK

LS6::35333

;WRITE MEMORY TO PATTERN
:00 TILL DONE
:THIS IS EITHER A NOP OR RETURN
:READ DATA
:DOES IT MATCH ?

:IF NOT COUNT ERRORS

1ANY WAY DO ALL MEMORY

E.
. . .RETURN
sDON

CVMJUABO MSV11-J MEMORY DIAG
MACRO_Y05.02 M 07-0ct-85 16:57
T3
T!S BANKS1-200 (OCTAL) FOR mos & ONE

6251 011526

Page 146

SEQ 0142

SUBAAI: SUBTST

«<<FIND SHADOW INHMIBIT MODE POINTERS>>

18SUBTEST

FIND SHADOW INHIBIT MODE

1866588800606800000628880000088000080800000000000800000008000080008080000000000000
18 68 848 0 5884808888888888880888882884540088880828888008008888888382004200000000000800000

io THIS SECTION LOOKS FOR INTERLEAVED NSV1l.) MEMORIES AND FIGURESOUT
is WMERE
THE SHADOW INMIBIT MODE POINTERS ARE LOCATED. THESE ARE

glizzs
011882

003037
004737

015700

o1
0

1
1

6263

SPACE.
1o ARE THEN MARKED AS PROGRAM

002102
037760

CLR
SHADL1: CALL
MOV

002104

011376
8
011604
0{1‘“

000040
000020

TST INTFLAG

002102

760 000200 002664

cooso2

005237 002102

6263 011604 023737 002556 002102
011612

002347

BANKINDEX.RO

JRESET BANK TO ZERO
1SET BANK PARAMETERS

IF ACFLAG IS TRUE AND INTFLAG IS TRUE

003737
002136
001411
702
737

BANK
EXBANK

ADD
ADD

o 8IS

ING

940,R2
©20.BANK

#8117.CONFIG(RO)

8GE

IMAKE NEW BANK PROGRAM SPACE

B8R L60

LS7:35:5313

BANK

sGO TO NEXT BANK

LASTBANK,BANK

;HAVE ME DONE ALL THE BANKS?

END; OF IF ACFLAG

CMP

sPOINT TO BANKINDEX + 8
{POINT TO BANK + 16

8EQ LS7

SHADL1

L60:3533::

IBRANCH IF NOT

mv DIAG.

T MODE POINTER

vsucao Y05.02

Mondey 07-Oct-85 16:57

18 48 8 08 80 88488080884088888000888880888808008808088888808024880808043000000000000000

ECC INMIBIT MODE POINTER TEST

1«TEST 4

011614

SEQ 0143 |

<<ECC INMIBIT MODE POINTER TEST>>

NEWTST

6269 011614

Page 148

*uouooumuuouuoououoouo“ououo 88888888880 88008880800008800004000000

ST4:

000004

SCOPE

s THE NSVII J OR vrus-x INMIBIT ECC DISABLE AND ouaosuc CHECX
1ON THE
1 IS

T OR SECOND 16K WORDS C
A PROTECTED BANK BY THE

lWIfE COMPLEX TO DETERMINONE A
1BANKS CAN BE PROTECTED;

GIVEN SYSTEM

Cil

T MAY
CWIMTIN WHI

1S0

ITHIS ROUTINE ATTEMPS TO CREATE A DOUBLE BIT ERROR IN ADDRESS 0 & 2
10F EVERY ECC BANK. ECC HARDWARE WILL PREVENT THIS FROM HAPPENING
IIN PROTECTED BANKS WHICH SHOULD ALWAYS INCLUDE BANK ZERO- WHERE
1 THE PROGRAM IS.
[

1620

177777

16.2¢
1685

002102

'64°

002104

rtt
| 6 34

+Te . Rzf"v“< 333

90
I

~~~

002116

s
002152

002156

002152

002156

002122
000100
012036

CWIGOI(IO).RZ

:?'

:= #0 TO LASTBANK

IF SKIPMX IS FALSE

}

#-1,0L0CSR

IF MKFLAG IS TRUE

002120

Ffl BANK

MOV
OFIRST.R1
CALL EXBANK
BANKINDEX,RO
MOV
IF ACFLAG IS TRUE

0!7*‘0

002156

sMARNING: tee8t!
IN CASE OF HARDWARE FAILURE IT IS CW TMT A %fi BIT ERROR
&
DIAGNOSTIC
WILL BE CREATED
ON THE KERNEL STACK
YMMYCLWISTMTYWCMGETBFMAS
sDURING THIS ROUTINE.
ROUTINE BUT NOT PAST IT!
élHIS
:TURN CACHE OFF

002664

CLR BANK

/SET up ViRl AbOR poINTER
TST ACFLAG
BEQ L61
TST MKFLAG
BEQ L62
TST SKIPMKX
63

:SET INDEX co\ma‘L

m:u R2

csluo NEhg"
MOV

CSRNOD, OLDCSR

IF PFLAG IS FALSE

8IS @8IT6,CONFIG(RO)

END; OF IF PFLAG
CALL

IMPTEST

END; OF IF CSRNO

CMP CSRNO,OLDCSR
BEQ L64
TST PFLAG

BNE L65
L6S::5::1:
L68:5333513

$W~0 eéclim
J_MEMORY

1817

MACRO Y05.02

romea TEST

Mondey 07-Oct-85 16:57

6308 ou;gg

END; OF IF SKIPMK

6309 011
011
6310 °§‘

END; OF IF MKFLAG

011

0117
6311 011

011
011
011762

6312 o117
0117

37
023737
003723

002102
002102

€32777

000001

012014
008787
002350
8
001402

6313 012022 104506
6316 01

6317 0

6318 31

SEQ 0144
L63::3::311
L62::333:3

END; OF IF ACFLAG

s
END; OF FOR BANK

000401

104472

63.9 01
104423
6320
013333 000137
012260

L6l:ssssss

INC BANK
CMP BANK ,LASTBANK
BLE 86

002556

MAP

3&'3“
;33 000200
oufig 05 035604
011776
3
o;u 0
o&gv 002102
6314 0

Page 148-1

MOV
#200,R3
CALL MAPPER
.
CLR
BANK
170624

;MAP TEST SPACE ro B8

MOV (SP)+,R3

IF oSWO SET.IN @SWR OR ACTFLAG IS TRUE

ENASEBE

ELSE

ECCINIT

END; OF IF @SWO

CACHON
JHP
SUBAAR

BIT @SWO,@SWR

757
RCTFLAG
BEQ L67

;TRAP ON SINGLE BIT ERRORS
H

L67:3::3

BR L70

;TRAP ON DOUBLE BIT ERRORS (NORMAL)
s

L70:333:33

;TURN THE CACHE BACK ON

:JUMP OVER THE SUBROUTINE

;

CVMUABO MSV.i1-J MEMORY DIAG.

MACRO Y05.02

ECC INMIBIT MODE POINTER TEST

6322
6323 012040

ug e

;

102

sizee
37
0127

020000

002150

053737

002552

177776

MOV R3,

BANK ,R3

MOV
CALL
DSABL

P ~ o2RR8IFINN
s gt o 2o o S

HMAPPER
CRF

;ENTER TEST MODE
:GO TO SYSTEM TEST MODE

TESTMODE ,PSW
CRF
(R1)

sSAVE TEST LOCATION
MOV (R1),-(SP)
;INDEX_TO NEXT LOCATION
:SAVE TEST LOCATION

R3,R1
(R1)

ADD

MOV _(R1),-(SP)

;:DISABLE ECC & WRITE CHECKBITS FOR 1 CSR
:WRITE CHECKBITS (ALL ZEROS)

CHK1DIS
MOV
SuB
MOV
CLRI1CSR

;:CLEAR CSR
;READ CHECKBITS INTO REAL CSR
;WAS THERE A DOUBLE BIT ERROR

TST
(R1)
WAS1DBE

-(SP)

MOV (SP)+.R3

CLR

PUSH

000000000000

-X J

ON.NOERROR ;1

t33143

o g ——
s
= ps s 1

333333 §SEssareesy
58 &

o
o>

OO OCOCORRT
oo

iMAP SUPERVISOR SPACE (TEST AREA) TO BANX

MAP

010346

SEQ 0145

:THIS MAKES SURE THAT SBE'S DON'T LOOK LIKE PROTECTED AREAS

OO
COOPROOOR

Page 149

IMPTEST:CLR

005004

013703
004737

Mondey 07-Oct-85 16:57

002150
002614

023140

BCS L71

I?ITIS.CS&
MOV
CHK1
ONES, (R1)

;:DISABLE ECC € WRITE CHECKBITS FOR 1 CSR

ST
(R1)
WA S1DBE
ON.NOERROR

:WAS THERE A DOUBLE BIT ERROR

;CLEAR CSR

CLR1CSR

002150

BCS L72
;ENABLE CHECK/SYNDROME BIT REGISTER
;WRITE DBE'S IN C SR
:DISABLE ECC & WRITE CHECKBITS FOR 1 CSR

CBREG

MOV 0231‘0 +CSR
CHK1DT
MOV R4, (R1)

CLR1CSR

;:CLEAR CSR

TST (R1)
WAS

023604

:WAS THERE A DOUBLE BIT ERROR

CBRE G
MOV 023604,CSR
CHKIDIS
R4,(R1)
MOV
CLR1C
TS;
(R1)

002150

WAS1DBE

END ;OF ON.NOERROR ;3
END

;O0F ON.NOERROR

BCS L73
;ENABLE CHECK/SYNDROME BIT REGISIER
sWRITE DBE'S IN C SR
;DISABLE ECC € WRITE CHECKBITS FOR 1 CSR

;CLEAR CSR
;WAS THERE A DOUBLE BIT ERROR
L78:558333
L72:338333

MEMORY DIAG.
HVMJABO etMSV11-J
NI IBTT
MODE POINTERMACRO
TEST Y0S.02

Mondsy 07-Oct-85 16:57

6365 012212

END :OF ON.NOERROR ;1

6366 012212

ON. ERROR

[+]

012212
6367 013314

103001

ING

6368 912216

END :OF ON.ERROR

6369 012216 104471
€370 0
010411
6371 0
060301
6372 0
01041
0
104
6374 0
6375 0
00
6376 0
002664
002666
1
6377 0

6378 01
6379 0
01
6380 0
6381 01

6382
6383

0
0

6385 012260
01

ECC1DIS
MOV - Ra.(R1)
ADD
R3.R1
MOV
R&.CR1)
CLR1CSR
ST O RS
BEQ
18
8IS
RS,CONFIG(RO)
CONFIG+2(RO)
INCB

ERROR
POP

+36
(R1)

S8
POP

R3.R1
(Ri)

SUBAAR: SET

STOPOK

18:

012611
160301

01261

10441
000207
012737

KERNEL
RETURN
177777

002420

Page

- 149-1

SEQ 0146
L7833
8CC L74
L IDENTIFY AS BAD BANK
—

;DISABLE ERROR CORRECTION
JCLEAR OUT DOUBLE BIT ERROR!
INDEX TO SECOND WORD
iCLEAR OUT DOUBLE BIT ERROR!
H

;RESTORE TEST LOCATION (2ND WORD)
MOV (SP)+.(R1)
1GO BACK TO FIRST WORD
IRESTORE TEST LOCATION (1ST WORD)

MOV (SP)+.(R1)

;PROGRAM CAN NOW BE MALTED

MOV

@-1.STOPOK

|
|

|
'
|

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

€CC INMIBIT MODE POINTER TEST

6388 012266

Monday 07-Oct-85 16:57

SUBTST

6394 0

:ig 012312
6397

012316

6398 0
6399 0
6400 0
6401 O

“os 00
0

6403
6404 0123

151

SEQ 0147

<<LEGAL CONFIGURATION CHECK>>

005037

18:

004737 037760
002104

005737

002116

001444

EXBANK

I SRR

CLR BANK
R

MOV BANKINDEX,RO

IF ACFLAG IS TRUE

116003 002665
177760
06303
002462

001432

016. ,RO
oCSRINFO.R1
(R1)+
RO,1$

CALL

MOV
8IC
ASL
INC

042703
005737

MOV
MOV
CLR
S08

FOR BANK := @0 TO LASTBANK

002102

013700

LEGAL CONFIGURATION CHECK

'.‘.‘....‘.‘.‘...“...‘.‘..‘..‘.‘..“......‘........0‘........“...........‘...0

‘3&’, 0
012700 000020
6390
012272 ggzgx 002462
6391
0
1
077002
0
3
g

|..‘.“.‘.‘.‘..‘....0.0.‘......‘.‘.........‘.‘..‘..........0...0.‘.“...O..‘....

;sSUBTEST

6393

TST ACFLAG

BEQ L7S

CONFIG+1(RO),R3
0+C17,.R3
R3
CSRINFOCR3)

IF MKFLAG IS TRUE

002120

TST MKFLAG

;MAKE SURE THAT EACH BANK HAS NO MORE THAN 2 CSRS
BEGIN LEGALCSR

BEQ L76

B10::::5:::

6405 01

0
6406 01
6407 012

88: 012
012370
u{o 012374
6411 0

005737

001423
116003 002665
010304
042703
072427
042704

01
ot

020304
001007

6413 012412
6414 01

042760

utg 0

6415 012422

IF INTFLAG IS TRUE

002136

MOVB

MOV R3,R4

177760
177774
177760

CONFIG+1(RO),R3

BIC #tC17,.R3
ASH #-1,R4
BIC @tCi7.R4
IF R3 EQ R4

042760 014000 002666
170000

BIC

002664

@B8IT11'BIT12,CONFIG+2(RO)

BIC
©170000,
CONF :G(RO)
LEAVE LEGALCSR

000405

END; OF IF R3

012422

. 80{2:23
22 000401

pic

6418 omg:

END: OF IF INTFLAG

6417 012424

0124

01
6419 01

6420 0124

012434

6421 012434

012434

177777

002450

CMP R3,R4
BNE L100
BR E10

L100:;:3:3:3

BR L101

LEAVE

000403
012737

TST INTFLAG

BEQ L77

LEGALCSR

SET

CONFGERROR

END

LEGALCSR

END ;0F IF MKFLAG

L77:5353333

BR E10

L101:;::3::

MOV
E10:3:::5::
L76:535:3:3

@-1,CONFGERROR

CVMJABO MSV11-J MEMORY DIAG.
LEGAL CONFIGURATION CHECK

MACRO Y05.02

Monday 07-Oct-85 16:57

END ;0F IF ACFLAG

6422 012434
12

003237

023737
003717

002102
002102

END; OF FOR BANK

002462

000010

002462

24:

013012
3s:

002664
000002

170377
1777711
010000

002666

000001
000004
000340

012670

4%:

013012

S¢:

e
e s o

gg? 8:*88
(-]

flnhpfiflnn

RO
R1

CLR
cHP
B8GE
CHP
BGE
CALL
B8R
MOV

MBERR
9177,CSRINFOCR1)
55
210, CSRINFOCR1)
38
ILLCSR
5%
CONFIG(RO).RS

;CLEAR ERROR INDICATOR
:IS CURRENT CSR <= 177

ASH
CHP

e-7,RS
as R1

g'xg
MOV
ADD
cMP
BNE

oexuz CONFIG+2(RO)
01 MBERR
24 ,RO
©340,R0
3%

S
;:REGISTER
C
;IS IT THE CURRENT
;sTRY NEXT WORD OF CWIG IF NOT
;IS IT INTERLEAVED?

BEQ
CALL
CLR
CLR

S$
ILLCSR
RO
MBERR

BIT
BEQ
8IC

ADD
cHP
BNE
POP

002556

MBERR:

PHEBE :
SKUJ:

#8IT1,RS
as
#tC7400,RS

MBERR

02,R1
040 ,R1
2
RO.RS

MBERR

BIT
BNE

oaxn CONFIG(RO)

SuB

7¢:

CLR

MOV

002664

/SAVE CONTENTS' 61' RS,RO
S, -(SP)

CLR
CLR

TST

10
e p
1

SERRRERERSE

INC BANK
CMP BANK ,LASTBANK
BLE 87

RS,RO

BNE

012670

prpefeivieivivivietvivivive

£¥ 4.4

o o0 0000000 0000000000000 000000000000000000000

222222
88
$
~
<
o
0

L?S::38313

PUSH

CLR

012670
000177

012670
000774
000002

SEQ 0148

002556

010546

012674

Page 151-1

BR
ASR

ASR
MOV
BR

9774 ,RO

n RO

64
RO

RO
RO, LASTBANK
SKUJ

.WORD ©
"WORD 0
RO
CLR

OV RO -(3P)

;CLEAR REGISTERS

;BRANCH IF SO
;IS CURRENT CSR < 10
:BRANCH IF SO
;CALL ERROR ROUTINE
s TRY NEXT CSR
;MOVE LOW WORD TO RS
;DOES MEMORY EXIST HERE?
;:BRANCH IF NOT

; ISOLATE CSR NUMBER IN

;BRANCH IF SO

ISET ERROR INDICATOR
;UPDATE CONFIG COUNTER
sCONFIG TABLE ALL DONE?
:BRANCH IF NOT
;:ERRORS FOUND?
:TRY NEXT CSR IF NOT
;CALL ERROR ROUTINE
;REINITIALIZE CONFIG COUNTER
;CLEAR ERROR INDICATOR
;UPDATE CSR COUNTER
;ALL CSR'S DONE?
;BRANCH IF NOT
;RESTORE REGISTERS

MOV (SP)+,.RO
MOV (SP)+,RS

;RESET ERROR INDICATOR
:INDEX TO TOP OF CONFIG TABLE
aR C
;MEMORY PRESENT?
:BRANCH IF SO
*
: TRY NEXT LOWER ENTRY IN CONFIG

iR-C

C
g
;:DIVIDE INDEX BY 4 TO GET BANK OlR
':STORE IN LASTBANK

:SAVE SPACE FOR ERROR INDICATOR

:SAVE SPACE FOR ODD BOUNDARY INTERLEAVED INDICATOR
;:CLEAR CONFIG COUNTER

CVMJABO MSV11-J MEMORY DIAG.

LEGAL CONFIGURATION CHECK

6470 012676
6471 012702
6472 012710
6473 012712
6474 omzo
6475 0127
6476 051

MACRO Y05.02

005037 012672
000002
001431
032760 010000
001005
005;37 012672
062700 000004

002666

032760

002664

1%:

Monday 07-Oct-85 16:57

CLR
BIT
BEQ
BIT
BNE
INC
ADD

PHEBE
2
PHEBE
@4 RO

:CLEAR COUNTER
;IS THERE MEMORY PRESENT?
:BRANCH IF NOT
:IS IT INTERLEAVED?
:BRANCH IF SO
s INCREMENT COUNTER
: INCREMENT CONFIG COUNTER

cMP

PHEBE, 210

:IS THE COUNTER EQUAL TO..

001\'12 CONFIG+2(RO)

000763
023727

012672

000010

6480 0127

023727

012672

000030

cHP

PHEBE , 30

“'i 0
ag‘ 0 78
0127
w 0 773
01277
u:v 01

023727 012672 000050
001407
727 012672 000070
33.% 3
7 012672
000403

CHP
BEQ
cMP
8EQ
CLR
B8R

PHEBE , 250
as
PHEBE
, 70
)
PHEBE
S

6490 013012
6491 013014

010102
006202

110237

071260

104401

071244

012737
000207

177777

6479 0573 001417
6481 012;3

001413

012737

6489 013010 C00421
649 °§ 6
6493 013022
6494 °‘§8§3
6495 01
013034

6497 013040

013040

6498 013044

013044

6499 013052

000001

012672

2%:

00171 CONFIG(RO)

6477 0127

6478 012734

BEQ

34:
4%:

Ss:

MOV

ILLCSR: MOV
ASR

022702 000012
100002
062702 000007
062702 000060

18:

cHMP
B8PL
ADD
ADD

MOVB

&1 ,PHEBE

SUBAAP

R1,R2
Re

010. .R2
13
o7.R2
060,R2

R2,MSGA122

TYPE

MSG122

.DSABL

CRF

TYPEIT
002450

Page 151-2

SET

RETURN

SEQ 0149

ITRV NEXT BANK

:ONE OF THE SPECIAL VALUES.
sIF2T I8,

1 BRANCH TO 40

;:CLEAR INDICATOR
SET INDICATOR

;BRANCH *0 NEXT SWTEST

sR2 HAS CSR NUMBER
:MAKE ACCEPTABLE FOR PRINTING

;PUT NUMBER INTO ERROR MESSAGE

,MSG122

CONFGERROR

MOV

@#-1,CONFGERROR

CVMJABO MSV11-J MEMORY DIAG.

LEG‘L CONFIGURATION CHECK

MACRO Y05.02

6502 013054

6503 013054
013054
Olw
6504 01

6
6

01
L]
013074

013076
6508 0{;87‘

013076
Oi 104
6509 013106
013106
013114
6510 013116
013116
6511 Oig
0
013
6512 Olg 4

6513 0131
0131
6514 01 i
Oig
6515 0131
01;1;2

0131

013136

013140

6519 013146
6
Oi tgz
6
0
6
01;162
6
01 lr
013174
6
013174
01

01
01
6525 01
01
013210
6526 013210

013210

01 3216

6527 013220

SEQ 0150

SUBAAP: SUBTST

<<PRINT CONFIGURATION DETAILS>»>

1#SUBTEST

PRINT CONFIGURATION DETAILS

(8568688588488 0488840058080088000820008004080000800808008080040400000000000000004

005037
005037
013702

002400
002402
002556

033761
001411

002106

002664

032761

000400

002666

005237

MOV

LASTBANK ,R2

002402

062701

IF CPUBIT SET.IN CONFIG(R1)

LET LSIZE := LSIZE + @1

002400

END;IF BITS

END ;0F FOR ALL BANKS IN TABLE

BIT @BIT8,CONFIG+2(R1)
BEQ L103

INC MSIZE
BR L104
L103:::3333

INC LSIZE
L108:;;::3::
L102:533333
ADD #4.R1

BLE B11

CLR

006361
006361
006361
006361
066137

002374
002374
002374
002374
002374

062701
020127
003760

000002
000010

FOR R1 := &0 TO @10 BY &2

005001

002452

ASL
BSIZE(R1)
ASL
BSIZECR1)
ASL
BS
R1)
ASL
BSIZE(R1)
ADD
BSIZE(R1).I
END; FOR R1

FOR R1 := €0 TO €200 BY @4

005001
001402

BIT CPUBIT,CONFIG(R1)
BEQ L102

CMP R1,R2

003757

033761

CLR R1

Bll::3::33

IF 48IT8 SET.IN CONFIG+2(R1)

ELSE

000004

LSIZE
MSIZE

R2
Rr2

END; OF IF CPUBIT

020102

CLR
CLR

LET MSIZE := MSIZE + @1

000402

005237

LSIZE,.MSIZE

FOR R1 := €0 TO R2 BY @4

005001

00140

CLEAR

ASL
ASL

221 013140 005037 002452
6518 01;1“
8{ ia

Page 153

;8858888888888 808808888888880888800400800000000000000080080080808000000000000000

0{;870 006302
013072 006302

Mondasy 07-Oct-85 16:57

002106

002664

IF CPUBIT SET.IN CONFIG(R1)
LET UNITOP := UNITOP + &1

Ell:::333383
-

CLR R1

$388388

xBSIZE(Rl) := BSIZECR1) # 16.
i I <~
+ BSIZE(R1)
ADD #2.R1
CMP R1,010
BLE B12
E12:::33343
CLR R1
B13::55:533

B8IT CPUBIT,CONFIG(R1)
BEQ L105

CYMJABO MSV11-J MEMORY DIAG.
PRINT CONFIGURATION DETAILS

013220

6528 013224

005237

MACRO Y05.02

002416

01
013230

ogg:
013236
01
01
01

003765
006337
006337
006337
006337

023737

s
3

000004
000200

ASL
ASL
ASL
ASL

002416
002416
002416
002416

3
013737

002452

002416

002452

104401

002660

005737

002400

ousoo

001414

14 001003
162737 000004 002400

6542 ousg
013332

013746 002400
104405
104401

071075

6543 oxgsu

005737

002402

6545 013

022737

004000

002402

162737

000004

002402

104401

071127

6544
6

01 ;:3 001414

oxsgg 001003

g{g

mifi
013746 002402
013366 104405

6549 013370

013370

L10S:::::313
ADD #4.R1
CMP R1,0200

BLE 813

E13::3::3833

;UNITOP := UNITOP & 16.

IF I LT UNITOP THEN LET I := UNITOP

TYPE

022737 004000 002400

UNITOP
UNITOP
UNITOP
UNITOP

SEQ 0151

INC UNITOP

END; OF FOR R1

01
01
013274

6535 oa 74
6

062701
020127

Page 153-1

END; OF IF CPUBIT

6529 01

Monday 07-Oct-85 16:57

2¢:

124:

,$CRLF
CRF

BEQ

33
©2048.
,LSIZE

isT

BNE
SuUB
CHP

TYPDEC

LSIZE

124

04,LSIZE
LSIZE
LSIZE,-(SP)

MOV
TYPDS
CRF
.DSABL
YPE
MSG112
TYPEIT

3$:

$CRLF

TYPEIT
.DSABL

.DSABL

isT

BEQ

CMP I,UNITOP

8GE L106
MOV UNITOP,I
L106:::3:33:

; SUBTRACT 4K FOR THE I/0 PAGE
:1SAVE LSIZE FOR TYPEOUT
360 TYPE--DECIMAL ASCII WITH SIGN

,MSG112

CRF

MSIZE

92048, ,MSIZE

fi‘si’z’ssne

MSIZE,-(SP)
s
MSG113

,MSG113

CRF

: SUBTRACT 4K FOR THE I/0 PAGE

:::GO
1SAVETYPE--DECIMAL
MSIZE FOR TYPEOUT
ASCII WITH SIGN

CVMJABO MSV1l -J MEMORY DIAG.
PRINT CONFIGURATION DETAILS

022737

MACRO Y05.02

002452

8s 001003
162737 000004 002452
CSS

Oiéi{;

013416

6554 0&,’:228
6555 013424

s B8

004000

013746
1

002452

104401

070177

032777
001902
004737

000100

032610

64:

Monday 07-Oct-85 16:57

CcHP
BNE
sus

€2048..1
60
4.1

MOV

I. (SP) ;;SAVE I FOR TYPEOUT

.DSABL

CRF

TYPDEC

TYPDS

TYPE

TYPEIT

167204

Page 153-2

SEQ 0152

: SUBTRACT 4K FOR THE I/0 PAGE
+3G0 TYPE--DECIMAL ASCII WITH SIGN

MSGO70

,MSGO70

CRF
.DSABL
IF 0SW6 OFF.IN @SWR

CALL
PCONFIG
END; OF IF &SWée

BIT OSW6,8SWR
BNE L107
L107:535:333

CVMJABO MS

J MEMORY DIAG.

BNINT CONF TGURATION DETATLS

MACRO Y05.02

6597 013440

LOOP:

Monday 07-Oct-85 16:57

NEWTST

013440 000004

fsTS:

6600
oxgg 042700
177761
6601 O1
004770 013486
o1
000137 013506
o1
0141
6604 013470
6605 01347

014

6607 013476
6608 o1

014644
014774

014514

0
6610 01

015146
015276

§612

COA757

DIAGNOSTIC MODE DISPATCH ROUTINE

SCOPE

CLR
MOV

CONTFLAG
@SR RO

BAFPAR
BAWPAF

;MODE 1;BANKS FORMARD. PATTERNS REVERSE
;MODE 2;BANKS WORST FIRST, PATTERNS FORMWARD

PAFBAF
PAFBAW

jMODE 4;PATTERNS FORWARD. BANKS FORWARD
:MODE 5;PATTERNS FORWARD. BANKS WORST FIRST

BAUPAR .MODE 3.BAMKS MORST FIRST. PATTERNS REVERSE

PARBAF
PARBAW

014050

MEMDONE:CALL

6618 013322
0
013
6619 01

6830 o1
o1

ss21 o1

o1
0

6623 013534

33- 013560
6629 013560

DOBACK

;CHECK BACKGROUND PATTERN

NEMTST<<UNIQUE BANK TEST>>
UNIQUE BANK TEST

2882888880834 93808828842382334882448888423
8408883428883 0848488080808888800820800080002

013512 000004
o1

MODE 6;PATTERNS REVERSE. BANKS FORWARD
;MODE 7;PATTERNS REVERSE. BANKS WORST FIRST

3‘.‘.““‘...‘..‘.‘..‘..“‘.‘..‘.‘.‘...“.......“..‘.....‘..“‘.‘.“‘.‘.‘....‘.

14TEST 6

6617 013514
013314

1GET SUITCHES

8IC
#+C16,RO
SK TO ONLY MODE BITS
CALL
S0ISPTBL(RO)
.oxsnrcu T0 ROUTINE THROUGH NEXT TABLE
JHP
MEMDONE
T0 NEXT TEST
DISPTBL:BAFPAF
0BG O:BANKS FORMARD.
PAITERNS FORMARD

6614 013512

6615
6616

<<DIAGNOSTIC MODE DISPATCH ROUTINE>>

2058889808884 88828384238880888880888208880
0288002205030 020080020200000002000000000

6396 013442 003037 002222
6599 01
017700 167164

013506

SEQ 0153

".........‘.‘...‘.‘.‘.“‘.‘..‘..‘“.‘...‘.‘.‘.‘.‘..“..“.“.“.“".....‘.‘...

1eTEST S

6606 013474

Page 155

fsTe:

IF SELONLY IS FALSE

005737

001015

002002

012737
012737

004737

177777
177777

021476

002612
002110

Q12137

177777

002612

002110

004737

014050

SCOPE
MAKE SURE THAT EACH BANK CAN HAVE UNIQUE DATA
{WRITE AND READ THE BANK NUMBER IN EACH BANK (EXCEPT WHERE THE PROGRAM IS)
SET

HEADER,MUT

CALL

MT0027

SET

TST SELONLY

BNE L110

HEADER

CLR

END TOF TPSELONLY

CALL

DOBACK

MOV
MOV

#-1,HEADER
@-1.MUT

MOV

@-1,HEADER

L110:;:;:33353

;RESTORE BACKROUND PATTERN

FLUSH: SUBTST <<FLUSH OUT DBE'S>>

3.‘..“‘.“.‘...‘..‘..‘..“...“...““‘.‘.“.““..“‘..‘...‘.‘....“.“‘...“.

1 #SUBTEST

004737

022066

FLUSH OUT DBE'S

1888853808204 2 0488432482800 008583483288882288880808382880800880828820008004080000040

CALL

MT0030

i‘s
-~

MACRO Y05.02

.SBTTL

END OF PASS ROUTINE

1¢TYPE “END PASS #XXXXX” (WHERE XXXXX IS A DECIMAL NUMBER)

;¢IF THERES A MONITOR GO TO IT
s¢IF THERE ISN'T JUMP TO LOOP

$EOP:

002442

1%:
003620

i
&
6648 01

002630

002016

100000

056724

6649 01
01

g
ghitit
0
i
6650 01

166772

11 ghire

002346

056724

g8 i

000042

isflfidfllfllilfifiifiifii

013674
o 13700

000

OCONFIG+2,R0
;MOVE 2ND WORD OF CONFIG TO RO
#8IT13,(RO)
;CLEAR BACKGROUND VALID BIT
#4,RO
s INCREMENT TO NEXT BANK
RO. #3620
:DONE?
14
iNO - BRANCH
$ERTTL ,LASTERROR
$PASS
: sINCREMENT THE PASS NUMBER

TYPE

MSGO77

BIC

9100000, $PASS

EREC

:;DON'T ALLOM A NEG. NUMBER
1:TYPE “END PASS @*

IF #SW11 SET.IN @SWR OR QVFLAG IS TRUE OR $PASS EQ @1

BIT #SW11,@SWR
BNE L111
1ST GVFLAG
BNE L111

056724

067343

= gt gt

FSINFLAG

002346

CLR

MOV
8IC
ADD
cHe
BLE
MOV
INC

ToSkBL

070321

SEQ 0154

THE PASS NUMBER ($PASS)

TM~

Pege 157

1«INDICATE END-OF -PROGRAM AFTER EACH PASSES THRU THE PROGRAM

Monday 07-Oct-85 16:57

1908888888888888888088288888888888888083882888240888808000004800800000800080000000000

X 2388
°838 3

—

DIAG.

e
TYPE
TYPEIT

.DSABL

MSGO3S
,MSGO3S

TYPDEC

$PASS

t;»s

MOV
B8EQ
$ZAP42: CHP
BEQ

I SRR
R R R

CRF

CLR
QVFLAG
END ;OF IF SWiil

MOV

CMP $PASS,
01
BNE L3112

L112::3:333

$PASS, -(SP)

1 1SAVE $PASS FOR TYPEOUT

42,R0
$DOAGAIN
#STACK RO
$DOAGAIN

: :GET MONITOR ADDRESS
: 1BRANCH IF NG MONITOR
;ARE
WE UNDER RT11
1YES - BRANCH

:1:G0 TYPE--DECIMAL ASCII WITH SIGN

WE ARE 'ouoea (HEAVEN HELP US) XXDP!

040544

CALL

POP

RESET

SENDAD: CALL

NOP

MOV RO, -(SP)

SHUTUP

(RO)

:3CLEAR THE WORLD
1160 TO MONITOR

s s SAVE ROOM
T

FOR

NOP
:3ACT11
$DOAGN: ;UNDO SHUTUP STUFF
RESTORE STACK
ENERGIZE Q-BUS MAP € 22 BIT ADDRESSING
ENERGIZE MEMOR Y MANAGEMENT
PUT LOADERS BACK HOME

MOV (SP)+.RO

C
END

MSV11-J MEMORY DIAG.
PASS
INE

6672

013740

013706

MACRO Y05.02

Mondey 07-0Oct-85 16:57

002574

MOV

37‘ §i 744 005737 002454
6675
76 01

7 s

6679

;‘

6680 0

0
0

6681 O
8

0§
0
o

&O‘m
0

70’

000060

002576

037350
002352

aln'r
014

056742

;

000050

6690 Oim
0 4044
6691 014044

Rzafi

#BITS!BIT4 MMR3
8IS
ENERGIZE

;TURN ON MEMORY MANAGEMENT

MOV

i1SOURCE BANK

MOV

LOADHOME , RO

CALL

BANKMOV

|RSTMYIN BANK

1.R1

TST APTFLAG
BEQ L113

IF SUSWR EQ $PASS

056724

AP THANG :

CMP SUSHR, $PASS
BNE L114

m #50,.R1

#1.3
x'foevcv
ADD

ll 20
S08
INC$PASS

BR APTHANG
END ;0F IF SUSWR

L114:;3535333

END ;OF IF APTFLAG
000137

013440

SEQ 0155

;IS THIS AN 11/83,11/723-8 OR 117237

IF APTFLAG IS TRUE

990001 056726 -

0771 056724
eos;gv
000764

14:

000001

005737
001420

KSTACK, SP

1ST

172516

Pege 157-1

$DOAGAIN: JMP

LOOP

;RETURN

L113:533333

Vii-J MEWORY DIAG.

| END-OF PASS

ROUTINE

MACRO Y0S.02

6694 014050

005037

002112

005037

002102

“a 8

004737

037760

757

002116

6699
:7
7
[]
6703

001015
0
0

7
7

177777
877717

012737

17771717

7;1
005037

6704
a

6705

Page

159

DOBACK: SUBTST

<<WRITE BACKGROUND PATTERNS>>

s#SUBTEST

WRITE BACKGROUND PATTERNS

SEQ 0156

1868866848888804808888680088680048800088888888880808884000280088000000004800000000088

6696 01
8

6695 0

Monday 07-Oct-85 16:57

37
7
745

000207

6772
110

002102
002102

18888888888806888888888008000886808088080808888800884304808080000000880080080008000

PATTERN

CLR

FOR BANK := #0 TO LASTBANK
CALL

CLR BANK

Bl4:333:1:

EXBANK

IF ACFLAG IS TRUE AND RRFLAG IS FALSE

002612
002110

SET

HEADER ,MUT

CALL
CLR

MKTEST
MUT
HEADER

SET

END ;0F IF ACFLAG

END ;:0F FOR BANK
002556

TST &

BNE L11S

sCALL

MOV
MOV

@#-1,HEADER
0-1.MUT

MOV

@#-1,HEADER

MJUTEST WOULD ALSO WORK

L11S:s33333

RETURN

INC BANK
CMP BANK ,LASTBANK
BLE B14

3888833

CVMJABO MSV11-J MEMORY DIAG.

MTEST MODES

6710 014150

002102

6713 014154
6714 014160
014164
6715
6716 014166

004737
0057357
0014
737

037760
002116

005037

6717 014172
6718 014174

001007
37

1 #SUBTEST

BANKS FORWARD,PATTERNS FORWARD

128 828 8 08

1s%:

:;27 014222

002354

6729

014224

005737

6731
6732
6733

014232
014 34
014
014240
014242
014244

00140

00020
004737

2%:

10300%
00020

014150
6733 014244 004737
004737 037122
014250
6736
6737 014254

000207

44:

#4RECURSIVE#®#+>>

Ss:

=+
«sRECURSIVE

00 0040000000000 0 0000000

BANK

:SET BANK TO O

CALL
ST
8EQ

EXBANK
ACFLAG
&%

iEXAMINE BANK
:CAN |E ACCESS THIS BANK?
iNO- GO TO BANK LOOP TERMINATION

BNE
CLR

4
PATTERN

:YES - GO _TO BANK LOOP TERMINATION

;START OF BANK LOOP

:RFLAG

START OF PATTERN LOOP

|RELOCATIW REQUIRE!D?

aSET PATTERN TO ©

MTEST

;G0 TEST CORRECT MEMORY

;GO SEE _IF THIS IS THE LAST PATTERN
;NO - LOOP ON THIS PATTERN

éTERHINATIm
OF PATTERN LOOP
éTERflIMTIW OF BANK LOOP

CALL

CONTFLAG
Iucmc

*E'O oF LWS
RLFLAG

002126
036310

CLR

28288 040088000204 80 0000820008000

002112

6725 014212
005037 002222
014216 004737 040426

MTEST MODES

<<BANKS FORWARD,PATTERNS FORWARD

014210

014

SEQ 0157

BAFPAF: SUBTST

002124

2;§0 014200 004737 015450
67 a 014204 001373
004737 040402
6719

Page 161

186880088 888488888808400840888808888880008888880888080004800R80000000000000000000

:;{% 014150

6 730

Mondasy 07-0Oct-85 16:57

.SBTTL

6708
6709

6723
67

MACRO Y05.02

RETWN

CALL

RELOCATE

ON.ERROR THEN $RETURN

iNEXT HIGHER BANK
:IF NOT DONE - LOOP ON THIS BANK

+HAVE WE BEEN RELOCATED?
iNO
- SKIP
:YES - RETURN

;MOVE & MAP PROGRAM

;#sNOTE++ RECURSIVE CALL
BAFPAF
CALL
;sCALL SELF
UNRELOCATE
CALL
:UNMOVE € UNMAP PROGRAM
RETURN

BCC L116

RTS PC
L116:3:33:3

RRRRRRRANS

CVMJUABO MSV11-J MEMORY DIAG.
BANKS FORWARD,PATTERNS FORWARD

BAFPAR:

6740 014256

6741 014256
74
6742
6743 014262
6744 014266
6745 01:;::
014274
6746
014
6747

Monday 07-Oct-85 16:57
ssRECURSIVEse

MACRO Y05.02

SUBTST

Pege 163

<<BANKS FORMARD ,PATTERNS REVERSE

SEQ 0158

*eRECURSIVE#e>>

1808 08 8 8 0088880280280008880808280000088800080088080808080000880008000000000000000

i eSUBTEST

005037

002102

004737
005737

037760
002116

001007
004737

BANKS FORMARD .PATTERNS REVERSE

+sRECURSIVEss

'......“..‘.‘...............‘.‘...‘.........‘..‘...‘...‘..‘...‘......‘.“..‘...

18:

040416

015450

014316

014312

005337
100373

002112

S 014320
014
7 0143

005037
C04737
002354

002222
040426

6759 014332
6760 014336
6761 014
N4
6762
6763 V14
014
014350
014352

005737
00100%
00020
004737

002126

036310

103001

TSET BANK TO O

BEQ

4§

iNO
- GO
TO BANK LOOP TERMINATION

BNE
CALL

48
SETPAT

TST

002124

004737

R
BANK
START OF BANK LOOP
ALL
EXBANK

2s:

as:

ACFLAG

JEXAMINE BANK
iCAN ME ACCESs THIS BANK?

RRFLAG

.aemcnxou REQUIRED?

iSTART OF PATTERN L0OP

CALL

MTES

:GO TEST CORRECT MEMORY

tsmxuuou OF PATTERN L0OP

DEC

PATTERN

115 THIS THE LAST PATTERN?

BPL
2%
ootNO - LOOP ON THIS PATTERN
: TERMINATION OF BANK L
CLR

CALL

CONTFLAG

TNCENK

*evo OF LOOPS

RLFLAG

RETURN
CALL
RELOCATE
s§

IYES - GO TO BANK LOOP TERMINATION
"SET MICH PATTERN FOR CORRECT MEMORY

ON_ERROR THEN SRETURN

INEXT MIGHER BANK
iIF NOT DONE - LOOP ON THIS BANK

{MAVE WE BEEN RELOCATED?

iYES
- RETURN
IMOVE € MAP PROGRAM
IND - SKIP

B8CC L117
RTS PC

000207

004737
004737
000207

014256
037122

;#eNOTE+» RECURSIVE CALL

CALL

siuf‘\'flu

BAFPAR

UNRELOCATE

L137:53538333

sCALL SELF

;UNMOVE & UNMAP PROGRAM

VHJ“O
s

-J MEMORY DIAG.
PATTERNS
REVERSE

6770 014364
005037

002102

6775

004737

037760

014370

6774 014374 005737 002116
6775 014400 001415
6776 014402
737 002130
6777 014406 0014
€778 014410
6779 014414
6780 014416

6781
6782 014422
678
€784 014426
6785 014452

6786

6787 014434
6788 014440

6794 014454

6795 014460

002112

004737

015450

004737
001373

040402

005037
004737

002222
080426

004737
000207

014364

6796 014462 005737 002126
6797 014466 001401
6798 014470
6799 014472
6800 014476
014476

6801

6802

014
014

004737

036310

103001

000207

014502 004737 014364

6808 014506
6804 014512

- 165

BAWPAF: SUBTST

<<BANKS WORST FIRST,PATTERNS FORWARD

;#SUBTEST

BANKS WORST FIRST,PATTERNS FORWARD

SEQ 0159
¢eRECURSIVEe#e>>

004737
000207

037122

«eRECURSIVEs«

1088888888838 0448208882882808280880808202088808880083828000800000000000
0000000000 R0 R0

18:

005737 002124

001007
37

6789 014444 002351
6790
6791 014446 005137 002600
6792 014452 001003
679

Monday 07-Oct-85 16:57
OOKCWSIVE“

;.‘.‘.“‘..‘.....“‘.....‘..‘........‘..‘...““..O.“..“..“...‘..‘....‘......

6771 014364
.77;

MACRO Y05.02

BANK

SET BANK TO O

CALL

EXBANK

RRFLAG

.aeuocnuou REQUIRED?

;START OF BANK LOOP

st
B8EQ
ST
8EQ

ACFLAG
wuc

JEXAMINE BANK

BNE
CLR

48
PATTERN

IYES - GO TO BANK LOOP TERMINATION
iSET PATTERN TO 0

767

2s:

as:

CAN UEACCESS THIS BANKI
INO- GO TO BANK LOOP TERMINATION
i1s mxs BAD MEMORY (MORST FIRST)?
iNO- GO TO BANK LOOP TERMINATION

START OF PATTERN LOOP
CALL
MTEST
160 TEST CORRECT MEMORY
TERMINATION OF PATTERN LOOP
CALL
INCPAT
160 SEE IF THIS IS THE LAST PATTERN
BNE
2%
iNO - LOOP ON THIS PATTERN

TERMINATION OF BANK LOOP

R
CALL

CONTFLAG
INCBNK

8GE
1
END OF LOOPS
¢oM
WORST
BNE
S$

:NEXT HIGHER BANK

iYES - SKIP

CALL

;CALL SELF

1#eNOTE=» RECURSIVE CALL

BAWP

ss:

RETURN

68:

CALL
RELOCATE
ON_ERROR THEN SRETLRN

ST
RLFLAG
6§
RETURN

BEQ

2NOTEss RECURSIVE CALL
CALL
RETURN

BAWP

UNMELOCATE

iIF NOT DONE - LOOP ON THIS BANK
;IS THIS AN EVEN NUMBERED PASS?

HAVE WE BEEN RELOCATED?
iNO - SKIP
{YES - RETURN
iIMOVE € MAP PROGRAM

BCC L120

RTS PC

JCALL SELF

IUNMOVE € UNIIAP PROGRAM

L120:;:5:53::

MEMORY DIAG,
CVMJUABO MSV11-J
At
oneY S TRsT
PATTE

6807 014514

i eSUBTEST

002102

€810 014520

004737

037760

6811 014824 005737 002116
6812 014330
00id1s
6815 014532 005737 002130
6814 014536 001412

6817 014546

737
001007

004737 040416

6821 014556
6822 014362

005337
100373

002112

6824 014564
6825 014370

005037
00737

002222
040426

014574 002351

6827
€828 014576 005137
6829 014602 001003
8

18:

2:
as:

002600

004737
000207
005737
001401

014514
002126

6836 014622
6837 014626
014626
014630
014632

004737

036310

68:

6839 014632
6840 014636

004737
004737

6835 014620 000207

6841 014642

167

<<BANKS WORST FIRST.PATTERNS REVERSE

SEQ 0160
#eRECURSIVEss>>

BANKS WORST FIRST.PATTERNS REVERSE esRECURSIVEas

103001
000207

000207

014514
037122

BANK

TSET BANK TO O

EALL

EXBANK

JEXAMINE BANK

START OF BANK LOOP

TSt
BEQ
ST
BEQ
ST
BNE

6831 014604
6832 014610
6835 014612
6834 014616

6838

]...“..‘.“..“.‘...‘......‘............‘......“..‘.‘...."......"...“.‘.‘..

002124

6818
6819 014552 004737 015450

682

Page

........‘..‘..“......................‘...‘.....“.....‘.‘..“..‘...‘...‘..‘...‘

005037

6815 014
6816 014544

Monday 07-Oct-85 16:57

O oRECURSIVE oo

BAWPAR: SUBTST

6808 014514

6809

MACRO Y05.02

ACFLAG

am.ac
aaruu;

SETPAT

ICAN WEACCESS THIS BANK?
iNO- GO TO BANK LOOP TERMINATION
iIS THIS BAD MEMORY (WORST FIRST)
iNO- GO TO BANK LOOP TERMINATION

IRELOCATION REQUIRED?
IYES - GO TO BANK LOOP TERMINATION

ISET WIGH PATTERN FOR CORRECT MEMORY

SThRT OF PATTERN L0OP
EALL
MTE OF PATTERN L00P
460 TEST CORRECT MEMORY
S hMINATION

OEC
8PL

PATTERN
24

1IS THIS THE LAST PATTERN?
iNO - LOOP ON THIS PATTERN

LR
CALL

CONTFLAG
INCBNK

sNEXT HIGHER BANK

CALL
RETURN
TST
BEQ

BAWPAR

sCALL SELF

RLFLAG
6§

\HAVE WE BEEN RELOCATED?
iNO - SKIP

L TERMINATION OF BANK LOOP

BGE
)
iIF NOT DONE - LOOP ON THIS BANK
{END OF LOOPS
¢OM
WORST
:IS THIS AN EVEN NUMBERED PASS?
BNE
54
iYES - SKIP
s #eNOTEss RECURSIVE CALL

RETURN

CALL
RELOCATE
ON.ERROR THEN §

iYES - RETURN

iMOVE € MAP PROGRAM

;#sNOTE##BAWPAR
RECURSIVE CALL JCALL SELF

CALL
CALL

RETURN

UNRELOCATE

IUNMOVE & UNItAP PROGRAM

B8CC L121
RTS PC
L121:::33353

CVMJABO MSV11-J

B YL

MEMORY DIAG.

6844 014644

PAFBAF: SUBTST

6845 014644 005037 002112

6851

014654
014660

014664

004737
004737

037760
040364

6853

O1ecee 001010
008737 002116
014672 001405
014674 005737 002124

6856

014702

004737

015450

6858
6859

014706
014712

005037
004737

002222
040426

6854
6855 014700 001002

6860 014716 C02356

686

SEQ 0161
«sRECURSIVE#s>>

18:
2:

CLR
PATTERN
:SET PATTERN TO O
START OF PATTERN LOOP
LR
BANK
{SET BANK TO O
'START OF BANK LOOP
CALL
CALL

BNE

as:

EXBANK
BANKOK

ST
BEQ
3

ACFLAG
4
RRFLAG

LR
CALL

CONTFLAG
INCBNK

8GE

INCRPT

iNEXT HIGHER PATTERN

{IF NOT DONE - LOOP ON THIS BANK

; TERMINATION OF PATTERN LOOP

6869 014734
6870 014740
6871 014742
6872 014746

004737
00G207
005737
001401

014644
002126

ALL
RETURN
ST
BEQ

6874 014752
6875 014736

004737

036310

68:

014760
014762

000207

014644
037122

iCAN WE ACCESS THIS BANK
iNO
- GO
TO BANK LOOP' TERMINATION
I RELOCATION REQUIRE
sNEXT HIGHER BANK

BNE
1
END OF LOOPS
oM
THFLAG
BEQ
S8

004737
004737
000207

INO
- GO
TO BANK LOOP TERMINATOR

040402

000207

JEXAMINE BANK
ICORRECT MEMORY FOR THIS BANKI

BNE
as
SO A e M0 BANK OGP TERMINATION
CALL
MTEST
160 TEST CORRECT MEMORY
TERMINATION OF BANK LOOP

004737

6876
6877 014762
6878 014766
6879 014772

169

<<PATTERNS FORWARD,BANKS FORMARD

014720

6873 014750

s+
+sRECURSIVE
PATTERNS FORWARD,BANKS FORWARD
#SUBTEST
1|“.‘.“.“".‘.‘.....‘.‘.“‘.....“.‘.‘......““....““..“......‘.‘...“.‘..

CALL

6865 014724 001351
6864
6865 014726 005137 002134
6866
6867 014732 001403
6868

Page

]....‘..‘..‘...‘..........‘....‘.‘...“..........‘..‘........“.‘.““‘..‘......

6846
6847 014650 005037 002102
6848
6849
6850

Monday 07-Oct-85 16:57

Y
_ MACRO

R TERNE CREVERSE SoRECURSIVEo

#sNOTE#*# RECURSIVE CALL

RETURN

{0K - LOOP; ELSE CONTINUE
;COMPLEMENT TYPE OF MEMORY
iIS THIS AN EVEN NUMBER PASS?
{YES - SKIP

PAFBAF

sCALL SELF

RLFLAG
6§

;HAVE WE BEEN RELOCATED?
iINO - SKIP

CALL
RELOCATE
ON.ERROR THEN SRETURN

iYES - RETURN

iIMOVE & MAP PROGRAM

;#asNOTE+s RECURSIVE CALL
CALL
PAFBAF
JCALL SELF
CALL
UNRELOCATE
{UNMOVE € UNMAP PROGRAM
RETURN

C L122

RTS PC
L122::35333

CvMJ
PATTE

MSV11-J MEMORY DIAG.

FORWARD ,BANKS FORWARD

6883 014774

005037

002112

6887

004737
004737
001013

037760
040364

01
01
92 01

9% 01

6894 01
6895 015036
0’ o1

oooo o1

18:
2s:

008787 002116
001410
903737 002130

001405

737
00100
004737

015450

05037
004737

002222
080426

002353

002124
as:

004737 040402

6914 015106
6915 015112
6316 013114

014774

€917 01

004737
000207
008737

001401

002126

64:

6919
6920

004737

036310

7¢:

004737
004737
000207

014774
037122

CALL
CALL
BNE

EXBANK
BANKOK
43

JEXAMINE BANK
iCORRECT MEMORY FOR THIS BANK?
INO
- GO TO BANK LOOP TERMINATOR

BEQ

4§

TST
BNE
CALL

RRFLAG
48
MTEST

ACFLAG
BMFLAG
4%

“TERMINATION OF BANK L
GLR
CONTFLAG
CALL
TNCBNK

1CAN WEACCESS THIS BANK?
INO
- GO TO BANK LOGP TERMINATION
{IS THIS BAD MEMORY (WORST FIRST)

iNO- GO TO BANK LOOP' TERMINATION

iRELOCATION REQUIRE
e OC AT S 0 BAMK LOGP TERMINATION
oo;so TEST CORRECT MEMORY
NEXT HIGHER BANK

24
{IF NOT DONE - LOOP ON THIS BANK
.ERHINATIW OF PATTERN L0OP
OM

TMFLAG

BEQ

5§

INEXT HIGHER PATTERN

10K - LOOP; ELSE CONTINUE
;COMPLEMENT TYPE OF MEMORY

iIS THIS AN EVEN NUMBER PASS?
iYES - SKIP
{ 3eNOTE
w2 RECURSTVE AL’

014774

103001
000207

1SET PATTERN TO O

OEND OF LOOPS

002600

6318 013122 00020

PATTERN

6312 013104 001003

6923 015140
6924 015144

eRECURSIVEss>>

SEQ 0162

START OF PATTERN LOOP
ELR
BANK
+SET BANK TO O
START OF BANK LOOP

BEQ

004737
7
005137

6321
6922 015134

<<PATTERNS FORWARD.BANKS WORST FIRST

ST
TST

€909 015072
6910 015076
6911 015100

015124
0151
015130
015132
015134

- 171

PATTERNS FORWARD,BANKS WORST FIRST #eRECURSIVEes
4SUBTEST
;]‘..‘...‘.‘..‘.....‘...".‘.“....‘.“.....‘...‘.‘..‘.....“...‘....‘...“‘...‘.

$908 of
001346
6904
»
6905 015064 005137 002134
6906
6907 015070 001403
6908

] 8882882088828 22882888822384848282308200888082082000008220000802 80004000000 000000000

6884
6885 015000 005037 002102
6806
91

Monday 07-Oct-85 16:57
#eRECURSIVEss

PAFBAM: SUBTST

6882 014774

01
015010
013014

MACRO Y05.02

CALL
PAFBAM
RETURN
COn " WORST

{CALL SELF

ALL
RETURN

PAFBAMW

{CALL SELF

BEQ

RLFLAG

7§

iINO- SKIP

BNE

{4TH PASS?

NSNOTEss necuasxvs CALL {YES - SKIP

TST

RETURN

CALL
RELOCATE
ON.ERROR THEN $RETURN

iHAVE UE BEEN RELOCATED?

{YES - RETURN

iIMOVE & MAP PROGRAM

;#sNOTE+s RECURSIVE CALL
CALL
PAFBAM
sCALL SELF
CALL
UNRELOCATE
[UNMOVE & UNMAP PROGRAM
RETURN

B8CC L123
RTS PC
L123:::35333

MACRO
Mondey 07-Oct-85 16:57
Y
MSV11-J MEMORY DIAG
S WORST FIRST OORECWSIVEQQ

CVMJ
F
PATYE*’OCS

+BANKS

6927 015146

<<PATTERNS REVERSE,BANKS FORWARD

:#SUBTEST

PATTERNS REVERSE,BANKS FORWARD

15882482888 888488880805888048 8888080004808

CALL

6930
69

002102

1%:

037760
040364

2%:

- e e
g8
e £ 8
et e
s e o e et e

TST
ST

015274

BNE
CALL

015450
43:

ACFLAG
RRFLAG
4%
MTEST

0 0008000008000 00

:SET HIGHTEST PATTERNS

;EXAMINE BANK
:CWECT mv FOR THIS BANK?
GO
TO BANK LOOP TEIINIMTM

3CM WE lCCESS THIS BANK
GO _TO BANK LOOP TERHINATIM
lRELOCATIM REQUIRED?

:YES - GO TO BANK LOOP TERMINATION
60 TEST CORRECT MEMORY

TERMINATION OF BANK LO&
R

CALL
BGE

CONTFLAG

INCBNK
2¢

sNEXT HIGHER BANK
;IF NOT DONE - LOOP ON THIS BANK
sNEXT LOWER PATTERN
;0K - LOOP; ELSE CONTINUE

ERHINATIM OF PATTERN LOOP
P TERN

002134

coM

TMFLAG

BEQ

S5$

:IS THIS AN EVEN NUMBER PASS?
+YES - SKIP

ALL

PARBAF

;CALL SELF

TST

RLFLAG

;HAVE WE BEEN RELOCATED?

:END OF LOWS

##NOTE++ RECURSIVE CALL

015146

015146
037122

00000000 00000000

:SET BANK TO O

C
BPL

002126

0 0000000000000

*sRECURSIVE+»

002112

036310

]

6962

233

=Owv

..s

000000000

0000000002$so

tSTMT OF BANK LOOP
CALL
EXBANK
CALL
BMG(

BEQ

002124

002222
040426

STMT OF PATTERN LOOP
BANK

BNE

002116

HIPAT

«4RECURSIVEs+>>

0888000 8880040000008

1828488484 22848 2848888088820 00 8804802008800

:’ 8 015146

940
6941 015210
015214
6
694
6944

SEQ 0163

PARBAF: SUBTST

040416

015152

Page 173

Ss:
6%:

RETURN

BEQ

RETURN

CALL

RELOCATE

ON.ERROR THEN $RETURN

;#sNOTEe«s RECURSIVE CALL

CALL
Se‘flLRN

PARBAF
UNRELOCATE

s COMPLEMENT TYPE OF MEMORY

sNO
- SKIP

sYES - RETURN

:MOVE & MAP PROGRAM
BCC L124

L124:

:CALL SELF
;UNMOVE € UNMAP PROGRAM

RTS PC

(RERER

DIAG. =~ MACROO RECUNSIVE
Y05.02 Monday 07-Oct-85 16:57 Page
AT ERnsMSV
REVERSE BANKS PORARD
v
e 175
PARBAM: SUBTST

6965 015276
6966 015276

1 #SUBTEST

040416

005037

002102

18:

6972 01

004737
004737

go1013

037760
040364

28:

6978 01
001002
€979 015342 004737
6980

015450

6981
€982

o336
015352

6983
015356
H
6985 015360
6986
015364
6
698
015366
6989
6990 015372
6991

6392 013374
6993

015400

6934 013402

COS0%7
004737

002222
040426

002353
005337 002112
100346
005137 002134

015276

008137

002600

004737

036310

103001

7005 015436
7006 015442

004737
004737

000207

CALL
CALL

BNE

015276
037122

EXBANK
BANKOK

ACFLAG
4
BMFLAG
43
RRFLAG

CLR CONTFLAG
CALL TM INCONC

68:
7¢:

+SET BANK TO O
JEXAMINE BANK
CORRECT MEMORY FOR THIS BANK?

INO- GO TO BANK LOOP TERMINATOR

CAN WEACCESS THIS BANK?
INO
- GO TO BANK LOOP TERMINATION
118 mxs BAD MEMORY (WORST FIRST)
iNO
- GO TO BANK LOOP TERMINATION
{RELOCATION REQUIRED?
JNEXT HIGHER BANK

BGE
iIF NOT DONE - LOOP ON THIS BANK
;Tsanxmuou OF PATTERN LOOP
DEC
PATTERN
INEXT LOWER PATTERN
BPL
10K - LOOP; ELSE CONTINUE
PEND OF LOOPS
Com
THFLAG
,COMPLEMENT TYPE OF MEMORY
S$

é.onowu
RECURSIVE CALL

Ss:

1SET HIGHTEST PATTERN

BNE
as
{YES - GO TO BANK LOOP TERMINATION
CALL
MTEST
GO TEST CORRECT MEMORY
L TERMINATION OF BANKLOOP

BEQ

004737

000207

7007 015446

as:

HIPAT

SYRRT OFPATTERN LOOP
R
BANK
'START OF BANK LOOP

ST
BEQ
ST
BEQ
ST

001403

Q13434
015436

7004

CALL

003757 002116
001410
737 002130
001405
003787 002124

6935 o1
001003
s41 O13410 04737 015276
000207
g o 16 005337 002126
000 013422 001401
7001 0
000207
7002 01
7008 01

PATTERNS REVERSE,BANKS WORST FIRST eRECURSIVEss

]..‘.‘..‘........‘..‘..“........‘..“..........“‘.......‘.‘..‘.“...“.....‘..

004737

6973 0
6974 01
6975 01
6976 01
6977 01

eeRECURSIVEss>>

|.“.....“.“‘..‘...“..‘..“......‘.‘...‘.‘..‘.“.‘..‘.“‘.“...‘....“.‘...“

6967
€968 015302
6969
€970 015306
6971 015312

<<PATTERNS REVERSE,BANKS WORST FIRST

SEQ 0164

con
TM

:IS THIS AN EVEN NUMBER PASS?
iYES - SKIP

JCALL SELF

uorsT

14TH PASS?

BNE
68
iYES - SKIP
1#sNOTEss RECURSIVE CALL
CALL PARBAMW
JCALL SELF
RETURN
ST
RLFLAG
iHAVE UE BEEN RELOCATED?
B8EQ
7¢
iNO- SKIP
RETURN
iYES - RETURN
CALL
RELOCATE
ON.ERROR THEN SRETURN

;2eNOTE
s RECURSIVE CALL

CALL
CALL

RETURN

PARBAW
UNRELOCATE

iMOVE & MAP PROGRAM

BCC L125

RTS PC
L12S::3333:
;CALL SELF
IUNMOVE & UNMAP PROGRAM

mscmsll

MACRO Y05.02 Mondsy 07-Oct-85
16:57 Page 177
VMJABO MSV1l-J MEMORY DIAG.
REVERSE BANKS WORST FIRST O oRECURSIVE oo
BATTERNS
MTEST:

7010 015450

SEQ 0165

<<SUBR

SETUP MEMORY TEST>>

SUBR

SETUP MEMORY TEST

SUBTST

18 8 48 8 2388888888888848888888888888888888880
8088888088000 00 000080000000 000000

1 #SUBTEST

18 8 8 8 84 4 8880888888888820800802884888800088408008848080008004080080000000000000

7011 015430
01

177777

002612

177777

002110

002264
002120

SET

HEADER

SET

MUT

TST

MKFLAG

CLR
BEQ

012737
000207

177777

iNO - SKIP

HOLDLOOP

CALL

015544

002110

MT1

B1S::33333
TST CONTFLAG

BNE E1S

IF SKIPMK IS FALSE

002342

005037

;ECC?

IF CONTFLAG IS TRUE THEN LEAVE HOLDLOOP

002222

016772

;INDICATE THERE IS A MEMORY
\fi*flTfiST

PASFLG

BEGIN

004737

sINITIALIZE HEADER MESSAGE
TYPEW‘I’!ADER

MKCONTROL

END; OF IF SKIPMK

00473; 017212

MT1:
MT2:
002612

TST SKIPMK
BNE L126
L126:::33:3

END

HOLDLOOP

E'A'LL

"MT;EST

;:YES - DO ECC TESTS

CALL
CLR
SET

MJTEST
MUT
HEADER

;00 PARITY TESTS
;:NOW- NO MEMORY UNDER TEST
aALLOH HEADERS NORMAL

RETURN

E1S:333333

‘

CVMJABO MSV11-J MEMORY D%AG.
SETUP MEMORY TE
SUBR

MACRO Y05.02

Monday 07-Oct-85 16:57

MKCONTROL : SUBTST

7030 015544

Pege 179

<<SUBR

SEQ 0166

TEST ECC CSR LOGIC DISPATCH>>

1888888808888 88828888828388880488888888888888808082880808088888804
0008800000000 00000

TEST ECC CSR LOGIC DISPATCH

SUBR

1sSUBTEST

1888888844 3848888880848888888884888888888888888828888282088808880040308000000000000

s THE NEXT TWO MODULES SOLVE THE PROBLEM OF

;831

;HOM TO RUN THE CSR TESTS ON EACH ECC MEMORY

7034 015

01
01

005737
00140;

002002

005737

002536

01
o1
7035 01

01
o1
o1

7036 01

o1
015570
013372
0{ 74
015576
7037 01
01
7038
7039
01
7040 01
7041
01
7
o1

001401

013746
C1
010146
01
010
01273
012737
37
37
37
013700

ig
7045 Oi
oG
1 S

042701
el
o

0157
o1

7060 0

7061 Oi
0

7062 0

7
7

6337
2737

015754
015756

010346
013703
004737

TST SELONLY

8EQ L127
RTS PC
L127:3353333

TST INHECC

8EQ L130

PUSH

002102

BANK,RO,R1,R2,.R3

RTS PC
L130::33333

MOV BANK, -(SP)

MOV RO, -(SP)

002232
002234

002234

OF IRST , CSRFBANK
OLAST, CSRLBANK
CSRINT
SPLTCSR
CSRLOOP
BANKINDEX, RO
CONFIGCRO),R1

ASL
MOV
TST
BEQ
INC

R1
R1,CSRHOLD
INTFLAG
1
SPLTCSR

:STORE IN THE LOW BYTE
;1S THIS BANK INTERLEAVED?
:BRANCH IF NOT INTERLEAVED

gcc

Es%m”

;WE MUST LOOP TWICE FOR AN INTERLEAVED BANK

MOV

CONFIG(RO),R1

:GET THE INTERLEAVE CSR NUMBER

BIC
&13

#+C17000,R1
:g.csmo

:STORE IT IN CSRHOLD'S UPPER BYTE

MOV

ASH

002152

MOV R1.-(SP)
MOV R2.-(SP)
MOV RS, -(SP)

MOV
MOV
CLR
CLR
CLR
MOV
MOV

SWAB
8IC

005037

013757

015762

IF INMECC IS TRUE THEN SRETURN

13;

01
7063 01

IF SELONLY IS TRUE THEN SRETURN

MKLOOP: MOVE

8IC

Rl
9tC17.R1

9120000, CSRLBANK

é-3,R1

CSRMOLD(R3),CSRNO

#1C36, CSRNO

FOR MKCNT

:= 80 TO CSRINT

-5

FOR CSRFIRST

002226

MAP BANK

MOV

CALL

BANK ,R3
MAPPER

:SET FIRST TEST ADDRESS TO FIRST ADOR.
; AND ZERO THE LOOP COUNTER
:GET THE BANK INDEX
:GET CSR NUMBER

:CLEAR ANY UNNECESSARY BITS
CLR MXCNT
Bl16::::::3

:= CSRFBANK TO CSRLBANK BY 04000

MOV CSRFBANK,CSRFIRST

B17: b'.‘('“
:MAP TEST SPACE TO B
MOV R3,-(SP)

wuo MSV11-J

DIAG.
MACRO Y05.02
Teet edc Eon LocIc
oIsPATCH
— 07-Oct-85 16:57

7064 015770

706% oz 'm

.DSABL

ougos

104511

01577

7068

7069

005737
001503
757
oo; og

CLR

002226

002230

757 004000 002230

013737 002412 002414
005737 002240
001404
040000

002414

737

000002

002414

737

016366

103440

7079 01607 mugc
7
°i=°33 005037 002076
7081 O

ox: a

7082

005037

002452

016106

012737

177777

016
3

013700

002452

:xoo

7083 016114 o%gosv 002264
7084

7085

?
7
7700889

002612

o{ 144

012603

737 016672

37 002452
0a ;3 oagzg
002452 000027

8%6 60
6 3

003

016164

012737

016172

000407

m“‘ “t
7092
0151
7093 0161

7094 01617
016174

709% °‘tf"
o1

104423

osg'm

023737

177777

MOV
ST
8EQ
14:

28:

TESTADD, TESTADD +2
14

002334

002412

002230

MOV CSRFIRST,TESTADD

EREE]

SPLTCSR

.Ago

zoooo.resuoooz

ADD

92, TESTADD+2

CALL
SBETEST
ON . NOERROR

SET

CLR

HEADER

8CS L132

:TURN CACHE OFF
;INDICATE PARITY ACTION
CLR I

B22:::::3:

MOV

PASFLG

#-1,HEADER

MOV I.RO

PUSH R3

:SAVE LOOP coumsn

MOV sv CTLKVEC
SuUB
CTLKVEC
CALL
csaé
POP

:SAVE VECTOR IN CSR OF K

MOV RS, -(SP)

;RESTORE LOOP COUNTER

MOV (SP)+.R3

END ;OF FOR I

CACHON
SET
SUCCESS
LEAVE CSRSTUFF

END ;OF ON.NOERROR

000004

IE R

LET RO := I

oiom

#4000,CSRLAST

FOR TESTADD:= CSRFIRST TO CSRLAST BY &4
s

FOR I := 90 TO 027

0 ogn 002146
% 37 000002 002146

7090 3

CSRFIRST,CSRLAST

CACHOFF
CLR
NOPAR

8 6

01
{
016144

ADD

002412

62737

016072

002226

MOV

1S ACFLAG
BE3 L131
T.T RRFLAG
BNE L131

002124

707 8
707
7073 0

7077 0
7078 0160

.20: IRERR

SUCCESS

IF ACFLAG IS TRUE AND RRFLAG IS FALSE

002116

013737

7076

MOV (SP)+,R3

s INVALIDATE BACKROUND PATTERN

BEGIN CSRSTUFF

7070 0
g“

;S;g 3

SEQ 0167

CRF

INVALIDATE

-mg i 005037 002334
015776
0
01
016010

- 179-1

END ;OF FOR TESTADD

INC I
o
I,027

BLE 822
E22:::333383

:TURN CACHE ON

MOV

@-1,SUCCESS

BR E20
L132::535333

ADD #4,TESTADD

CMP TESTADO,CSRLAST

——

oxg'r%

Page

CVMJABO MSV

SUBR

TES

L Eon Looteb1seATCH

MACRO Y05.02

7096 01
o1
7097 0
01
7098 O
0

NRRRRRR

giuzo

Monday 07-Oct-85 16:57

067257

TYPEIT

002102

MOV

067315

: :SAVE BANK FOR TYPEOUT

:3GO TYPE--OCTAL ASCII
:sTYPE 3 DIGIT(S)

TYPE
MSGB34
MSGB34

CALL

sl
177777 002222
3 002240

015726

00000

4t
ot o

002332

L133:::33:3

ADD 84000 ,CSRFIRST

CHP CSRFIRST,CSRLBANK

BLE 817

E17:3:33333

INC MXCNT

CMP MKXCNT ,CSRINT

ADD
MOV

002232
002240

-+,

000002
000001

333 -

737
012737

BANK

PERBNK

END ;0F IF SUCCESS

uTYPE

: sSUPPRESS LEADING ZEROS

CRF

002236

® -~

BANK,<TYPES BANK NUMBER>,3

INC
SPLTCSR
END;: OF FOR MKCNT

: it 2

0000000000000 00C"NO0000000000

TYPOCS

TYPEIT

002234

BNE L133

BANK _-(SP)
0

002226

s TST SUCCESS

MSGA34

‘BYTE

.DSABL

050354

et a8 et

L131::3331

TYPE

MSGA34

.DSABL

SNNSNNSNSNN

BLE 821
E21:3::331

IF SUCCESS IS FALSE

002334

TYPOS
.BYTE

SEQ 0163

END CSRSTUFF

179-2

END ;OF IF

003711

7099 0

—p.

INC
cHP

14:

MKCNT:

R3
RS ,CSRLOOP

ECCINIT
SET
CONTFL
CLR
POP

002102

@2, CSRFBANK
@1,SPLTCSR

RETURN
.WORD

BLE B16
E'6:3:33333

sTRAP ON DOUBLE BIT ERRORS (NORMAL)
MOV

SPLTCSR
R3,.R2.R1,R0,BANK

@-1,CONTFLAG

MOV (SP).,.R3
MOV (SP)..R2

MOV (SP)..R1
MOV (SP)+.RO
. BANK
MOV (SP)«
O

;:COUNTER FOR MXLOOP

S T BT
T Y0502 ety 9700005 16157 Pegn 10
1 sSUBTEST

CHECK FOR SBE FREE LOCATIONS

+IN GRDER TO DETERMINE IF A LOCATION IS SBE FREE I DO THIS

“wn

IMRITE ZEROS WITH ECC DISABLE

iREAD ZEROS BACK
{IF NOT ZEROS THEN RETURN ERROR

:llITE ZEROS MITH ECC ENABLED BUT TRAPS DISABLED

sREAD ZEROS BACK
+IF NOT ZEROS THEN RETURN ERROR

:TEST THE LOCATION FROM THE PAR'S (MITH NO PROGRAM FETCHES)
+IF THERE WERE ANY SBE'S OR DBE'S THEN RETURN ERROR

'cmmv ZEROS TO ONES MITH ECC DISABLE
H

;READ ONES BACK
:IF NOT ONES THEN RETURN ERROR
7

sMRITE 100, ,100000,00000 (CHECKBITS COMPLIMENT OF BEFORE)

E 33 31
33

MITH ECC ENABLED BUT TRAPS oxs*.to

sTEST THE LOCATION FROM THE PAR'S (MITH NO PROGRAM FETCHES)
;IF THERE WERE ANY SBE'S OR DBE'S THEN RETURN ERROR

:vmwtncmrmsuummmnmm.m

053737

~N~N~~~

<<CHECK FOR SBE FREE LOCATIONS>>

1886686848688488888308888808480208008808808008040808000008408080800000000000000000

‘83 8 S e

tan

;

g i
uxog
gg

SBETEST:SUBTST

1068882808 88888888088228088088888808888080880888888288888200080280000880828080000800000

SNNSNSNSNSNSNSNSNSNNSNNNNSNNNNNNNSNNN

7121 016366

sea o

016430

104503

104510

002352

177776

"ENABL
PUSH

LSB
RO,R1.R4

MOV

TESTADD .R1

Re
TESTADD:2,
MOV
TESTAREA
8IS
TESTNODE ,PSu

sig
Exs
CLEART (R1).CRA)
187

BNE
1S7

BNE

= 68
d

;ENTER TEST MODE
1GO TO SYSTEM TEST MODE

I" OTSABLE
ECCON 1 SELECTED CSR
&

(R1)

CLR1CSR

CLEAR T (R1).CR4)
187

sPUSH RO.R1.R& ONTO STACK

(R1)

SBENT
BNE
ST
(R&)
SBENT
BNE
TSTREAD

;

CLEAR 1 SELECTED

LR
LR

(R1)
(R&)

sTEST LOC (R1) & TST FOR SBE (MITMOUT FETCHES)

f@dfloflsm'l’mfif&
7166 016452
01

MACRO Y05.02 Monday 07-Oct-85 16:57 P;g. 181-1

032737
001415

100020

002150

012737

177777

002066

104512
0;3700
072027
042700

023700
001454

002460
177774
177600

IF #BIT15!BIT4 SET.IN CSR

SET SKPERR

ASH

002102

END;

&-4,RO

o RO ss.
vos £

bo
b b

~~J

nnJSEg

0000000

peleheieiipaps
Pope

20000

000000

28I RTNRBIaI

NNNNNNNNNNNN
NN

0 0 0B 0 0 0 O O 09 00 0O
°

002614

(R
(R4)
ONES, (R1)

002614

CcHP

ONES,(R4)

BNE

002150

177777

002066

002460

042700

177774
177600

023700

002102

001410

104417
104473
104423

L134

:DISABLE ECC ON 1 SELECTED CSR

SBENT

SBENT
BNE
CLR1CSR
CLR
(R1)
MOV
081T15,.(R4)
TST
(R1)
SBENT
BNE
CHP
08IT15,(R4)
SBENT
BNE
TSTREAD

100020

CMP BANK,RO

BEQ SBENT

OF IF @BIT1S

COM
CoM
cMp

100000

072027

;DISABLE ERRGEN'S ERROR PRINTOUT

BIC
©tCi77.RO
IF BANK EQ RO THEN GOTO SBENT

100000

1&512
0*3700

BIT 0!;:15!.114.(:5&
BEQ L

ERRGEN
MOV
ERRADD.RO

ECC1DIS

012737

SEQ 0170

:CLEAR 1 SELECTED CSR

;TEST LOC (R1) €& TST FOR SBE (WITHOUT FETCHES)

IF #BIT15:!BIT4 SET.IN CSR

SET SKPERR

BI; 02%;15!.!1’4.(:50
BEQ
L

;DISABLE ERRGEN'S ERROR PRINTOUT
MOV

ERRGEN
MOV
ERRADD.RO
ASH
#-4 RO
#tCi77.RO
8IC
IF BANK EQ RO THEN GOTC SBENT

CMP BANK,RO

BEQ SBENT

END; OF IF #BIT1S

KERNEL
POP

L18S::353533

sENTER KERNEL MODE

ECCLINIT

CACHON

@-1,SKPERR

;INITIALIZE 1 SELECTED CSR

R4 ,R1,RO

$RETURN NOERROR

: TURN CACHE ON

;POP RO,R1 & R4 FROM STACK

MOV (SP)+.R4
MOV (SP).,R1
MOV (SP)+,RO

CLC
RTS PC

CVMUABO
MSV11-J MEMORY DIAG.

ek P oR S8t FakE LOCATIONS
7206 016644

7207 81“‘6

oleess 93014
104417

0{“

4
0166
7210 0166
7211 016660

104473
104423

016660
016662
016664

012604
012601
012600

016666
01667C

000261
000207

7212 016666
7213

104503

MACRO Y05.02
SBENT:

Monday 07-Oct-85 16:57
CLRICSR
CLEAR

(R1),.(R4)

KERNEL

ECCLINIT
CACHON
POP
R4 .R1.RO

$RETURN ERROR
.DSABL

LSB

Page

181-2

SEQ 0171
;CLEAR 1 SELECTED CSR

;ENTER KERNEL MODE

(a1)

ER (Re)

sINITIN.IZE 1 SELECTED CSR
: TURN CACHE ON
cPO RO.R1 & R4 FROM STACK

MOV (SP)+.R4
MOV (SP).,R1
MOV (SP)+,RO
SEC
RTS PC

CVMJABO M5V 1-J MEMORY DIAG.
FREE LOCATIONS
CHECK FOR
7216 016672

MACRO Y05.02

HMondasy 07-0Oct-85 16:57

Page 183

SEQ 0172

CSRCASE : SUBTST

<<CSR PATTERN CASE STATEMENT>>

;s sSUBTEST

CSR PATTERN CASE STATEMENT

9288888888825 5888888888880888808880880088888
880808000020 RRRRRRR N0 RRRN00RN 0000

882

CASE RO

MOV RO, -(SP)

ASL 8SP

016" 62

;CHANGE "$DDWO" 016702

020110

JSR PC,L136

;WARNING IF YOU CHANGE THIS TABLE ALSO

MKCSRT:

;PAT
MTO0006

“$DDWS” (THE PATTERN BIT MAP)

TIME

;<1 SEC

DESCRIPTION
INITIAL DATA TEST

SHIFTING 1/0'S Tm CHECK BITS
BASIC OMLE ERROR TEST

SYNDROMES

COCOOONDOO
OO 1o s hut b ot ot ot s ot )

023712
0202

L
X1

7250 01678

MT
END ;0F CASE RO

016766
7251 016770

RETURN

7249 016760

172
m
(o]

MSV11-J ECC TESTS

016672
016674
016676

~ o

LYLYLY

NNNN~

qdflfluflflflflaquqN
LYLY
e
N
- o>

7217 016672

1988488888848 2888884888880888288888000
0008800885842 20800200040 8008 0000000000 00008

CSR O‘ DOUBLE BIT ERROR TEST

CMECTIW CWE TES
SYNDROMES TO CSR Ol SINGLE BIT ERROR TEST
ECC DISABLE TEST
ADDRESS TO CSR ON _DOUBLE BIT ERROR
EXTENDED ADDRESS TO CSR ON ERROR TEST
WRITE BYTE CLEARS SBE TEST
CHECK SINGLE BIT ERRORS WITH ECC DISABLED TEST
NO CSR UPDATE ON SBE WITH EXSISTING DBE
BYTE ADDRESSING TEST
NULL TEST
NULL
NULL
NULL
NULL
NULL
NULL
NULL
NULL
NULL
NULL

TEST
TEST
TEST
TEST
TEST
TEST
TEST
TEST
TEST
TEST

L136::35:333

SYMIABO

MEV1L.J MEMORY DIAG.

R PRTERN

EASE STATEMENT

MACRO Y05.02

7254 016772

MKTEST: SUBTST

’

7255 016772

§ $SUBTEST

017006
017010

001402

000001

017014

737 002350

7260 017016
7561 017024
7262
017032
7268 017036
7264 017040

017040
017046
017050
017056

7265 017060
7266 017062
017062

017100
017106
017110
017114
017116

017132

023234

017132

024106

004770

017132

032777
001003
005737

000001

017120

INVALIDATE
END ;OF IF MKPATCRO)

;CLEAR ALL CSR'S

P, CTLKVEC
22 CTLKVEC

ISR

163530

L142:::::::

ECCINIT

7374 017124

END ;OF IF @SWO

017124

BR L145

\TRAP ON DOUBLE 617CRAORS’ (NORMAL)
145:;:::::

7275 017124 005037 002076

CLR
NOPAR
RETURN

7278
7279

MARNING IF YOU CHANGE THIS TABLE ALSO
{CHANGE “$DOMO” - “$DDWS" (THE PATTERN BIT MAP)

7276 017130

000207

7280

7281 017132

7282

017132

023234

7284 017136

020144

7286 017142

017526

7283

017134

7285 017140

MKPAT:

iPAT

BIT 0SWO,BSWR
BNE L143
TST ACTFLAG
BEQ L144
L143: x&
Fl

;TRAP ON SINGLE BIT ERRORS

ELSE

000401

:SAVE VECTOR IN CASE OF +K

002350

ENASBE

R R

CHP MKPAT(RO).OMT0034
8EQ L142
CHP MKPATCRO). OMT0999
8EQ L142
: INVALIDATE BACKGROUND PATTERN ON "BANK*

CALL
SMKPATCRO)
;INDEX OFF TABLE
IF 6SWO SET.IN @SWR OR ACTFLAG IS TRUE

7273 017122 104472
017122

B8R L141

MoV
02, NOPAR
L INDICATE PARITY ACTION
MOV
02 . PCBUMP
i TRAPS ADD 2 TO PC
MOV
PATTERN,RO
iGET PATTERN NUMBER
ASL
RO
MAKE IT A WORD ADDRESS
IF MKPATCRO) NE @MTO034 AND MKPAT(RO) NE OMT0999

MOV
SuUB

B8EQ L140
383

L140:3353:3

CLRCSR

104511

001402

L137:

END ;OF IF

012737 000002 002076
012737 000002 002326
C13700 002112
006300
026027
001405
026027
001401

BIT 0SWO.8SWR
BNE L137

;DISABLE ERROR CORRECTION

ELSE

000401

7271 017116 104506
7272 017120

ECC TEST DISPATCH

ECCOIS

7267 017062 010637 002146
7568 017066 162737 000002 002146
7369 017074
7270 017100

SUBR

ST ACTFLAG

7258 017014 104502

7259 017016

ECC TEST DISPATCH>>

IF @SHO SET.IN @SWR OR ACTFLAG IS TRUE

163636

7256 017010 104470
017012

SEQ 0173

‘....‘........‘.....‘......“‘..‘.....‘....“....‘.‘..““.‘.‘....““...‘..“‘.

032777
001003

7357 017012

<<SUBR

Pege 165

'“...‘.‘.‘.“...‘.......‘.‘.....‘...........‘.....‘...‘...“‘..‘...‘......‘....

016773
017000

017002

Monday O7-Oct-85 16:57

L INDICATE PARITY ACTION

TIME

DISCRIPTION

0034

;<1 SEC

'SOFT ERROR - BACKGROUND PATTERN TEST

MT0007

:¢1 SEC

{ADDRESS BIT TEST

MT0002

;<1 SEC

iNOTE NTOO34 MUST BE FIRST € LAST

020322

10017

017432

MT0001

<1 SE€
;<1 SEC

{HOLDING 1'S
& 0'S TEST
i ADDRESS TEST

;:COMPLEMENT ADDRESS TEST

g‘v.nguo Eggl*ég'%h,?}‘w
7287 017144
7288 017146
7289 017150

; 1 SEC
; 1 SEC
; 1 SEC

1ROTATING ZEROS TEST
;ROTATING ONES YEST
.mcnm 0'S € 1'S TEST

MT0024
MT0031

;20 SEC
; 3 SEC

;FAST GALLOPING PATTERN TEST
:1SOB-A-LONG TEST

MT0033

;35 SEC

8%0714

7292
7

017156
017160

021012
%‘2

7295 017164

023046

017170

024106

017162

017166

7
017172
7
017174
7301 017176

30; 0

7303 017202
7304 017204
7305 017206
7306 017210

Pege 185-1

MTO004
MT000S
MT0021

01718

Monday 07-0Oct-85 16:57

017756
020026
020424

7291 0171

MACRO Y05.02

1220

023234

MT0022

;10 SEC

MT0026 ;<1 SEC

.Rm DATA

TEST

MT0032 ;<1 SEC

a\RITE RECOVERY TEST

MTO0034

;<1 SEC

§ T ERROR - BACKGROUND PATTERN TEST

; O SEC

sNULL TEST

; O SEC

iNULL TEST

nmcn GOBBLE TEST

;NOTE MTO034 MUST BE FIRST & LAST

MT0999

024106
024106
024106

MT0999
MT0999
MT0999

; O SEC
; O SEC
; O SEC

024106
024106
024106
C24106

MT0999
MT0999
MT0999
MT0999

;
;
;
;

024106

;REFRESH SN?ETI'G DIAGONAL

SEQ 0174

MT0999

O
O
O
O

SEC
SEC
SEC
SEC

IML TEST
sNULL TEST
sNULL TEST
sNULL
;NULL
sNULL
;NULL

TEST
TEST
TEST
TEST

CVMJABO MSV11-J MEMORY DIAG.

SUBR

ECC TEST DISPATCH

MACRO Y05.02

7309 017212

012737
012737

000002
000002

002076
002326

7313

0172

012737

060002

002414

7315 017

006300

017

017260

017266
7;17 017270
7318 8{;232

026027

017316

023234

026027

017316

024106

001401
104511

;33‘ 017314

<<SUBR

PARITY TEST DISPATCH>>

1¢SUBTEST

SUBR

PARITY TEST DISPATCH

1988888804488 48080880000880808888808888880008880080040880480880000000000000000000

MOV
MOV

162737
004770
005037

000207

7
017316
7331 017
7332
017322
7333
017324
7334
017326
7335 0173
7336
0173
7337 017334
7
017336
7339 017340
7340 017342
7341 017344
7;:3 017346
7
017350
7344 017352
7345 017354
7346 017356

7347 017360
7
017362

7349

017
7351 017366

7352 017370
7353 017372
7354 017374

MOV

of IRST, TESTADD

ASL

MOV

000002
017316
002076

:INDICATE PARITY ACTION
+TRAPS ADD 2 TO PC

oF IRST+2, TESTADD+2

PATTERN, RO

;:GET _PATTERN NUMBER

MAKE IT A WORD ADDRESS

IF MUPAT(RO) NE oMTO034 AND HJPA*(RO)
NE oMT0999

END ;0F IF MJPAT(RO)

MOV

002146

suB
CALL
CLR

RETURN

73
;ggg

7328
7
017316

92 ,NOPAR
#2,PCBUMP

INVALIDATE

7319 017272 010637 002146
7
017316
7321 017
732; 017310

SEQ 0175

MJTEST: SUBTST

012737 060000 002412

7314 017242 013700 002112

7316 017

Page 187

1888886888800 4888004088040000080800808808808800800008800000000000000000000000000

7310 017212
7311 017

7312

Monday 07-Oct-85 16:57

SP,CTLKVEC

#2,CTLKVEC
SMJPAT(RO)
NOPAR

CMP MJPAT(RO),oMTO034
BEQ L146
CHMP MJPAT(RO),#MT0999

BEQ L146
+ INVALIDATE BACKGROUND PATTERN ON "BANK"
133

sSAVE VECTOR IN CASE &
; INDEX OFF TABLE
;INDICATE PARITY ACTION

sWARNING IF YOU CHANGE THIS TABLE ALSO
;CHANGE “$DDWO" - “$DDW5S"” (THE PATTERN BIT MAP)

023234
020110
020322
020144
017432
017526

017642
017756
020026
020424
023334
020714
020746
021220
021012

MJPAT:

sPAT
TIME
DISCRIPTION
;NTE MTO034 MUST BE FIRST & LAST

0034
HT0006
MTO017
MT0007
MTO001
MT0002

022342
022532

MT0003
MT0004
MTO0005
MTO0021
MTO0035
MT0022
MT0023
MT0026
MT0024
MTO031
MT0032

024106
024106

MT0999
MT0999

023046
023234

024106
024106
024106

MT0033
MT0034

;<1 SEC
s<1 SEC
;<1 SEC
;<1 SEC
;<1 SEC
;<1 SEC
; 1 SEC
; 1 SEC
; 1 SEC
; 1 SEC
;<1 SEC
;10 SEC
;10 SEC
;<1 SEC
;20 SEC
: 3 SEC
;<1 SEC

335 SEC
1 SEC

:SOFT ERROR_ - BACKGROUND PATTERN TEST
;INITIAL DATA TEST
sHOLDING
1'S
€ 0'S TEST
;ADDRESS BIT TEST
:ADDRESS TEST
;COMPLEMENT ADDRESS TEST
+3 XOR 9 WORST CASE NOISE TEST
:ROTATING ZEROS TEST
sROTATING ONES TEST
sMARCHING 0'S & 1'S TEST
:WORSE CASE NOISE PARITY TEST
;REFRESH TEST
;SHIFTING DIAGONAL TEST
;RANDOM DATA TEST
:FAST GALLOPING PATTERN TEST
:SOB-A-LONG TEST
:WRITE RECOVERY TEST

sBRANCH GOBBLE TEST
;SOFT ERROR - BACKGROUND PATTERN TEST

sNOTE !‘ITOOM MUST BE FIRST & LAST
TEST

MT0999
MT0599
MT0999

; O SEC
: 0 SEC

; O SEC
: O SEC
; O SEC

sNULL
sNULL TEST
sNULL TEST
sNULL TEST
sNULL TEST

CVMJABO MSV11-J MEMORY DIAG.

PATTERNS

MACRO Y05.02

Monday 07-Oct-85 16:57

.SBTTL

7356
7357

.SBTTL
MT0000: SUBTST

7358
7359 017376

7360 017376
7361 017402
7
017406

7367 017432

) 2824882545282

017432
017440
017444
0174
0174

005037
012700
012701
004737
012737
004737
000207

002262

012737
12700
012701

002300

172254

7376 017470
;377 017476

177652

177654

7383 017524
7384 017526

MEMORY TEST SETUP ROUTINES
<<MT0000
SETUP DATA PATTERN TEST>>

8588888888 8008082200000

MOV
CALL
MOV

CALL
RETURN
MTO001: SUBTST

@SIZE,R1
@MTPO0O
, SUPDOADD

REGCOPY

0 AL AR RS2 R AR 20000004 00000000000

;ELSE DO PATTERN IN MAIN MEMORY

SUPDO3

<<MTO0001

030000

032356
024552
024334

MTOOu1

002456

172252

73.3

PATTERNS

SETUP ADDRESS TEST>>

(04848484048 4008 0000008484048 48840 4050000408408 8884808480408444080880088008000000

7373 017456
7374 017464

7375 017466

SEQ 0176

MTO000 SETUP DATA PATTERN TEST
; #SUBTEST
) 2825820288888 8280230848884433880822820000 0002808000800 804440000000800480000000000
CLR
REALPAT
;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY
OFIRST,RO
MOV

:sSUBTEST
7368
7369
7370
7371
7372

Page 188

2s:
38:

as:
002262

MT0002:

SETUP ADDRESS TEST
T

MOV
MOV
MOV
TST
BNE
cMP
BNE
B8R
cMP
BNE
MOV

#1,REALPAT
oF IRST,RO
@SIZE,R1
NOSUPER
24
SIPARS, SIPAR6
as
38
UIPARS , UIPAR6
as
#30000,R1

MOV

#MTPOO1 , SUPDOADD

CLR
CALL

CALL
RETURN
SUBTST

R2
REGCOPY

;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY

;SET UP CALLING ADDRESS

SUPDO3

<<MT0002

SETUP COMPLEMENT ADDRESS TEST>>

FRREAAAAEARASAARLRAREAARAPRARAEARAEEERARERAE482244
082888888858 08588888800800880

1#SUBTEST

MT0002

SETUP COMPLEMENT ADDRESS TEST

JRSEARASEAEERERERERRRARRARELALRLARNEREERBEAA4AE4030884808888880888084380408808480

MOV
MOV
MOV

002300

7385 017Sg=

100001
002456

7401 017624
7402 017626
7403 017634

172252

172254

177652

177654

3¢:

030000
140000
120001
000001
024604
024334

24:

44:
002262

92, ,REALPAT
OLAST+2,R0
oSIZE,Ri

MOV

oF IRST,R4

MOV

#MTP002 , SUPDOADD

MOV
TST
BNE
cMP
BNE
BR
cHP
BNE
MOV
MOV
MOV
MOV
MOV
CALL

9100001 ,RS
NOSUPER
24
SIPARS,SIPARG
a4
3¢
UVIPARS,UIPARG
4%
#30000,R1
#140000,R0
©120001,RS
#1.R2
R1,R3
SUPDO3

;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY

:SET UP CALLING ADDRESS

CVMJABO MSV1 -g MEMORY DIAG.

. MT0002

SET

7404 017640

MACRO Y05.02

OMPLEMENT ADDRESS TEST

Monday 07-Oct-85 16:57

Page 188-1

SEQ 0177

RETURN

000207

7407 017642

MT0003: SUBTST

<<MT0003

:#SUBTEST

MTO003

SETUP 3 XOR 9 WORST CASE NOISE TEST>>

;888848888884 888888888808884400200808080408880880804804000840080800848000000000000

SETUP 3 XOR 9 WORST CASE NOISE TEST

1880888888884 800884888888R080488888404004488080404000008000808848000000000000000

IF EQFLAG IS TRUE THEN $RETURN

7408 017642

05“2 83’337 002132

g{;:g“' 006207
7409 017652
740 017660

012737

7412
017670
7413 017674
7414 017700
7415 017704
7416 017710
7417 017714
7418 017716
'mo 017724
29 017730

012701
012703
072327
012702
C12705
xouss
012787
004737
104416

017740
ou'm

022737

7411 017

004737

000003
002326

18:

2s:

060000
020000
177770
000004
000100

0013447
oznsa
017754
74
742

002616

FLIPWARN

;SETUP WARNING consmns € R2

MOV

ormsr Rl

ASH

o-a
.ai

as:

:TRAPS DO NOT ADDTO PC

iR1 <-- STARTING ADDRESS

:R3 <-- R3 / 256.

;SMALL LOOP SIZE
:MEDIUM LOOP SIZE

CALL

SUPDO3

;00 IT IN MAIN MEMORY

MOV
CALL
cHP

@MTPBO3, SUPDOADD
SUPDO4
@3, FLIPLOC

;DONE WITH 4 PATTERNS

gvgm

:NO - LOOP

RESREG

RTS PC
1*

;SETUP PATTERN mea ok’ TYPEOUT € DISPLAY

PCBUMP

CALL

47:;}

#3,REALPAT

CLR

MOV
o4 ,R2
MOV
064. RS
SAVREG
MOV
@MTPAO3, SUPDOADD

002262

024676 002262
orma 012737
004737 024350
000003

MOV

002300

032366

024636
024334

TST EQFLAG

BEQ L147

10€0,177777):C177777.0):(401,177777):(177777,401) )2

'
{

——

CVMJABO MSV1 . MEMORY DIAG.

MT0002

SET

MACRO Y05.02

COMPLEMENT ADDRESS TEST

7428 017756

74
74
74
74
743

017756
Ol??g‘
017772
017776

Monday 07-Oct-85 16:57

MT0004: SUBTST

<<MT0004

1#SUBTEST

MTO004

Page 190

SEQ 0178

SETUP ROTATING ZEROS TEST>>

18886808685888884888888888808888088084088808880008800088008800800080000000000000

0
013702

002614

002300
002326

032516
060000

040000
024774
024350

002262

SETUP ROTATING ZEROS TEST

1988848848848885885488088888308888800800008888884808808040044800000080888004800000000

MOV
MOV
MOV
CALL
MOV
MOV
MOV

CALL
RETURN
MT0005: SUBTST

04 . REALPAT
@4 .PCBUMP
ONES,R2
BACKGND
oF IRST,RO
oSIZE,R1
OMTPAO4 , SUPDOADD
SUPDO4

:SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY
;TRAPS ADD 4 TO PC
;WRITE BACKGROUND OF ONES

:SET UP LINKS

SETUP ROTATING ONES TEST>>

<<MT0005

(8888848588888 808088888485888888 0288008884084 088800088880488880808000808000000800

$sSUBTEST
002300
002326

032516

7447 020074
7448 020100
7449 020106

0
024350
025010

002262
025046

025046

MTO005

SETUP ROTATING ONES TEST

(8 8 8 048 80 848884884888808088283358888888808888808888088804046488888088880880800

MOV

:SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY

CALL
MOV
MOV
MOV
MOV
CALL

BACKGND
OFIRST,.RO
9SIZE,R1
OMTPOOS,
SUPDOADD
OMTPO05+14 ,MTPBO4+16
SUPDO4

;WRITE BACKGROUND OF ZEROS

'C'L’x

'R*E’¥

s.PC.W

OMTPAO4+14 ,MTPBO4+16

:TRAPS ADD 4 TO PC

:SET UP LINKS
;RESET TEST'S ORIGINAL VALUE

i
*

CVMY
Vil-J MEMORY DIAG.
FY0009°
SEYUR
ROTATING ONES TEST MACRO Y05.02
7452 020110

MT0006: SUBTST

012737
012737
012701
012737

000207

142

7459 020144

004737

000006 002300
000004 002326
002412
025108 002262
024334

CALL

RETURN

MTO007: SUBTST

012737

000007

nci 133 cmii2sI; 032516

7467

7469 020206

7470 020206
7471 020214
7472 020222
747
7474 020234
7475 020240

SETUP INITIAL DATA TEST>>

SUPDO3

<<MT0007

;00 IT IN SUPERVISCR MODE

SETUP ADDRESS BIT TEST>>

j..‘..‘.‘.O‘....““‘.“.““‘.‘.O“..‘..‘......‘....““O.‘...‘.‘..‘.“.‘..0‘.‘

002300

746
160 012701 060000
7464
1gt 012702 000001
7465 020170 cgzo;
7466 020172 012737 025304 002262

7468

SEQ 0179

MTO006 SETUP INITIAL DATA TEST
1 #4SUBTEST
;“‘.““‘“0.‘.‘..0..‘.‘.‘.‘."O‘fi‘.“.‘.‘.‘..‘.“...‘.“.‘...“.“‘...‘.....“
MOV
06, REALPAT
;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY
MOV
o4 .PCBUMP
;TRAPS ADD 4 TO PC
MOV
¢TESTADD,R1
MOV
OMTPOO6,
: SUBTEST

;“uo ozoiu

<<MTO006

- 192

'.‘..‘.‘.‘.0“...‘.OO..‘..‘...‘.‘.“......“...‘.‘..‘.“‘..“.‘....‘...‘..“‘...

7453 020110
74
116
7435
74
130
ngz g;gxu

Mondey 07-Oct-85 16:57 Page

004737

000207

024334

MTO007 SETUP ADDRESS BIT TEST

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

&ox

‘;.aenun

MOV
MOV
8IS
MOV

OFIRST,R1
#1,R2
R2.R1
eMTP007, SUPDOADD

CALL
CALL

RETURN

MT0010: SUBTST

SUPDO3

<<MT0010

;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY

;0F ZEROS

;D0 IT IN SUPERVISOR MODE

SETUP BYTE ADDRESSING TEST>>

;‘..l.‘.“‘.“"....“.0‘.“...‘0“‘““..0.‘..“‘..."..““".‘.““O..‘.....‘

012737 000010 002300
012737 000004 002326
013704
412
012737
002262
004737
000207

024334

1 #SUBTEST
MTO010 SETUP BYTE ADDRESSING TEST
;.‘.t..".‘.‘.‘.“.“‘.‘....‘...".““‘.““.‘.‘..‘.‘.‘O....O.....‘.‘.O‘....‘..
MOV
©10,REALPAT
:SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY
MOV
04, PCBUMP
:TRAPS ADD 4 TO PC
MOV
TESTADD.
R4
MOV
#MTP010. SUPDOADD
CALL
RETURN

SUPDO3

:D0 IT IN SUPERVISOR MODE

|
~

CVMJABO MSV1i1-J MEMORY DIAG

MT0010

BYTE ADODRESS ING

TEST

7478 020242

Y05.02

Monday 07-Oct-85 16:57

MT0014: SUBTST

<<MTO014

:#SUBTEST

MTO014

Page 194

SEQ 0180

SETUP BASIC DOUBLE BIT ERROR TEST>>

$868864688808800880088080608088080880888080080800080080408080888008000400000000000

SETUP BASIC DOUBLE BIT ERROR TEST

18068048800888008048848848880088008800000808808004888808800080080004880048040000000000

005737
001404

IF ACTFLAG IS TRUE OR APTFLAG IS TRUE

002350

TST ACTFLAG

BNE

002352

IF $PASS NE €0 THEN $RETURN

056724

100000
0
12
037734

L1SO::33333

TST $PASS

BEQ L152

END; OF IF ACTFLAG

000014
037646

L150

002300

MOV

CALL

LET R1

014 ,REALPAT

MAPKERNAL

:= €100000

CALL GETCSR
CALL MTPO14
CALL UNMAP
RETURN

RTS PC
L1S2:333333

L1S1:; ;

;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY
iHAP KERNAL SPACE
i{SETUP TEST ADDRESS

MOV 9100000, R1

;GET CSR _INFO FROM CONFIGURATION T ABLE
:00 BASIC DOUBLE BIT ERROR TEST
;UNMAP KERNAL SPACE

CVMJABO MSV1l-J MEMORY DIAG

MT001&4
|
|

;
!

.
|

SETUP

MACRO Y05.02

BASIC DOUBLE BIT ERROR TEST

7491

7492 020322

7493 020
7494 020
7495

7496

Pege 196

SEQ 0181

MTO017: SUBTST

<<MTOO017

SETUP HOLDING 1°'S & 0°'S»>>

1 ¢SUBTEST

MTO017 SETUP HOLDING 1'S € 0'S

] 2828828808088 28288888828828088288888888080888808808800880800008280008088880000000080000000

012737 000017 002300
012737 025736
002262

36 004737 024334
2

Mondey 07-0Oct-85 16:57

000207

] 2882888823883 238848888888888888888828088088800380082080088208080800082800000080000000

MOV
MOV

CALL

RETURN

017, ,REALPAT
eMTPO17, SUPDOADD
SUPDO3

;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY
;00 IT IN SUPERVISOR MODE

MACRO Y05.02
11-J MEMORY DIAG.
€ 0°'S
ING
1°'S
HOLD

MT0020:

7499 020344

SUBTST

<<MT0020

Page 198

SEQ o182

SETUP SYNDROMES TO CSR ON SINGLE BIT ERROR>>

18 8 8 8028 8 80088884888888808888888888288288888088808088800808888008800830000008820000800

MT0020

1 sSUBTEST

SETUP SYNDROMES TO CSR ON SINGLE BIT ERROR

18888868006880838800088880008008008088880880808080800000080840880000000000000000

IF ACTFLAG IS TRUE OR APTFLAG IS TRUE

TST ACTFLAG

B Wi
056724

IF SPASS NE #0 THEN $RETURN

L1S4

S bt

END; OF IF ACTFLAG
000020
037646

L1S3::5333

MOV

CALL

920, REALPAT

MAPKERNAL

L1SS: 333333

L154:;

1SETUP PATTERN MUFGER FOR' TYPEOUT & DISPLAY

LET R1 := #100000
CALL GETCSR
CALL MTPO20

—

Monday 07-0Oct-85 16:57

SY0358° UEYE dvnonones 10 ¢sm oM BT
T oTM 7T St P W
7511 020424

7512 020424

ozotg

SS 020702

<<MT0021

SETUP MARCHING 0'S € 1'S TEST>>

; #SUBTEST

MTO021 SETUP MARCHING 0'S & 1'S TEST

3"......“‘...t.....“..“...‘.““."...‘..“‘..‘0‘.‘.....‘.‘.‘..‘.“‘..0....‘
'...“...‘...‘.....0‘.‘...‘..“..‘..“..‘“..“‘...“...‘....“““‘.0““..“..

012737

177777

7513 m osgn 000021
4
013702 002632
7515 020444 004737 032516
0 °§8’
o&o 3
ouvgg 160000
010
012704 060000
022737 000005
4
001450
7
76 022737 000003
001407
7
022737 000007
7
14 €01003
7
16 012701 140000
oxo;os
7529
©
37 000177
7
001003
34 oxz'rgg 140000
7
010
7
2 012737 026330
7
gg 004737 024334
7
012737 026360
7
004737 024350
7
010401
7
70 012737 026414
7
76 004737 024350
7
012737 026450
7
10 004737 024350
7542
020614 000434
7
16 022737 000177
7
001003
7
012701 140000
010105
7547
020634 012737 026330
7 gw 004737 024334
7
012737 026360
7550 gsgs“sz 004737 024350
$1
010401
7 gi gggsa 012737 026414
7
0 004737
0243
5S4 020674 012737 026450
7556 020706
7557 020712

MTO021: SUBTST

SEQ 0183

004737

005037
000207

024350
002440

SET NOSCOPE

002440

002300

004064
004064
002102
002102 3%:

002262 S$:
002262
002262
002262

002102 1$:
002262 43:
002262
002262
002262
2s:

MOV

@-1,NOSCOPE

MOV
MOV
CALL
MOV
SWAB
MOV
MOV
MOV
cHP
BEQ
CHP
BEQ
CHP
BNE
MOV
MOV
CHP
BNE
MOV
MOV
MOV
CALL
MOV
CALL
MOV
MOV
CALL
MOV
CALL
B8R
cHP
ENE
MOV
MOV
MOV
CALL
MOV
CALL
MOV
MOV
CALL
MOV

021 ,REALPAT
{SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY
BAKPAT ,R2
BACKGND
R2.R3
R3S
OLAST+2,R1
R1,RS
oF IRST R4
@5,PROTYP
;IS THIS AN 11/83
17
:BRANCH IF IT IS
#3,PROTYP
;IS THIS AN 117247
33
:BRANCH IF SO
07, BANK
34
©140000,R1
R1,RS
0177, BANK
S$
#140000,R1
R1,RS
oMTPA21, SUPDOADD
SUPDO3
e@MTPB21, SUPDOADD
SUPDO4
R4 ,R1
oMTPC21
, SUPDOADD
SUPDO4
#MTPD21, SUPDOADD
SUPDO4
2$
©177,BANK
a$
©140000,R1
R1,RS
oMTPA21, SUPDOADD
SUPDO3
#MTPB21, SUPDOADD
SUPDO4
R4 ,R1
oMTPC21, SUPDOADD
SUPDO4
#MTPD21, SUPDOADD

CLR
RETURN

NOSCOPE

CALL

SUPDO4

MACRO Y05.02
CVMJUABO MSV11-J MEMORY DIAG.
SETUP MARCHING 0'S & 1'S TEST

MT0021

TMondsy 07-Oct-85 16:57

MT0022: SUBTST

7559 020714

Page 200

<<MT0022

SEQ 0184

SETUP REFRESH & SHIFTING DIAGONAL TEST>>

MT0022 SETUP REFRESH & SHIFTING DIAGONAL TEST
+SUBTEST
$'.....‘..‘.“..‘.....‘.“.‘.".....‘...“.“...“........‘.“.‘.“.....“..‘....
3.."..‘.‘....‘.“........‘..“....................“.‘....‘....“.‘.‘.........‘

004737

024122

cALL
U KAMITEST
ON.ERROR THEN SRETURN

103001

000207

012737
012737
004737
000207

000022 002300
026500 002262
024334

MOV
MOV
CALL

022, REALPAT
oNTP022
, SUPDOADD
SUPDOS

SUBTST

<<MT0023

RETURN

MT0023:

LCHECK FOR KAMIKAZE MODE
{IF NOT IN KAMIKAZE MODE RETURN
BCC L156
L156:a*

RTS PC
H

,SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY
;00 IT IN SUPERVISOR MODE
SHIFTING DIAGONAL TEST>>

]“...“..‘...“‘.........“‘..“........“.........‘..“........“..‘.“.‘.....

: #SUBTEST

1369 020782

020732

7570
71

7572

020756

004737

103001
000207

026122

cALL | KAMITEST

ON.ERROR THEN SRETURN

756
764

012737
012737

000023 002300
026500 002262

772

012737
004737
005037
000207

024334
002004

772

7573 021000
7574 021004
7575 021010

177777

MT0023 SHIFTING DIAGONAL TEST

].‘..‘.‘.......“................‘.......‘......‘..‘...‘....‘.“..‘...‘...“‘..‘

002004

MOV
MOV
SET
CALL
LR

023, REALPAT
#MTP022
, SUPDOADD
DIAGFLAG
SUPDO3
DIAGFLAG

L CHECK FOR KAMIKAZE MODE

{IF NOT IN KAMIKAZE MODE RETURN

B8CC L157

RTS PC
L157::333:3

SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY
;IDENTIFY DIAGONAL TEST TO MTPO22
MOV @-1,DIAGFLAG
;D0 IT IN SUPERVISOR MODE

f
|

D
CVMJABO MSV11-J MEMORY
MT0023 SNIVTI'G oxm YEST

MACRO Y05.02

Monday 07-0Oct-85 16:57

MT0024:

7577 021012

SUBTST

7578 021012

004737

012737
gl 737

1046
tg

010203
010

S
7

4
7

021022
021
1
10 {

7580

177777

000024
002632

000
01270

831074

022737

112

00108;

002440
002300

060000
157776
000005
000003

7 ’;
4

1114
1
1

8327
2737
001003

000177

1140

012737

027214

002262

u;g
11

0227
00100

000177

002556

1164

xougs

760
7:8;

il
0211

1146

001
022737

o
%‘4

000007

137776

11"

012737

027214
0243

021200
1202

104416
000302

761
1206
7614 021212

004737
005037

021160

;
7610
761

7612

021174

021204

7615 021216

737

000303
000207

002102
002102

137776

0127

760,

024350
002440

MT0024

SETUP FAST GALLOPING PATTERN TEST

KAMITEST
CALL
ON.ERROR THEN $RETURN

1102
gs{l“

B
7600
760

SETUP FAST GALLOPING PATTERN TEST>>

<<MT0024

188088808442 834888888888888080088822888888880088888448008880800080808800080080000400

024122

e 032516

0218*3 001426

SEQ 0185

188688848888 3888834888888888088288880802880058888088080000000800
8000800000800 00000

s #SUBTEST
7579 32%816

Page 201

002262

74:

14:
44:

24:

SET
MOV
MOV
CALL
MOV
MOV
SWAB
MOV
MOV
cHP
BEQ
cHP
BEQ
CHP
BNE
MOV
cHP
BNE
MOV
MOV
SAVREG
."3'
cHP
BNE
MOV
SAVREG
MOV

NOSCOPE
924 ,REALPAT
BAKPAT ,R2
BACKGND
R2.R3
R3.R4
R4
OF IRST,R1
OLAST,RS
#5,PROTYP
13
#3,PROTYP
33
27 .BANK
3
2137776,RS
u-n BANK
0131715 R1
R1,RS
gmnu. SUPDOADD
0171 LASTBANK
0131115 RS
eMTPB24
, SUPDOADD

SUPDO4
CALL
&Eoo IT AGAIN FOR COMPLEMENT DATA
SREG
SWAB
R2
R3
SWAB
CALL
SUPDO4
NOSCOPE
CLR
RETURN

;:CHECK FOR KAMIKAZE MODE
:IF NOT IN KAMIKAZE MODE RETURN

BCC L160

RTS PC
L160:33333:

3 oxsmw
;SETUP PATTERN NUMBER FORm'soui

CVMJABO MSV11-J MEMORY DIAG.

HT0024

MACRO Y05.02

SETUP FAST GALLOPING PATTERN TEST

Monday 07-Oct-85 16:57

MT0026: SUBTST

7618 021220

<<MT0026

Page 203

SEQ 0186

SETUP RANDOM DATA TEST>>

".....‘..‘.‘.“‘..“.‘.“..".‘...‘...‘...‘...‘...“.........‘...“‘.‘...‘.....

L ]
EE LR *e ITTIT
Y]
':?3:5&:‘...‘.‘2:‘..‘...fi.:“’;.:‘...‘.2:::‘:551‘..

Te2s
S31%8s Sioacs
7625
012701

7626
7
7628 02

76
7631

7632
7
7634
7635
7636

% 022737
Sa1406 000007. 002102

001002
012700 014000
C€22737 000-77 002102 38:
001002
012700 014000

7638 iig 832787 o27252 o273s2 |
;.38 83{ 36 0 ;g; ozzg;: 002262
764
027276 027352
764 §11?“39 005037
013737 037366
743

021362

012737

027262

00226

7648 031375 004737 024334
7646 021376 000432
021400 022737 000177 002102 1%:
7647
764
76
7651

7638
76
7655
6

410 012700 014000
414 104415
021416 012737 027252 027352

as:

031482
088737
Oaasse Cvaee2
1436
005037 027276
021442 012737 027266 027352
1450

012737

027262

7639
7660 O3146a
021470 010337
010237 03604
002602
7661 021474

000207

.
oF IRST,R1

MOV

012700 020000
5737 000005 004064
001445

021276
021
1306
021312
021
021322

HOV " 26 REALPAT
HOV
SEEDLO,R3

002262

MOV
cHe
BEQ

0SIZE/3.RO
05, PROTYP
18

BNE
MOV
cHP
BNE
MOV

38
214000,
RO
0177 .BANK
7%
#14000,RO

Sta
cHP

ROVC aMTPA26+4.MTPD26+14
rg& mrngsfsfipoonoo’
RANOGD
MOVR IMTPB26+4,MTPD26+
14
MOV

eMTPB26, SUPDOADD

;D0 WE MAVE AN 11/83 ?
i{BRANCH IF WE DO

AR
ARCH TF SO
v

FOR ERROR
1SET
OF NEXTREPORT
LT O

CALL _ SUPDO3
24
$177,8ANK
cre
B8R

MOV
#14000,R0
SAVREG
MOV
OMTPA26+8,MTPD26+14

CALL
CLR
HOV

Suppos:
" SUPOOADO
OMTPB26+4,MTPD26+ 14

F
ISET
0PNEXT
LT C

0.
MOV

°
A3
R2 . SLEDLO
SEEDHI

F
! UPDATE.
.Kp—-

MOV.

28 :

sl
#7.BANK

e
“;o - ;;';;“'“““““
JINITIALIZE RANDOM NUMBERS

RETURN

RANODD

#MTPB26,SUPDOADD

7619 021220 012737 000026 002300 '
;g; ggfi gi!;gg 002604

CVMJABO MSV1l1-J MEMORY DIAG.
MT0026 SETUP RANDOM DATA TEST

MACRO Y05.02

Mondey 07-Oct-85 16:57

MT0027:

7664 021476

SUBTST

Page 205

<<MT0027

SEQ 0187

UNIQUE BANK TEST>>

18668886488 80888048888488488080808884800008800800880880880008800000000000000000000

MT0027

1 #SUBTEST

UNIQUE BANK TEST

188688484840808400888888848888888888488088480400800040080800088580880008800000000000

;MAKE SURE THAT EACH BANK CAN HAVE UNIQUE DATA

7665

7&
051476

88892288888

HRRRARRAARRARRARRA

7675
7676

7677
7678
7679
7680 02

FEPEt
S iy33333433

7:9021 1:

7681 831 76

23737

021642
642
7689 021642

o Sit38
it
1654
021656

7691 021656

021656

021662
021670
021672

7692 021672

002300

812787 024334

002522

012737

177777

002426

012737

000001

002452

005037

002102

004737

037760

C05737
001436
737
001033
104511

002116

013702
012700
010004
012701
010103

002102
060000

023727
001005
012737

002452

004777

7688

000027

023727
001005
012737
004737

;WRITE AND READ THE BANK NUMBER IN EACN BM.((EXCEPT WHERE inc rmS;L
MOV
027 ,REALPAT
;SETUP PATTERN NUMBER FOR TYPEOUT
& DISPLAY
CLRCSR
;:CLEAR CSRS
MOV
@SUPDO3, LINK1
:SET UP LINK
SET NOFSMODE

STAR27: FOR I

FOR BANK

CALL EXBANK
IF ACFLAG IS TRUE AND RRFLAG IS FALSE

INVALIDATE

LET R2:= BANK

MOV
MOV

SFIRST,RO
RO,R4

MOV

R1.R3

MOV

MOV
CALL

END ;OF I

MOV

027600
024334

005237
023727
003717

002102
0v2102

002452
002452

; INVALIDATE BACKGROUND PATTERN ON “BANK"

OMTPO34, SUPDOADD
FI.IM( 1

MOV BANK,R2

CcMP I,01
BNE L162

L162:::::::

IF I EQ @2

002452

TST ACFLAG

#S1Z€,R1

IF I EQ 21

027572
160702

CLR BANK
B24:;:3333:

BEQ L161
TST RRFLAG
BNE L161

002124

040000

#-1,NOFSMODE

MOV 01.I
B23:5:33133

:= #0 TO LASTBANK

#MTP034+6,SUPDOADD

CALL
SUPDO3
END ;OF IF
END ;OF IF

005237
023737
003727

MOV

:= @1 TO @2

END ;O0F FOR BANK

CMP I.02
BNE L163

Li63:;:::33:
L161::333:3

INC BANK

CMP BANK,LASTBANK
BLE B24

002556
END ;OF FOR I

IF FSTFLAG IS TRUE

E24:;::::33:

INC I
CMP I
BLE
B
E23::353833

CVMY

MT0027

MSV11-J MEMORY ?IAG.
BANK TES

UNI

021672

005737
001403
005037
000207

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 205-1
TST FSTFLAG

002446

NOFSMODE
CLR
RETURN

002426

END

002452

012737

013737

002556

004737

037760

005737

002116

002102

;0F IF FS7FLAG

FOR I

:= @1 TO @#2

FOR BANK

:= LASTBANK DOWNTO @0

CALL EXBANK
IF ACFLAG IS TRUE AND RRFLAG IS FALSE

LET R2

002102

023727

002452

000001

027572
160514

002262

2006

023727
001005
012737
004737

060000

040000

002452

000002

027600

002262

024334

:= BANK

COM
R2
OFIRST,RO
MOV
RO,R4
MOV
MOV
#SIZE,.R1
MOV
R1,R3
IF I EQ #1
#MTPO34, SUPDOADD
MOV
CALL
SLINK1
END ;0F IF

2006

7710 022006

IF I EQ @2
#MTPO34+6,SUPDOADD
MOV
SUPDO3
CALL
END ;OF IF

END ;0F IF

005337
023727
002327

002102
002102

005237

002452
0v2452

023727

003716
005037
000207

002426

L164:::33::
MOV 1.1
B2S::33333

MOV LASTBANK,BANK
B26::::33:
TST ACFLAG
TST RRFLAG

13702
003%02
012700
010004
012701
010103

7707 021774
7708 02
7709 02

BEQ L164

BEQ L165

002124

1
0%17
2

SEQ 0188

END ;OF FOR BANK

END

;OF FOR I

000002

CLR

RETURN

NOF SMODE

BNE L165

MOV BANK,R2

L166:;:3:3:

CMP I,02
BNE L167

L167:;:::5333
L16S::::333

DEC BANK
CMP BANK, 90
BGE B26
E26:::33333
INC I
CMP I,82
BLE B2S
E25:3333333

—

D
CVMJABO MSV11-J MEMORY
MT0027 UNIQUE BANK EST

MACRO Y05.02

7721 022066

Monday 07-0Oct-85 16:57

MT0030: SUBTST

<<MT0030

1*SUBTEST

MTO030

Page 207

SEQ 0189

SETUP FLUSH OUT DBE'S TEST>>

1982888868858 8808238880888840888888888088888888888028

3333&

177777
000030

000001
024334
027354

012737
012737

005037

002102

004737

037760

005737
001414

002120

005737
001411
005737
001006

002116

012701

012700
004777

CLR

002076

002426
002440

FULLREL

MTAO030: MOV

MOV

#30,REALPAT

MOV

OI.WM

MOV
MOV

ECCDIS
SET

OSWDOS LINK1
oMTPO30

NOF SMODE
, NOSCOPE

FOR BANK

|I'OICATE COUNT PARITY ERRORS
:DISABLE ERROR CORRECTION
MOV
MOV

:= 00 TO LASTBANK

CLR BANK

003751
7740
7741

160306

s
72
274

022274

7749 022274

TST
BEQ
TST
BNE

#SI1ZE,R1
oF IRST,RO
SLINK1

END ;OF I ACFLAG

002264

2%2137

177777

002426
002440
002542

013737

002310

£27

ECCINIT
CLEAR

;CLEAR CSRS

MOV

@-1,PASFLG

BCC L173
;TRAP ON DOUBLE BIT ERRORS (NORMAL)
NOF SMODE ,NOSCOPE
, FULLREL
CLR NOFSMODE
CLR NOSCOPE
CLR FULLREL

RETURN
END ;OF ON.ERROR

002102

TST t:;;LG

SET PASFLG

CLRCSR
CALL RELOCATE
ON.ERROR

INC BANK
CMP BANK,LASTBANK
BLE B27
3333883

IF PASFLG IS FALSE

036310

005037
005037
005037
000207

L170:;::3333

002556

002264

ACFLAG
L171
RRFLAG
L171

L171:3333533

END ;0F FOR

103010
104472

7745 02
7746

7747
7748

002102

005737
001032

304737

774
774
7744

TST MKFLAG
BEQ L170

IF ACFLAG IS TRUE AND RRFLAG IS FALSE

MOV
MOV
CALL

@-1,NOFSMODE
@-1,NOSCOPE

B27::33333

EXBANK
CALL
IF MKFLAG IS TRUE

040000
060000

1,FULLREL

;SETUP PATTERN NUMBER FOR TY’EM & DISPLAY

002124

002102

20440000004 0000000000

PASFLG

SET

END ;OF IF MKFLAG

005237
023737

A28

|......“‘..‘..‘...‘.“.“....‘.‘...‘.....‘...‘..“.‘....“..‘.".“‘.“.‘.‘.‘..

002264

022066

SETUP FLUSH OUT DBE'S TEST

NEWBANK,BANK

L173:533333

MACRO Y05.02
CYMJABO MSV1li-J MEMORY DIAG.
MTO030 SETUP FLUSH OUT DBE'S TEST
7750 022302
7751
306
7
312
7
14
7
022320
7755
7
77

0223
7758 022340

004737
004737
10‘41;
00473
000207

Monday 07-0Oct-85 16:57

037760
022100

CALL
CALL

EXBANK
MTAO30

037122

CALL

UNRELOCATE

ECCINIT

CLEAR

SEQ 0190

;TRAP ON DOUBLT BIT ERRORS (NORMAL)

RETURN
END ;0F IF PASFLG

ECCINIT
002426
002440
002542

Page 207-1

L172:333313

;:TRAP ON DOUBLE BIT ERRORS (NORMAL)

NOFSMODE,NOSCOPE,.FULLREL

CLR
RETURN

CLR

NOF SMODE
NOSCOPE
FULLREL

CVMJABO MSV11-J MEMORY DIAG.

HT0030 SETUP

MACRO Y05.02

FLUSH OUT DBE'S TEST

7761 022342

Mondey 07-Oct-85 16:57

MTO031: SUBTST
004737

012737

'ms

024122

177777

SET

002440

sn 013703
002102
004737
03

022414 004537
oza%o 000027
m 060000
027364
7770
104417
777 33:
013702
777
34 01
777
012701
7774
012705
7775
012737
777
S4 012737
7
005737
7
oog
7 79
022470 023737
7780 022476 01
7781 oaggg 000407
782 02
023737
778
10 001003
784
012737

040732

7769 022414

7786 02
7787 022530

004737

005037
000207

177776

002456

172252 172254

177652 177654 1$:
140000 002522 2%:

002440

MOV
CALL

BANK,RS
MAPPER

BANK

TESTAREA

002572
100776
060056
060002 002262
160000 002522

024350

NOSCOPE

031 ,REALPAT
NOPAR

.DSABL

012603
002552

MTOO31 SETUP SOB-A-LONG TEST

MOV
CLR

MAP

010346

053737

7785

SEQ 0191

SETUP SOB-A-LONG TEST>>

CALL
KAMITEST
ON.ERROR THEN SRETURN

012737
000031 002300
ogosv 002076

7768 w

209

] 2828588482238 8888288288888408488823382380830002088840000480000002800000008000000000000

sgozosoox
7

7764

3“..“"“‘.‘.‘.“..‘..‘..“..‘...‘....‘.‘.......‘.‘..“..‘..‘.....‘..“.‘.....

; #SUBTEST
rn

<<MTOO31

Page

ES?““E"'S“

BMOV

MTPO31,FIRST,SOBLENGTH/2

JSR RS,BLOCK3
SOBLENGTH/2
FIRST
MTPO31
.DSABL
CRF
KERNEL
MOV
SOBK ,R2
MOV
R2,R0O
MOV
0100776 ,R1
MOV
OF IRST + SOBLENGTH,
RS
MOV
oF IRST+2, SUPDOADD
MOV
OLAST+2, LINK1
TST
NOSUPER
8NE
18
cHP
SIPARS,SIPAR6
BEQ
2%
BR
11
cHP
UIPARS
, UIPARG
BNE
34
MOV
©140000, LINK1
CLR
RETURN

SUPDO4

NOSCOPE

BCC L174
RTS

‘

MOV

Li74:::3333

#-1,NOSCOPE

;SETUP
PATTERN NUMBER FOR tmoui€ DISPLAY
:SETUP PARITY ACTION
:MAP FIRST SO BLOCK MOVE WORKS

MOV R3,-(SP)

CRF

aggm

CALL

;CHECK FOR KAMIKAZE MODE
:IF NOT IN KAMIKAZE MODE RETURN

;ENTER TEST MODE

MOV (SP)+.R3

;GO TO SYSTEM TEST MODE

;ENTER KERNEL MODE

:COMPLEMENT OF INSTRUCTION “SO8 RO,DOT*"

.
'

MACRO Y05.02

a “}-J
MEMORY DIAG.

H?OO!I

-A-LONG TEST

7790 022532

779
77

Monday 07-Oct-85 16:57

Page 211

SEQ 0192

SETUP WRITE RECOVERY TEST>>

MTO032: SUBTST

<<MT0032

;#SUBTEST

MT0032 SETUP WRITE RECOVERY TEST

3 5858888885888 34888882883888083888888820000088028088824400880008080000000 00000000

004737

F .‘.““..0‘“.‘.‘..“‘.“.‘.“.“...O.‘..“.‘0.‘..‘..‘.“‘.“..‘.“.‘.“‘...‘..

024122

CALL
KAMITEST
ON.ERROR THEN SRETURN

&”m;

;CHECK FOR KAMIKAZE MODE
;IF NOT IN KAMIKAZE MODE RETURN
8CC L17S
RTS PC

7793 ¢
7794
7795 ¢
7796 ¢
:

7798
7799
7
7
7

013703

102

o&'m 03

ougos

©O

1:30 ;
7
7
7

177777

002440

wn 000032 002300
37 002076
010346

7797 ¢
7

012737

:
;

;

:
;
;

; 1; ;

7825 ggvgg
730

022734

BANK,R3

.DSABL

MAPPER

012701
177667
0 10; 020000
010237

012703

002522

nov
MOV

012704
37
737

160000
002524
002456

nov
cua
ST

OLAST+2,R4
LINK2
NOSUPER

B8R

MOV

01.LINK2

060000

0177667.R1
@SIZE/2.R2
R2,LINKI

BNE
CMP
BEQ

8331 7 177652 177654 1%:
1011
012704 140000
2¢:
012702 014000
010237 002522

cHP
BNE
MOV
MOV
MOV

umns VIPARG
uooooo
014000, éz
R2,LINK1

1 002524

002552

010023

177776

010144
077203
022737 000005 004064

38:

as:

001003
004537

027442

1§2 022736 104417
7828
022740 012702 005141

7829 022744 012700 023044

MOV tsn..as

;0P CODE OF INSTRUCTION “MOV

PC)*
;0P
CODE
OF
COMPLEMENT
OF
msrauction
*J¥ (RO)"
{USED FOR 1/2 BANK LOOP

1
SIPARS,SIPAR6

TESTAREA

ugm

‘T:E's,mooe,PSW

;ENTER TEST MODE

:GO TO SYSTEM TEST MODE

:MOVE 1esr TO MEMORY UNDER TEST
RO.(R3)+
MOV
R1.-(R4)
S08
R2.4%
cHP
os PROTYP
BNE
s MOVE usr PART OF TEST TO FASTCITY

Fov

BMOV

040676

@-1,NOSCOPE

oF IRST,R3

001005
83”" 172252 172254

MOV

;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY
;SETUP PARITY ACTION
:MAP FIRST SO THAT THE BLOCK MOVE WORKS
MOV R3,-(SP)

CRF

nov

053737

7817
7 13 83 712
?
714
;
716
7822
022720
7823
022726
7

CALL

010247

012737

7816

NOSCOPE
032, REALPAT
NOPAR
BANK

€12700

oo&-

7
7 to ;
7811
@
7
:
7 i ;

SET
MOV
CLR
MAP

L17S:ss3338

HMTPO32

JSR RS.BLOCK1

PO32

5¢:

CRF
.osm
KERNEL
MOV
05141 ,R

MOV

0108, éo

:ENTER KERNEL MODE
;0P CODE OF INSTRUCTION “COM

;ADDRESS TO RETURN TO IN RO

-(R1)*"

CW a“}-'
7830 022

;l 1

7838

023764

7
7

774

1‘

7
7840
7
7
7
7844

770

Y DIAG.

MACRO Y05.02

RECOVERY TEST

01270
01273

160000
060000

002524

002262

64:

Monday 07-Oct-85 16:57

Page 211-1

OLAST.2,R1
OFIRST,
LINK2
68
©140000,R1
SUPDO4

SEQ 0193

1 TOP OF BANK

@SIZE/2.R3
©110,RS

OFIRST,R4
L{NQ

74:

9%
:
10%:

OMTPO32, swooaoo
SUPDO4
NOSCOPTM

;:THIS RETURN ACTS AS A NORMAL RETURN FROM MT0032
SUPDO4~
:ALSO A RETURN FROM THE “CALL

, SY0052° SEYUR URTTE RECOVERY TEST

MACRO Y05.02

7850 023046

7831 023046
7

7853

MTO033: SUBTST

<<MT0033

1 ¢SUBTEST

MTO033

004737

500207
177777

NOPAR

012705

:SETUP PARITY ACTION
:MAP FIRST SO THAT BLOCK MOVE WORKS

MOV R3,-(SP)

BANK,RS
MAPPER

TESTAREA

8IS

177776

8MoV

TESTMODE ,PSW

;:ENTER TEST MODE

CRF

;GO TO SYSTEM TEST MODE

MTPO33,FIRST,.GBLENGTH/2

BLOCKS

sENTER KERNEL MODE

060076

-y
w
-

172252

172254

177652

177654

25787 140000
soam e
000207

023234

SRRL

7880

737

j252

#-1,NOSCOPE

MOV (SP)+,.R3

013701 “““uooog
013787737 592496
16000

;

;;’

CALL

3338

:
8

MOV

S
104417

787

MOV

;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY

027474

187

RS B °

L176:3331333

933 ,REALPAT

002300

004537 040732

]
;
?

1CHECK FOR KAMIKAZE MODE
+IF NOT IN KAMIKAZE MODE asm

012603

033112 oss737 oozss2
150

SETUP BRANCH GOBBLE TEST

NOSCOPE

002440

sahies Sidiet oonies

SETUP BRANCH GOBBLE TEST>>

CALL
KAMITEST
ON.ERROR THEN $RETURN

7833

SEQ 0194

19888886868088888888088808088884048488840888808048880008080080000000880088804008000000

024122

ggzgv 000033
7 002076
023110

Pege 213

18606 86048 8888888680888848800880488880080840008088808080880888088000080008000000800

012737

7
;fi

~S~i~i~

Mondey 07-Oct-85 16:57

OF IRST +GBLENGTH,RS

OF IRST +4 , SUPDOADD
OFIRST+2.RL

OFIRST+3.R2
OLAST+2,LINK1
NOSUPER

é%nus +SIPARG
1%:

l}%’fls +UVIPARG

24:

2140000, LINK1

34:

SUPDO4

MTO034: SUBTST

<<MTO034

1 #SUBTEST

MTO034 SOFT ERROR - BACKGROUND PATTERN TEST

SOFT ERROR - BACKGROUND PATTERN TEST>>

1868888088888888240688080488000888848020488880802088888880880448888080888808848808800080008

;‘..."..‘.".“O‘.““‘.“..“.“.“"0..“‘...‘..............‘.“......0.‘..‘.

034 ,REALPAT

o1%702

MOV
MOV

OFIRST,RO

#SIZE,R1
SOFTPAT,R2

IAG.
|- FY0352° SOchnon
o BACKCROUND
PATTORNY05.02
TECT ondey 07-0Oct-85 16:57
}
7885

010103

7 o3
792

MOV

ou*os
002104
010004

?
7

020000

002666

wzgv

027600

002262

7 024334

R1.R3

MOV
MOV

032765
001406

Page

- 213-1

SEQ 0195 |

BANKINDEX
, RS
RO,R4

IF #BIT13 SET.IN CONFIG+2(RS)
;BACKGROUND PATTERN IS VALID
MOV
@MTPO34+6,SUPDOADD

&&u SUPDO3

g 000410

BIT #BIT13,CONFIG+2(RS)
BEQ L177

sREAD IT

027572

002262

;BACKGROUND PATTERN HAS BEEN INVALIDATED
MOV
eMTPO34, SUPDOADD

233,

020000

002666

BIS

000207

23!

233!
233!

024

SUPDO3

CALL

#BIT13,CONFIG+2(RS)

END ;0F IF #BIT13

BR L200

L177:53383s

sVALIDATE IT
L200:3533333

RETURN

MTO03S: SUBTST
LT

1#SUBTEST

<<MT003S

SETUP MORST CASE NOISE PARITY TEST>>

e
e
s
L
e

MTOO3S SETUP WORST CASE NOISE PARITY TEST

] 8288888288828 88888380888828882208888004882804220888800008030880840808800880080040002

mvm

MOV
SHAB

MOV
Cre

AL,CSRNO
cibo.msa

8IC
BNE

’”"‘“‘:‘I;

RE TURN

cnuu

MOV

car"'‘fia‘si.u

:SET UP TEST NUMBER FOR DISPLAY

#*C17,.R1
19

%na

. SUPDOADD

.
*
WRITE BACKROUND
OF ALMOST ALT.3 1'S
AND 0'S

CALL
SUPDO3
IF GVFLAG IS TRUE THEN SRETURN

;

7916

7917

;
e
¢
¢

con

CALL

BACKGND

TST QVFLAG

caad

BEQ L201

RTS PC

I SRR R R

{MRITE COMPLEMENT PATTERN INTO MUT

Vil-J MEMORY
D
MACRO Y05.02
AY0383 SEYUP
WORST CASE NISE PARITY TEST
7921 023446

7922

023446

012737

000036

7924 0;34‘0
7925
79.
7927
72
7928 023476
7’;8 023502

005037
005000
01270%
004737
004737
004737

002264

023506

MT0036: SUBTST

<<MT0036

1 sSUBTEST

MT0036

pesy

214

SEQ 0196

SETUP CORRECTION CODE TEST>>

18888688288848888880888884884005088880408840088000000400800000008000000000000000

7923 023454 004737 032562

7930

Monday 07-Oct-85 16:57

000207

100000
037646
027760
037734

002300

SETUP CORRECTION CODE TEST

(8888488004080 8888488000808808808000880080808040880000000000000080080000800000008

MOV

CALL

CLR
CLR
MOV
CALL
CALL
CALL

RETURN

@36 ,REALPAT

:SET 'JP_TEST NUMBER FOR YYPEWT AND DISPLAY

PASFLG
RO
#100000,R1
MAPKERNAL
MTPO36
UNMAP

;CLEAR LOOP COUNTER
1GET TEST DATA
|GEY FIRST ADORESS IN BANK
MAP KIPARS
AND 6 TO BANK
IEXECUTE TEST
;REMAP KERNAL SPACE

GETCSR

:GET CSR_INFO FROM CONFIG TABLE

CVMJABO MSV1i-J MEMORY DIAG.

MT0036

MACRO Y05.02

SETUP CORRECTION CODE TEST

Monday 07-Oct-85 16:57

MT0037:

7932 023510

SUBTST

7939 023540
7940 023544

SEQ 0197

SETUP ECC DISABLE TEST>>

<<MT0037

1888888488888 888488588408804880008888848008882000808880808082000000008800408000000

;#SUBTEST
7933 023510

Page 215

012737
012701
005000
004737
004737
004737
004737
000207

000037
100000

037646
032562
030204
037734

002300

MT0037

SETUP ECC DISABLE TEST

198 8 8408 8 24828888808888088804888
2884220080002 0088800200080 03 0000080000000 00000

MOV
MOV
CLR

CALL
CALL
CALL
CALL

RETURN

437 ,REALPAT
#100000,R1

MAPKERNAL
GETCSR
MTPO37
UNMAP

:SETUP PATTERN AND NUMBER FOR TYPEOUT AND DISPLAY
:SET UP TEST_ADDRESS
;:CLEAR DATA TO BE WRITTEN
:MAP THIS TEST TO KERNEL SPACE

:GET CSRINFO FROM CONFIG TABLE
;CHECK ECC DISABLE

;REMAP KERNEL SPACE

CVMJABO MSV11-J MEMORY DIAG.

MTO0037

SETUP ECC DISABLE TEST

MACRO Y05.02

Monday 07-Oct-85 16:57

MTO0041:

7942 023546

SUBTST

012737
004737

000041
032562

002300

023

012737

030256

002262

012701

060000

023727

002102

000177

012737

000014

002570

7945 023

7947 23572
3572

3610
12

3620
7”3 023620
7953
023624

SEQ 0198

SETUP ADDRESS 70 CSR ON DOUBLE BIT ERROR TEST>>

<<MTO041

1282888888888 84828828438480848880888808888208288888088808800008304080040000800000000

s #SUBTEST
7943 023546
7944 023554
7945 023

Page 216

001004

000403
C12737

000020

004737
000207

024334

002570

MTO041

SETUP ADDRESS TO CSR ON DOUBLE BIT ERROR TEST

188888888088 888088844488820200048028282808880888888808888880088080008008008000000000

MOV
CALL

:SETUP PATTERN AND NUMBER FOR TYPEOUT AND DISPLAY
;GET CSR_NUMBER AND ADDRESS FROM CONFIGURATION TABLE

LET R1

:= OFIRST

:SET UP FIRST ADDRESS

LET SUPDOADD

:= &MTPO41

IF BANK EQ @177
LET PASCNT

:SET UP TEST ADDRESS

;ARE WE AT BANK 177?

:= @12.

RETURN

CMP BANK,0177
BNE L202

BR L203
L202::::3:3

:= #16.

MOV #16. ,PASCNT

END

CALL SUPDO3

MOV &F InST,R1

MOV @12, ,PASULNT

ELSE
LET PASCNT

MOV oMTPOA1L, SUPDOADD

L203:;;:3:3

;EXECUTE ADDDRESS TO CSR TEST IN SUPVISIOR MODE
3

Y_DIAG.

MACRO Y05.02
s

M#!t 07-0ct-85 16:57

R100a1SEYU RoDRESS TO CSR ON DOUBLE BIT ERROR
MT0042:

7955 023626

12828 8 28 8

SUBTST

:#SUBTEST

&737

004737
004737
004737
000207

000042
100000
037646
32562

002300

PZge 217

SEQ 0199

SETUP EXTENDED Q-BUS ADDRESS TO CSR TEST»>

<<MT0042

88282 088828880882 08 200004883428 0408080488080 0802080400000 800 0000000000

MTO042

SETUP EXTENDED Q-BUS ADDRESS TO CSR TEST

(8685888408 448848888888808848884880
0000800400000 00AR00R0RR0ER00R0ER000R 0000000000

MOV
MOV

CALL
CALL
CALL
CALL

RETURN

942 ,REALPAT
#100000,R1
MAPKERNAL
GETCSR

MTPO42

UNMAP

:SETUP PATTERN AND NUMBER FOR TYPEOUT AND DISPLAY
:SET UP TEST ADDRESS
iMAP TO KERNEL SPACE
:SET UP_CSRINFO FROM CONFIGURATION TABLE
;CHECK EXTENDED Q-BUS ADDRESS TO CSR
;REMAP KERNEL SPACE

MACRO_YO5 .02
CVMJABO MSV11-J MEMORY DIAG.
MT0042 SETUP EXTENDED Q-BUS ADDRESS TO

Monday 07-Oct-85 16:57

CSR TEST

MT0043:

7964 023662

SUBTST

7967

012737
004737

000043
037646

002300

MTO043

MOV
CALL

LET R1

7976

7977
7978

012737
004737

682362

002300

:SET UP TEST NUMBER FOR TYPEOUT AND DISPLAY
:MAP TO KERNEL SPACE

:= #100000

:SET UP TEST ADDRESS

;PERFORM WRITE BYTE TEST

MOV €100000,R1

;REMAP KERNEL SPACE

<<MTO044

SETUP SHIFTING 1/0'S THROUGH THE CHECK BITS TEST>>

012737

031112

0022¢2

012701

060000

023727
001004

002102

000177

012737

120000

002562

7980
7981

023770

7983 023772

012737

160000

004737

024334

MOV
CALL

944 ,REALPAT
GETCSR

:SET UP FIRST ADDRESS

IF BANK EQ €177

;:ARE WE AT BANK 1777

LET ENDADD

024004
7987 024010
024014
7989 024020
7990 024022

012701
004737
004737
000207

100000
031434
037734

RETURN
SUBTST

012737
004737
012701
004737
004737
000207

037646

100000
031622
037734

:= #160000

MOV #160000,ENDADD
L20S:;:53333

<<MT0045
T

SETUP SYNDKOMES TO CSR ON DOUBLE BIT ERROR>>

#45,REALPAT

CALL

T T

MAPKERNAL

<<MT0046

:#SUBTEST

MT0046

T Y

Ty P

T T

Y T

:SET UP TEST NUMBER FOR TYPEOUT AND DISPLAY
:SET UP TEST ADDRESS

CALL MTPO4S
%L UNMAP

URN

sMAP TO KERNEL SPACE

:= 2100000

MT0046: SUBTST

SETUP SYNDROMES TO CSR ON DOUBLE BIT ERROR

MOV

LET R1

002300

CHMP BANK,0177
BNE L204

;EXECUTE ADDDRESS TO CSR TEST IN SUPVISIOR MODE

MT0045

128 24040 8 4

L204:;;:::::

END

MOV &FIRST,.R1

nllfl

MOV #120000,ENDADD

CALL SUPDO3

002300

MOV eMTPO44, SUPDOADD

BR L205

LET ENDADD

000045
037646

:= #120000

ELSE

MTO0045:

012737
004737

:SET UP TEST ADDRESS

LET R1 := QFIRST

;#SUBTEST

7984 023772
024000
7986 024004

:SET UP TEST NUMBER FOR TYPEOUT AND DISPLAY
:GET CSR_NUMBER AND ADDRESS FROM CONFIGURATION TABLE

LET SUPDOADD := #MTPO44

002562

000207

(488808888048 0088008800848008400800080308004048888048R0048808480804880080084080000

000403

7979

7996

@43 ,REALPAT
MAPKERNAL

(A8888084S4E4040400888448080000880440044084840880388000404884848808400884408000000
MTO044 SETUP SHIFTING 1/0'S THROUGH THE CHECK BITS TEST
: #SUBTEST

7975

7994

SETUP WRITE BYTE CLEARS SBE TEST

gEAIfLm“lMAP

MTO0044: SUBTST

7974

7993

SEQ 0200

SETUP WRITE BYTE CLEARS SBE TEST>>

CALL MTPO43

030716
037734

023704

797,

7991

218

188888840488888888888888888880444288888088880808808000008000840808808000000000000

100000

7968 023700
7970
7971

<<MT0043

1888068888488 88888848888888088508808088000880080480008880008800800848080000000000

+#SUBTEST
7965 023662

Page

MOV ©100000,R1

;PERFORM SYNDROMES TO CSR ON DOUBLE BIT ERROR
:REMAP KERNEL SPACE

SETUP CHECK SINGLE BIT ERRORS WITH ECC DISABLED TET>>

40 4820884848444 RR0 AR

RAR

0020020524582 282082088080800808080 000000000

SETUP CHECK SINGLE BIT ERRORS WITH ECC DISABLED TET

T
L
I T
T
T
e
Ty

MOV
CALL

LET R1

946 ,REALPAT
MAPKERNAL

:= 100000

CALL MTPO46

Selfll.n“llflfl’

;SET UP TEST NUMBER FOR TYPEOUT AND DISPLAY
:MAP TO KERNEL SPACE
:SET UP TEST ADDRESS

MOV #100000,R1

;PERFORM TRAPS DECTECTED ON SBE WITH ECC DISABLED TE
;:REMAP KERNEL SPACE

MACRO YOS .02
MORY DIAG.
CVMJABO MSV 11SINGLE BIT E
MT0046
SETUP
CHE

07-0ct-85 16:57

RRORS WITH ECC DISABLED TET
MTO0047:

7997 024052

12848 8 48428

SUBTST

:#SUBTEST
7998 024052
7999 024060

8000 024064

012737
004737

000047
037646

012701

100000

8001 0240 ’0 012702

024070
024074
8003 024100
8004 024104

004737
004737
000207

120000
032162
037734

002300

Page

218-1

SETUP NO CSR UPDATE ON SBE WITH EXSISTING DBE TEST>>

<<MT0047

8828888888 3888402080008

MTO047

SEQ 0201

08880 0088080800820 20008000400800000000 0000

SETUP NO CSR UPDATE ON SBE WITH EXSISTING DBE TEST

(88848484840 44400888888804488880040808888
0080000000000 04040840004004400800000

:SET UP TEST NUMBER FOR TYPEOUT AND DISPLAY

LET R1

#47 ,REALPAT
MAPKERNAL

:= 100000

;MAP TO KERNEL SPACE
:SET UP TEST ADDRESS

LET R2

:= #120000

MOV
CALL

CALL MTPO47
CALL UNMAP
RETURN

» SECOND

MOV #100000,R1

TEST ADDRESS

MOV 9120000,R2

;PERFORM NO UPDATE TO CSR ON SBE WITH DBE
:REMAP KERNEL SPACE

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

!Ionda
07-0Oct-85 16:57

MTO047 SETUP
NO CSR UPDATE ON SBE WITH EXSISTING
8007 024106

8008 024106
8009 024112
024112
gig 024120

TEST

MT0999: SUBTST

<<MT0999

1 *SUBTEST

MT0999

005037

002300

012737

177777

000207

(8888888848248

002344

CLR
SET

220

SEQ 0202

SETUP NULL TEST>>

SETUP NULL TEST

REALPAT
NULLFLAG

EALREE0000000000040004200400000 0000000000000

MOV

RETURN

00000008

@-1,NULLFLAG

KAMITEST:SUBTST <<CHECK FOR KAMIKAZE MODE>>

I
T
rTTryrTTTTTIIIICYITYTYIYYIYIYIYIYLIYY

;#SUBTEST

CHECK FOR KAMIKAZE MODE

(SRS 044044080R00RRRRRRRRRRRRRRRR0400484080880880880884000800

8013
lit

005737
OO;OO‘
737

001003
737

8015

18888888888 848828848888 8888400800488 0000000 0808808000040 488800008008004400000000

8012 024122

8014

142 C01403
g;:{“

g;:

000241
000207

8;0

000402

8016 0241
0241
0241

8017 024156
024156

000261
000207

002006

IF KAMIKAZE IS TRUE OR ACTFLAG IS TRUE OR APTFLAG IS TRUE

TST KAMIKAZE
BNE L206

0ue350

TST ACTFLAG

BNE L206
TST APTFLAG

BEQ L207

002352

$RETURN NOERROR

;RUN THE TEST

L206:::3333

CcLC
RTS PC

ELSE

BR L210

$RETURN ERROR
END

:0F IF KAMIKAZE

L207:::3333

;:DON'T RUN THE TEST

SEC
RTS PC

L210::353333

CVMJABO MSV11-J MEMORY DIAG.
CHECK FOR KAMIKAZE MODE

MACRO Y05.02

SUPDO1:

8020 024156

177640

002622
002624

TAG&S:

177776

MOV
MOV
MOV
MOV

RO, SUPDRO
@SUPDR1
, RO
R1,(RO)+
R2.(RO)+

MOV
MOV
MOV

SUPDRO,
RO
OTAGA$
, SLPADR
$LPADR, $LPERR

MOV (SP)+,R3
MOV SLPERR, -(SP)
MOV $LPADR.-(SP)

MOV

@SUPDR6+2
, RO

-(RO).R4
MOV
MOV
-(RO).R3
MOV
-CRO).R2
MOV
-(RO).R1
SUPERVISOR
8IS
08IT14,PSW

-~
(2]

000740

;

040000

002622

GETDIS
SLPERR, SLPADR

002160

CALL
PUSH

("]
~itd

§O

SUPDO2:

arNO

on
&
LY

EXECUTE PATTERN IN SUPERVISOR>>

MAPPER
CRF

CALL
.DSABL

002622
002176

333888888 2
EeREsEEgE

: GEENERR BRRRCECEREREERSNIRE B

<<SUBR

SEQ 0203

:#SUBTEST
SUBR
EXECUTE PATTERN IN SUPERVISOR
3“.‘.‘........‘C‘.“.““‘.‘.....‘.‘.“.‘.“.““..‘..“...‘........‘.‘...‘..“
MAP
BANK
:MAP SUPERVISOR SPACE (TEST AREA) TO BANK
MOV R3,-(SP)
MOV
BANK ,R3

004737

160

SUBTST

Page 222

18 8 868 58 8888888888848005888808088880004080888000880808008000080800800008000000

8021 024156
024156
024164

Monday 07-0Oct-85 16:57

CRF
#SUPSTK,SSP
FASTCITY

SLPADR, $LPERR

:ENTER SUPERVISOR MODE
;60 TO SUPERVISOR MODE
:TURN CACHE OFF
CALL TO THE USER INSTRUCTION PAR'S

CN
sTURN CA
:ENTER KERNEL MODE

MOV (SP)+,SLPADR

MOV (SP)+, $LPERR

8054 024334
024334
024336
024342

SUPDO3:

038808
002624
002622
002160
002162

002160

002176

002552

002624

BG4S
:

000700

155554

002622
002624

BANK
BANK ,R3

MOV
RS, -(SP)

GETDIS
SLPERR, SLPADR

MOV
MOV
MOV
MOV
MOV
MOV

RO, SUPDRO
@SUPDR1,
RO
R1,(RO)+
R2.(RO)+
R3.(RO)+
R4.(RO)+

MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV

, RO
SUPDRO
9TBGAS
. SLPADR
$LPADR, $LPERR
#SUPDR6+2
, RO
-CRO),SP
-CRO).RS
-(RO).R4
-CRO).R3
-(RO).R2
-CRO).R1
-CRO).RO

8IS
.DSABL
ST

, PSW
TESTMODE
CRF
NOSUPER

MOV (SP)+,.R3
MOV SLPERR, -(SP)
MOV $LPADR, -(SP)

1%
SUSESTK,USP
28
SSP
SSUPSTK,

CACHOFF
@SUPDOADD
CALL
CACHON
KERNEL
SCOPE

POP

SEQ 0204

iMAP SUPERVISOR SPACE (TEST MEA) T0 BANK

CALL
PUSH

BEQ
MOV
B8R
MOV

Page 224

MAPPER
CRF

TESTAREA

177776

002456

000740

MAP
MOV

CALL
.DSABL

051336

Monday 07-Oct-85 16:57

SLPADR, $LPERR

:ENTER SUPERVISOR MODE
;GO TO SYSTEM TEST MODE

;TURN CACHE OFF

:TURN CACHE ON
:ENTER KERNEL MODE
s

MOYOSOZ

J MEMORY DIAG

X!étfi3 PATTERN IN SUPERVISCR

CVMJABO

SUBR

RETURN

+,SLPERR

4
MSV11-J
Y DIAG.
M
TEST
3ntn§=°aw?n¢s

8091

MACRO Y05.02

Monday 07-Oct-85 16:57

Page

- 226

SEQ 0205

.SBTTL MEMORY TEST PATTERN ROUTINES

m's

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

FIRST Aooaess OF PATTERN (FIRST, LAsr.z ETC)

8099

;

COPY OF R2 (IF NECESSARY)

i PATTERN REGISTER CONVENTIONS

8094

8095
80%
809
8098

:
:::

.too

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

8101 024526

uoi ozosg
810
I{N
8105
uo,
810
ug:
:x
110
8111
SO
8112 024552

R1
R2
R3
R4

MTPOOO: SUBTST

<<MTPOOO

1 #SUBTEST

MTPOOO BASIC DATA TEST

|......‘.“.‘.‘.“.‘.".“..‘...‘.".“‘.“.‘.‘..‘..“..‘“.“..“‘..‘.‘.....‘..

010220
077102
000240
012401
020102
¢01402
04430
077
000207

14:
2¢:

MOV
S08
NOP
MOV
cHP
8EQ
PERRO2
NOP
508
RETURN

MTPOO1: SUBTST
I

81
14
8
16
81
e
81
81
81
8134
32
8135 024634

3 010220
702 000002
077104
012400
020005
001401
104427
062705 000002
077307

8125
=

BASIC DATA TEST>>

|‘.“.“..‘.“‘.““‘......‘..‘.‘.‘..“......‘..“‘“..“‘.....“‘.‘..‘.........

PRI R Y

;1 #SUBTEST

8113
8114
8115
ou’
811
oug
81
81
1
1
1
81

NUMBER
OF ADDRESSES IN PATTERN (SIZE
DATA FOR PATTERN (ONES,52525.ETC)
COPY
OF
lu (IF oscessué
COPY OF RO (IF necessmn

R2,(RO)+
R1.MTP00O
(R&)s,R1
38

R1,R2
R3,2$
R

<<MTPOO1

1V177640
V177642
1V177644
1V177646
1V177650
V177652
1V177654
1V177656
1V177660
1V177662

ADDRESS TEST»>>
S

MTPOO1L ADDRESS TEST

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

MOV
ADD
S08
NOP
14:
MOV
cHP
BEQ
PERRO1
2:
ADD
S08
RETURN
MTPOO2: SUBTST

R2.(RO)+
#2.R2
R1,3$
(R4)+,RO
RO.RS
2s
92.RS
R3.1%
<<MTPOO2

: #SUBTEST

MTPO02

3%:

RS, -(RO)
@2,.RS

1V177640
V177642
1V177646
1V177650
1V177652
1V177654
1V177656
:V177660
1V177662
1V177666
V177672
COMPLEMENT ADDRESS TEST (MRITE DOMN. READ UP)>>

1228584888588 888048880425085805200
088880808882 0508208888080800408088080200000000

010540
705

077104
000240
162702
012401
020102
001401
104430
077307
000207

COMPLEMENT ADDRESS TEST (WRITE DOWN, READ UP)

I8REASEE0088804608400800000040880008008000000800008838088080800088008840008008000004

000002
000002

18:

2s:

MOV
ADD
S08
NOP
SuB
MOV
CMP
BEQ
PERRO2
S08
RETURN

R1,3¢

#2,R2
(R4)+,R1
R1.R2
24
R3,1¢

:V177640
1V177642

1V177646
:V177650
:V177652
1V177656
1V177660
1V177662
1V177664
1V177666
iV177670

CVMJABO MSV11-J MEMORY DIAG.
EMENT
c

MACRO Y0S.02

ADORESS TEST (WRITE DOUN. READ UB)

MTPOO2

MTPAO3:

8138 024636

07-0ct-85 16:57

SUBTST

Page

228

SEQ 0206

3 XOR 9 WORST CASE NOISE TEST (WRITE)>>

<<MTPAO3

18 8 8 8 8 8 38288848888888283458088888888882888888808848282000888808804808080880000000800

1sSUBTEST

MTPAO3

3 XOR 9 WORST CASE NOISE TEST (WRITE)

18888884688880485880888888888800888088088880888084080000000808080000040800004800000

;R1 = ADDRESS
‘RS = SMALL LOOP CONSTAN
= NUM OF ADD TO TEST (LARGE LOOP)
3
;R4 = GOOD DATA
;RS = MEDIUM LOOP CONSTANT

8139
8140

:{01

.13
8144

81435
8146

i
i

18:

WARN2:

LSB

BIS

(PC)+,.R4

401

000100

WARN3:

o4 .R2

coM
8IS

(PC)O.R‘

401

MOV
S0B

RETURN
.DSABL

61 024676

R4,(R1)R4,(R1)R2.1$
R4

MOV

S08

8155

it
e

.ENABL

MOV
MOV
S08
coM

i1V177640
1V177642
V177644
WARNING LOCATION IS MOCIFIED BEFORE LOADING

RS 1

#64. RS
R3,1$
LSB

MTPBO3: SUBTST

<<MTPBO3

;#SUBTEST

MTPBO3

1V177670
V177674
:V177676

WARNING LOCATION IS MODIFIED BEFORE LOADING

3 XOR 9 WORST CASE NOISE TEST (READ)>>

18 8 8 48 838 0888088584480884508888888888888888088800888888888888058820888888808888

3 XOR 9 WORST CASE NOISE TEST (READ)

(8 8 453408084 048808888880008443080088808408800885028888088808480084828480800080000

782

i i
170
17

8175
8176

7
7

734

000137
077203

024736

BIS

(PC)+.R4

WARN4:

401

MOV
coM
8IS

oosis
000207

LSB

JHP
S08
comM

S08

511

g1z108

.ENABL

1¢:

000100

WARNS: = 401

MOV
S08

RETURN
.DSABL

SOMTPCO3
R2.1¢$
Ré

:V177640
1V177644
1V177646

GO TO V172360

WARNING LOCATION IS MODIFIED BEFORE LOADING

&4 ,R2

RS 14

(PC)O R4

064. ,RS
R3,1$
LSB

:V177670
:V177674
1V177676

WARNING LOCATION IS MODIFIED BEFORE LOADING

‘L

CVMJABO MSV11| HTPBOS
3 XOR

Y DIAG.
Y05.02
T CASE NOISE TEST (READ)

8179 024736

Mondey 07-0Oct-85 16:57

Page 230

MTPCOS: SUBTST

<<MTPCO3

1 sSUBTEST

MTPCO3 TEST DATA SUBPROGRAM

SEQ 0207

TEST DATA SUBPROGRAM>>

] 2828888828428 888888888888888880888200080880888800888000888 0080080000000 000000000
] $858888888888888888888882888888040888288820888000888048008088808000 0028004000000 0s

R4, (R1)+

14:
024754

B8EQ
14
PERRO3
coM
-(R1)
CoM
(R1)
JP
SOMTPDO3

1V172360

1V172362
1V172364
1V172366
1V172370
1V172372

GO TO V172260

TEST DATA SUBSUBPROGRAM>>

MTPDO3: SUBTST

<<MTPDO3

1#SUBTEST

MTPDO3 TEST DATA SUBSUBPROGRAM

] 858888888805 8828428000884284208888088885088082840088808858488400880000000800000 %

;g i

1’8 003137 024702

18 8 8 8 8 4 4880588288588088480888888088888888808288822808480088088888800408000000000

R4, (R1)+

18:

8EQ
14
PERRO3
COM
(PC)+
0
BNE
MTPCO3

Jrip

9OMTPBO3 .4

V172260

V172262
1V172264
1V172266
1V172270
V172272

V172274

GO TO V172360

GO TO V177644

CVMJABO MSV11-J MEMORY DIAG.

MTPDO3

TEST DATA SuBSUBPROGRAM

8197 024774

8198 024774
8199 025000
8200 m
8201
10
8202

14
8203
16
8204
8205 025020
‘2% 8;;8;3
4
820
86“’ 025026

MTPAO4: SUBTST

<<MTPAO4

;1 #SUBTEST

MTPAO4

Page 232

SEQ 0208

ROTATING ZEROS TEST»>>

1%:

1044

2%:

103402
04
001401

34:

077115
000207

MOV
MOV
cLC
JMP
MOV

BCS
cHP
BEQ

PERRO4

S08
RETURN

:giz 025044

000137

106120

R1,1$

<<MTPBO4

:1#SUBTEST

MTPBO4

SUBR

1V177660
1V177662
1V177664
1V177666
1V177670
1V177672
ROTATING BIT>>
SUBR
ROTATING BIT

ROLB
SoB8
ROLB
ROLB
S08

(RO)
RS,14
(RO)«
(RO)
R4, 2%

V172360
:V172362
1V172364
1V172366
3V172370

JMP

MTPOOS: SUBTST

SOMTPAO4 - 14
<<MTP0OOS

V172374
ROTATION ONES TEST>>

;#SUBTEST

MTPOOS

1¢:
24:

ROLB

025010

012705 000010
010504
000261
000137 025030
016004 177776
103002
26 025072 020204
8227 025074 001401
104432
077115
000207

2%
R2.R4
33

1V177640
1V177644
1V177646
1V177650
V177654

TR L L

(SRS AEEAEASAEEEREEIAERRRRALAIRREREAAAERRRARARREEERA0EELRERR00RRRERM0RINNNS

8219 025050

8220 025050
:ggé 8;;83:
8223 025060
:gg‘ 83%‘
0
S

#8.,RS
RS,.R4
S0MTPBOL
-2(RO),R4

MTPBO4: SUBTST
Y

106110
077502
106120
106110
077402

ROTATING ZEROS TEST

1888004000800 ARRRRSRAEEERRRARARSRRRRRRASASARRRRARAERRRRRRRNALERRRRRARRRRLRNSS

012705 000010
010504
000241
000137 025030
016004 177776

8211 025030
025032
82
8213 025034
8214 025036
8215 025040

8228 025076
8229 025100
025102
82

Monday 07-Oct-85 16:57

1884880004 88800508808800000008000080000000000E000RRRR00RRRRRRRIMRRRRRRRRRRRRIAS

8210 025030

8216 025042

MACRO Y0S5.02

(RO)~

:1V172372

T T Ty

ROTATION ONES TEST

P L PP Y

(RAAEESEAEESAASEAREREEERRAERRERARRREREERSRAEERSERA0EREEAERA0SR004040008000000

1$:

24:
3$:

MOV
MOV
SEC
JMP
MOV
8CC
cMP
BEQ

#8.,.RS
RS.R4

8eMTPBO4

-2(R0O).R4
24
R2,R4
34

PERRO4
R1.1$
S0B
RETURN

1V177640
:1V177644
1V177646
V177650
V177654
;:V177660 IF THIS HAPPENS THE GOOD & BAD MATCH
V177662
:V177664
V177666
V177670
V177672

CVMJABO MSV11-J MEMORY DIAG.

MTPOOS ROTATION ONES TEST
8233 025104
535

36 025104
8237 025112
025116
8238
8239
025132
8240
501 025136
142
4;
144
824

012737
005037
013771
013771
017102
023702
001401
104433

8.5 025146 017102 000002
4 ggxso 001401

160 104434

ggguz
02516
8252 025170
025170
025174
1

5;3 025200
S 025202
025210
16
7

8258 025224
32
8259
36
8260
2
8261
55
5:4
s

8266
8267

70
7

8272

8273

MTPOO6: SUBTST

Page 234

INITIAL DATA TEST>>

<<MTPOO6

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

1 #SUBTEST

000001 002242
002244
002242 000000 18:
002244 000002
000000
002242

cag 025152 023702 002244

3«’

Monday 07-Oct-85 16:57

MTPOO6 INITIAL DATA TEST
THIS TEST CHECKS THE DI/DO LINES BY
:

3‘.‘...‘.‘..“‘..‘..“.““...‘.....““‘.‘.....“...“‘.....‘..“...“.“‘..“‘

8234

MACRO Y05.02

005737 002244
100405
006137 002242
006137 002244

2s:
38

000746
012737 177776 002242 4%:
012737 177777 002244
013771 002242 000000 S$:

013771
017102
023702
001401
104433
ou;oa
023702

002244 000002
000000
002242

000002

64:

005737 002244

001401
104434
100005

002244

70 006137 002242
74 006137 002244
025300
025302

000746

000207

MOV
CLR
MOV
MOV
MOV
cMP
BEQ
PERRO7

MOV

82(R1).R2

cMP

DATBUF +2,R2

sNOW READ SECOND WORD

TST
8MI
DLEFT
ROL
ROL
.DSABL
BR
MOV
MOV
MOV

DATBUF +2
as
DATBUF
DATBUF
+2
DATBUF
CRF
1$
©177776,DATBUF
0-1, DATBUF+2
DATBUF ,@(R1)

;HAS LAST BIT BEEN TESTED ?
:MINUS MEANS BIT 31

BEQ

PERR10

MOV
MOV
CcHP
BEQ
PERRO7
MOV
CMP

:BR IF OK
TRAP
:ERROR

{NO, SHIFT TEST BIT LEFT

;GO WRITE NEW TEST DATA
:NOW GOING TO SHIFT A O IN DATA DIRECTION
;PUT A O IN BIT O
;AND 1'S IN ALL OTHERS
;WRITE THE DATA

DATBUF +2,82(R1) ;2 WORDS WORTH
8(R1),R2
;NOW READ FIRST WORD
DATBUF ,R2
64

:BR IF OK

82(R1),R2

DATBUF +2,R2

;NOW, READ SECOND WORD

1ST

DATBUF +2

;TESTED BIT 31 YET?

DLEFT

DATBUF

7
BEQ
PERR10

BPL

ROL
ROL

DATBUF
DATBUF
+2

.DSABL

8%:

SHIFTING A 1 THROUGH THE WORD.

:
;SET THE FIRST TEST BIT
©1,DATBUF
;CLEAR 2ND WORD
+2
DATBUF
;MRITE TEST WORD 1
DATBUF ,8CR1)
DATBUF +2,82(R1) ;AND TEST WORD 2
8(R1),R2
:NOW READ THEM
DATBUF ,R2
iBR IF FIRST 16 OK
E)
{ERROR TRAP

RETURN

CRF

:BR IF OK

18R IF YES, WE'RE DONE
sKEEP GOING

SEQ 0209

CVMJABO MSV11-J MEMORY DIAG.

MTPOO6 INITIAL DATA TEST
8276 025304

8279
8280
8281 025304
306

lz
:

8296
7

830
8

;#SUBTEST

MTPOO7

ADDRESS BIT TEST

3
:

THIS TEST CHECKS TO SEE THAT EACH _ADDRESS
BIT IN EACH 16K 3ANK CAN BE_ASSERTED UNIQUELY.

MOVB
7578

104435

PERR11
1%:

1051i1
111100
105700
001001
1044

’g
3
32
34

C40201
006302
050201
011100

2¢:

g:@
2

001401
104437

344

005111

005700

00075
000207

100000

4%:

010000
160000
Ss:

(R1)
(R1),RO
RO
23

;COMPLEMENT THE BYTE

BIC
ASL
BIS
MOV

R2,R1
R2
R2,R1
(R1).RO

:MASK OFF THE ASSERTED BIT
;SHIFT R2 FOR NEXT BIT
;SET THE NEW BIT INTO R1

Q
PERR13

;:READ FOR ZEROS

coM

MOV

iBR IF 0K

sREAD FOR NON ZEROS
;BR IF OK

:READ THE NEW ADDRESS

(R1)

;COMPL THE WORD

(R1),RO

BNE
PERR14

;READ IT AGAIN

cHP
BEQ
cMP
BNE
ASL
MOV

2100000,R2
$
#10000,R2
2%
R2
#160000,R1

;CHECK FOR MSB IN 4K BANK
:NOT LAST BIT, BRANCH

BR
RETURN

bbb L L L

IT CHECKS FOR ADDRESS BITS THAT MAY BE STUCK
:
HIGH, STUCK LOW OR STUCK TOGETHER.
3
(R1).RO

coMs
MOV
TST8
BNE
PERR12

TST

001001
104440

2702
1407
022702
370 001356
302
‘3{0 8;3372
374 012701
8311
.Slg 025400
8313 025402

3s:

;READ AND COMPARE FOR ZEROS

TST

700

BEQ

14
16

- 8303 025
:m 025354
S!Q gg‘“
362
30
=;g g?zglgfl

ADDRESS BIT TEST>>

<<MTPOO7

111100
105700

011100

SEQ 0210

1866850888888 080888888000400408008004800000000000000000R0000RR000R0RRRRRRRRRRRSS

001401

Page 236

MTPOO7: SUBTST

310

.2” 025312
”

Monday 07-Oct-85 16:57

77
78

MACRO Y05.02

CVMJABO MSV11-J MEMORY DIAG.
ADDRESS BIT TEST

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 238

MTPOO7

<<MTPO10
BYTE ADDRESSING TEST>>
MTP010: SUBTST
0000 00000
080
000000000
8888
00000
0888
00000000
(88888824 808888848848

8316 C25404

;#SUBTEST

MTPO10

BYTE ADDRESSING TEST

»O g
e

-1

MOV
000004
177777
177777

1%:
24:

nNo

R2.R1
64
R3.R1
43

cHP
BEQ

@0,RO
38

INC
8R

R1
2%

8EQ

INC
8R
MOVB
INC
cMP
BNE

R1
2%
#-1.(R3)
R3
R3,R2
1%

PERR11

E34

34:
4%:

MOVE
PERR12

025510

BYTE ADDRESSING WITH ECC DlgggLED
;R4 HAS LOWEST ADOR
R4.R3
;PUT IT IN R3 ALSO
;POINT R2 TO LAST BYTE -1
04 ,R2
;WRITE ALL ONES IN
e-1,(R3)
;THE 4 TEST BYTES
0-1.2(R3)
;:CLEAR A BYTE
(R3)
:INITIALIZE R1_FOR EACH PASS
R4,R1
H

R4 ,R2

(R1).RO
MOVBE
;WARNING IF Y OU

~N~N

oan

o
o

13323
8&
$2
9

S
23506

MOV
ADD
MOV
MOV
CLR8
MOV
cHP
BEQ
CHP
BNE

177777

RRRR AR RR0RRRRRRRRARRRRRARARR0EARERANRNES

;TEST 3 THIS TEST CHECKS FOR PROPER

o pe

) 2288688888848 8 8880488080000 0 08228

S$:

177777

6%:

RETURN

(R1),RO

:IF EQUAL, JUST READ LAST BYTE
:BR IF EQUAL

;1S THIS THE BYTE OF ZEROS
:BR IF NOT

OPTOMIZE CHANGE THE PCBUMP FOR THIS ERRGR INCASE OF TRAPS
;IT IS, COMPARE FOR ZEROS
;NEXT BYTE

:RETURN

;ITS NOT THE BYTE OF 0'S, READ 1'S

;MOVE TO NEXT BYTE

;RESTORE 1'S TO BYTE JUST TESTED
;INC TO NEXT BYTE
;WAS THAT JUST THE LAST ONE?
:BR IF NO

SEQ 0211

MSV11-J MEMORY DIAG.

CVMJABO
IYTé ADDRESSING TEST
MTPO10

MACRO Y05.02

Monday 07-Oct-85 16:57

SEQ 0212

Page 240

BASIC DOUBLE BIT ERROR TEST>>

8353 025512

MTPO14: SUBTST

<<MTPO14

—

1888846468888 4 004888808800 8084880404380000000000000R0000080000 0000000000000 0000000
3
; THIS TEST CHECKS THAT A DOUBLE ERROR WILL BE DETECTED
; A BYTE WRITE WITH A DOUBLE ERROR ON A MSV11-P

;#SUBTEST

MTPO14

0000000
0000080
88800888
1888848488888 8248840080480040888088830088080000000000000

0332
83

; WILL BE ABOTRED.

=g 7

‘g 9
[+)
8

[+)
8361 O
0
8362 O
[+)
.w
0
8
8365 O
8366 O
0
8367 O
0
8368 O
8369 0O
0
0
:370 0
371 O

.!73
037
8374

BASIC DOUBLE BIT ERROR TEST

12
14

104424

14 005037
012737
012737
104513

002072
000001 002076
060000 002034

012737
104425

003145

002150

012737

103145

002044

005011
005711

023727
00140
0 10405
;

104426
042737

002072

000001

CACHOFF
LET PARCNT := 20

;TURN OFF CACHE
;CLEAR PARCNT

LET NOPAR := @1
LET ADDRESS := @FIRST

;:SET PARITY ACTION
;SET ADDRESS FOR ERROR REPORT

CBREG
LET CSR := #3145
LOADCSR
LET GOOD := #103145
LET (R1) := @0
TST (R1)
IF PARCNT NE #1
END

020000

002150

ERROR +55

READCSR
BIC oBIT13,CSR

IF CSR NE GOOD THENM

:WAS BUSPBL ASSERTED????

CMP PARCNT,®1
BEQ L211
;ERROR CALL ;;MISSED EXPECTED TRAP
:
1333333

;READ CSR FOR CORRECT CHECK BITS AND DBE INDICATOR
sCLEAR INMIBIT MODE POINTER FROM DATA IF IT EXSISTS1
;CHECK IF DOUBLE ERROR BIT IS SET

8376

012737 177777 002612
013757 002150 002052

LET BAD := CSR

o s——

:;:BAD DATA

8377

104065

ERROR +65

1
l!.!
la‘
8
8385
.‘.’ 02
838
8388 025666

104473

005037

END

ECC1INIT
CLR PASSNO
REPEAT

002266

104473
005237
005037

0uV2266
002072

112711
105711

000377

g%i:‘f{

002072

ECCLINIT
INC PASSNO
CLR PARCNT
LET (R1) :B= #377
000001

TSTB (R1)
IF PARCNT NE @1
SET HEADER

MOV OFIRST,ADDRESS
;ENABLE CHECK/SYNDROME BIT REGISTER
;:DBE CHECK BITS FOR CSR
MOV 03145,CSR
;WRITE DBE CHECK BITS TO CSR
;GOOD DATA
MOV €103145,G00D
;WRITE ZEROS AND DBL ERROR CHK BITS A=0
CLR (R1)
;READ A=0 TO GET DOUBLE BIT ERROR

it O
8378

CLR PARCNT
MOV @1 ,NOPAR

i
;ENABLE BUSPBL
;CLEAR LOOP COUNTER
H

#-1,HEADER
MO
&
v
\J

L212:3355333

EEEEEE

;ENABLE BUSPBL
s INCREMENT LOOP COUNTER
sCLEAR PARITY ACTION COUNTER
;WRITE BYTE SHOULD BE ABORTED

MOVB #377,.(R1)
sREAD R1 TO SEE IF IT IS STILL O
;WAS WRITE ABORTED???
BEC"G’ tggfl?..l
:

]

Y DIAG.
ERAOR TEST
e BIT

MSV11CVMJABO
L
CYHIARO
8389

8390
8391

025666 012737 177777 002612
74

74 005037 002044
00
700 0&3731 000377 002052

025706

710
710
710

005201
7
8394
023727 002266
7
025720 001346
0257
oosoag
7
8395
0450
7
ll”
37 002072
7
.g’
104423
7
8398
ag 025734 000207
8393

Y05.02

Monday 07-Oct-85 16:57

- 240-1

LET GOOD := #0

;GOOD DATA

LET BAD := @377

;:BAD DATA

ERROR +56

INC

000002

Page

UNTIL PASSNO EQ @2

-(R1)
CLR
CLRICSR
PARCNT
CLR
CACHON

RETURN

;AND REPEAT ON HIGH BYTE
H

MOV @-1,HEADER
CLR GOOD
MOV @377,.BAD
L213:::3::3
@c
CMP PASSNO,

BNE B30

E30::33333
;CLEAR LUT
;CLEAR CSR
;CLEAR PARITY TRAP COUNTER
;TURN ON CACHE

SEQ 0213

MACRO Y0S.02

MSV11-J MEMORY DIAG.
CVMUABO
BT ERROR TEST
BRYEBouBLe
YRIN0

8403 025736

MTPO17: SUBTST

P
;#(2)
:#(3)

8406
8407

8410 025736
8411 025742
8412 025744
841
8414 025
8416

025760

:33

000303
110021

18:

025764 020105

766

103774

8421 025770
8422 025772
8423
8424 025774
.033 025776
8427 026000
8428 026002

014102
020002
001401
104446
020104
101372

8430

026006

000300

8433

026012

8429

;:NOTE:

012701 060000
010104
012705 160000
012700 000377
010003

8417 025762 110321

8418

026004

8431 026010
“33

it 242

SEQ 0214

HOLDING 1'S & 0'S TEST»>>

€ 0'S TEST
HOLDING 1'S
MTPO17".‘.“..‘.
eSUBTEST .‘..‘.‘..
||““‘.“‘.‘
.“.‘..‘.‘..“‘.““““....‘.‘...‘.“.“‘...‘..
;#(1)
i

8408
8409

<<MTPOL17

Page

'“...‘...‘....“‘......‘....‘...“‘.“.‘....“....““."..“.....“““.‘....‘

8404
8405

8415

v 07-Oct-85 16:57

Mondey

000303

2s:

THIS TEST CHECKS THE MEMORY FOR THE CAPABILITY
OF HOLDING 1‘S AND 0'S BY WRITING A BACKGROUND

OF 000377 AND READING IT
MEMORY IS WRITTEN USING A BYTE AT A TIME
STEPS 1 & 2 ARE REPEATED WITH A SWAPPED BACKGROUND PATTERN
THIS TEST WRITES BYTES & READS WORDS

MOV
MOV
MOV
MOV
MOV

OF IRST,R1
R1,R4
OLAST+2,RS
#377,.R0O
RO,R3

MOVB

RO.(R1)+

;MRITE A BYTE

;BRANCH IF LOWER

SWAB

MOVB

CHP

BLO

R3.(R1)+

R1.RS

{GET THE PATTERN INTO RO
{WRITE THE MEMORY WITH THE BYTE STORED IN BAKPAT+1

;COMPARE TEST LOC TO TOP + 2

MOV
cHP
BEQ
PERR22
cHP
BHI

-(R1).R2
RO,R2
3¢

;TEST THE MEMORY TO SEE IF IT CONTAINS

R1.R4
2

;KEEP ON TESTING THE MEMORY UNTIL
;R1 EQUALS THE LOWEST ADDRESS

SWAB

001763

BEQ

000207

RETURN

:THE WORD STORED IN BAKPAT

;CHANGE THE DATA PATTERN

;IF THE DATA PATTERN DOES NOT HAVE LOW
: BYTE =0 THEN FALL THRU

CVMJABO MSV11-J MEMORY DIAG.

| MTPO17 HOLDING 1'S & 0'S TEST
8437 026014

MACRO Y05.02

MTPO20: SUBTST

<<MTP020

:*SUBTEST

MTP020

Page 244

SYNDROMES TO CSR ON SINGLE BIT ERROR TEST>>

SEQ 0215

'““.0‘.“...‘.‘O."“".‘.."..‘..“.“"..O..‘...“‘..‘..‘..O..“..‘....“‘..

SYNDROMES TO CSR ON SINGLE BIT ERROR TEST

;“".‘C".‘..‘....“...““‘.““.“.“.““‘.‘.“..““.“‘..“.“..“.“..‘..

““

:
;

8439
8440

m.“%

8443 026014
8444 026016
8445 026020

“49 026024
8447

Monday 07-0Oct-85 16:57

026026
026026

104424
005000
105037

104513

8448 w

105237
8449 026032
026032 012704
8450 026036
026036 005037
8451 026042
026042 123727
gggg 001003
8452
026052 012705
8453 026056
026056
026060

002264

8455 026064

8469 026132

005237

000001

002150

010011
104503
005711
104426
042737

026132 023727

026140 001407

8470 026142

026142

8471 026150

012737

177757

REPEAT

LET BITNO := #0
IFB PASFLG EQ #1

LET R2 :B= PTABLE(R4)
ASH 45.R2
BIS #BIT2.R2
LET CSR := R2

LOADCSR
LET (R1) := RO

002150

002150 000020
000020

END

:= &-1

INC BITNO
LET R4 := R4 + 01

005204

002044

;ENABLE CHECK/SYNDROME BIT REGISTER
&ns
INCB PASFLG
sINDEX TO SINGLE BIT ERROR TABLE
MOV #-1.R4
;CLEAR INNER LOOP COUNTER
CLR BITNO
sSELECT DATA TO BE CORRECTED BY PASSNO
CMPB PASFLG,®1
BNE L215
;DATA=0;BIT TO BE CORRECTED IS A ONE
MOV @1.RS
:
BR L216
L21S:33333
IS A ZERO
:DATA=177776;8IT TO BE CM‘ECTED
MOV @177776.RS
:

LET RS := #177776

002324

010237
104425

ELSE

177776

030164
000005
000004

REPEAT

LET RS := &1

000001

116402
072227
052702

:TURN OFF CACHE
;CLEAR DATA
sCLEAR PASFLG

LET R4

177777

026064
8456 026064
8457 026064
8458 026070
026070
8459 026072
026072
8460 026076
8461 026102
8462 026106
026106
8463 026112
8464 026114
114
116
8465
8466 026120
8467 026122
8468 026124

CACHOFF
CLR RO
CLRB PASFLG

LET PASFLG :B= PASFLG + &1

000402

026060 012705
8454 026060

ALL 16 DATA BITS.

CBREG

002264

002324
002264

THIS TEST CHECKS TO SEE IF THE SINGLE BIT ERRORS CAUSE THE SBE
BIT IN THE CSR TO BE SET AND CORRECT SYNDROME BITS ARE GENERATED FOR

CLR1CSR
TST (R1)
READCSR
B8IC #tC20,.CSR

IF CSR NE @20

C é
s INCREMENT LOOP 83‘1,:‘*

L216:3:33:3

B32::3333:

s INCREMENT BIT POINTER
;POINT TO NEXT SET OF CHECK BITS
INC R4
:GET NEXT SET OF CHECK BITS
MOVB PTABLE(R4),.R2
sSHIFT TO LINE UP IN CSR
;ENABLE DIAG MODE
:GET CHECK BITS TO BE WRITTEN
MOV R2.CSR
;:LOAD CSR WITH DATA
:WRITE DATA TO TEST ADDRESS
MOV RO,(K1)
:CLEAR CSR
;CORRECT SBE
;READ CSR FOR CORRECT SBE BIT AND SYNDROMES
INDICATOR
;CLEAR ALL B
{Vg
:WAS DATA C

g? CSR, €20

LET GOOD := @20

LET BAD := CSR

MOV €20,G00D

Q L2217

MACRO_Y05.02 Monday 07-Oct-85 16:57
CVMJABO MSV1l-J
BIT ERROR TEST
"SINGLE
0‘
CSR
TO
SYNDROMES
' HTPO2O
026150
8472 026156

013737
104060

026160

104514

8473 026160

042737

002150

002052

ERROR +60

174033

SYNREG
READCSR

BIC 9tC3744,CSR
LET R3 :B= SBESYN(R4)

002150

ASH 05,R3

8IS oeirz R3
IF R3 NE CSR

002150

177777
010337

002044

C13737
104042

002150

002052

002264

000402
000261
006105

002264

000020

000207

P
i

034
054

MOV

MOV CSR,BAD
;

L220:35:33:3

sSHIFT BITNG TO THE LEFT

SEC
ROL

;SHIFT NEW DATA DEPENDING ON PASFLG

#-1,HEADER

MOV R3,G0O0D

ASL
ELSE

CMPB PASFLG,®1
BNE L221

BR L222
L221:353:3:3:

:SET CARRY BIT AND......
sROTATE LEFT i

L222:3333:3

sUNTIL ALL BITS ARE DONE

§2mo.ns.
o
=

32-:::::;

;COMPLEMENT DATA AND REPEA
sUNTIL 2 PASSES ARE COMPLETE

crP8 PASFLG.02

;:CLEAR CSR
:TURN CACHE

BNE B31
E31:::333:

MSV11-P SINGLE BIT ERROR SYNDROME BIT TABLE

023 SBESYN: .BYTE

031
043
051
061

CHMP R3,CSR
BEQ L220

;CLEAR LUT

COM RO
UNTILB PASFLG EQ @2

000002

MOVB SBESYN(R4),.R3

CLR (R1)
IFB PASFLG EQ #1

CLR1CSR
CACHON

013

aSHIFT INTO POSITION
:SET DIAG MODE _IN DATA
;D0 SYNDROME BITS AGREE

UNTIL BITNO EQ ¢16.

104503
104423

8503

ERROR +42

END

005100
123727
001252

{GET SYNDROMES FROM
'MASK SYNOROME BITS
SYNDROMES
iGET GOOD

LET BAD := CSR
END

002324

JENABLE SYNOROME1TC&ésisfea

LET GOOD := R3

006305

023727
001276

MOV CSR,BAD

:NO ERROR

SET HEADER

002612

005011
001002

SEQ 0216

026310
000005
000004

123727

Page 244-1

16,13,23,25,26,31,32,%4,43,45,46,51,52,54,61,.64

MACRO Y05.02 Monday 07-Oct-85 16:57
CVMJABO MSV11-J MEMORY DIAG.
S T0 CSR ON SINGLE BIT ERROR TEST
S

Page 245

SEQ 0217

MTPO20

MTPA21:

8505 026330

SUBTST

<<MTPA21

MARCHING 1'S & 0'S PATTERN TEST>>

.ooo..oo.ooo‘..ooooooo.o.oooooo‘o.o.oo.oo.o.oooo.ooo.-oooaoooo‘oooo.oooooooooo.o

1 #SUBTEST

MTPA21

MARCHING 1'S & 0'S PATTERN TEST

§EE8% 888 SS8ss gsss
£
33
T

1%:

0;4100

000311

fimBYTESWAP -MODIFY,READ ,DOWN
CHP
BEQ
PERR17

V177642

:V177644
1V177646

2%:

(R1)
(R1),RO
R3,RO
3

V177650
;V177652
:V177654
:1V177656
:1V177660

34:

R4 ,R1

1401

RETURN
MTPB21:

14:

01 338

-(Rl) RO; V177640

R2.RO

00140
10444

LA A (M L
N~~~

a‘....
==

188688848584 88888888888048888888808000880080088808080400000000000000000004000000

24:

CHP
BEQ
PERR20

(R1),RO |V177640
R3,R0
V177642

24:

:1V177644

V177646

:1V177650
)
),RO ;V177652

SWAB
MOV

ADD
cHP
BNE
RETURN
MTPC21:
14:

;DONE?

- LOOP
:NO
sYES - RETURN

lflEAD BYTESWAP -MODIFY,READ,UP

cHP
BEQ
PERR17

000002

V177662

V177664
:1V177666

#2,R1

RS,R1

:1V177654

1V177656
:V177660
;V177662

;V177666

;V177670
V177672

?
;DONE

- LOOP
;:NO
;YES

- RETURN

lflEAD.!YTESHlP-HODIFY READ,UP
(Rl) RO ;V177640

R2.R

V177642

|V177644

;V177646

1V177650
(R1)
(R1),RO ;V177652

R3,RO

;V177654

#2,R1

;V177662

3¢

R5,R1
1s

sV177656
;V177660

;V177666
1V177670
V177672

;:DONE?
:NO - LOOP
;:YES - RETURN

MACRO Y05.02 Mondey 07-Oct-85 16:57

0531

50
gg 014100

104444

74
76

§..

0
;i

‘
~

2%:

R3,R0

SEQ 0218

;V177642

:vrnm

(R1)

1V177650

R2,R0
cHP
3
BEQ
PERR17

1V177660

BEQ

001401

soo:&

Page 247

MTPD21: .ltno BYTESWAP -MODIFY ,READ,DOMN
-(R1)., nonn'nuo
14:
SWAB

MOV

R4,R1

3s:

RETURN

1V177646

(R1),RO ;V177652

NG 1'S & 0'S PATTERN TEST

[

- CVMJABO MSV1l-J MEMORY DIAG.

. MTPA21

;V177654
1V177656

;V177662

:V177664
;V177666

aDOE?

- LOOP
sYES - RETURN

CVMJABO MSV1il-J MEMORY DIAG

MACRO Y05.02

MARCHING 1'S & 0'S PATTERN TEST

| MTPA21
8575 026500

Monday 07-Oct-85 16:57

MTPO22: SUBTST

<<MTPO22

s sSUBTEST

MTPO22

Pege 249

SEQ 0219

REFRESH & SHIFTING DIAGONAL TEST>>

18866668854688885880688008048080080088088888008000008088000000808800000000000000

REFRESH & SHIFTING DIAGONAL TEST
WE WRITE A DIAGONAL PATTERN IN MEMORY (WITH CACHE ON).
IF A REFRESH TEST WE DISTU=S ALL ROWS FOR > 2 MS (WITH CACHE ON).
WE READ & CHECK FOR CORRECTNESS THE DIAGONAL PATTERN

1886880688608888888888480808888880808888887°7 04 28888888888800008000808880000000000

000010

012737 000001

8582

ga3727

1005

8583 ¢

002364

002364
000001

8585 ¢

;

000404

;

013702

8589 (0;

005037

41 02

104423

02
8594 (
:
8595 ¢
0
8596 ¢

8597 :¢
'

8598 (

002614

00127

157776

737
3
012737

002370

g2r01

000374

000007

008387 002370
737

1404
010211

002370

L22S::5335353
MOV ONES.R2

TN o S-—

FOR STRIPES := 90 TO OKDIAG-1

STRIPES
JFOR THE NUMBER OF
CLR STRIPES

CACHON

ISR

99. Wam——
ETIRON.
LET R1 := OFIRST

s TURN CACHE ON

WHILE R1 LOS OLAST
IF COUNT LT @0 THEN LET COUNT := OKDIAG-1

002370

MOV ZEROS.R3

RER

B348:;::::::

WRITE LOOP

060000

MOV ZEROS.R2
MOV ONES.RS

B8R L226

END ;OF IF EVEN

002366

012701

BNE L225

LET R2 := ONES

013737 002366 002370
101

B33:::3333
81
CHP EVEN.

IF EVEN EQ 01

ELSE

’

MOV @1 .EVEN

LET RS := ONES

013703 002336

.t
8588 (

(WITH CACHE OFF).

:
OCCURS (MUST BE A POMER OF 2)
OFTEN A DIAGONAL STRIPE
KDIAG=S. FOR EVEN := 01 TO“HOM
\FOR DATA & COMPLEMENT DATA
@2

LET R2 := ZEROS

013702 002336
013703 002614

:
8584 ¢
:
8586

(1)
1(2)
1(3)

MOV STRIPES.COUNT
v

MOV OFIRST.R1

B3S5:::3533
CHP R1,OLAST
BMI L227
TST COUNT
B8GE L230
Laso.,,0V $KDIAG-1,COUNT

IF @374 OFF.IN R1 THEN LET COUNT := COUNT - 81 ''
BIT #374.R1
Lass., , DEC COWNT
H

IF COUNT NE 90
LET (R1)

:= R2

R E

TST COUNT

8EQ L232

MOV R2,(R1)

D
-J MEMORY

MACRO Y05.02

W M R Ir TGDIAGONAL TEST
010261
000403
010311
010361
005337

Monday 07-Oct-85 16:57

Page

249-1

SEQ 0220

LET 2(R1) := R2

MOV R2,2(R1)
BR L233

000002

L232:3333133

LET (R1) := R3

MOV R3,.(R1)
MOV RS,2(R1)

LET 2(R1) := R3

000002

END ;OF IF COUNT

L233:333333

LET COUNT := COUNT - @1

002370

LET R1

062701 000004
000743

DEC COUNT

:= R1 + &4

ADD #4,.R1

END ;0F WHILE

po—-

E3S:3333353

;END OF WRITE LOOP

005737

afi

8614

IF DIAGFLAG IS FALSE THEN $CALL REFRESH

002004

013737

002366

1’ 012701
13424 060000

TST DIAGFLAG

%%k beR

004787 027054

0
0

BR B35

38888

JSR PC,REFRESH
L234:535::

;READ LOOP

002370

LET COUNT := STRIPES

it AR g
CACHOFF

MOV STRIPES.COUNT

sTURN CACHE OFF

MOV #FIRST.R1

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

MTP022 REFRESH & SHIFTING DIAGONAL TEST
8616 026700

026700

026700 020127

026704 101046

8617 8%7“
706
026712
026714
026722
8618 gg?
7
0267
026
734
8619

157776

005737 002370
002003
012737 000007 002370

032701 000374
001002
005337 002370

734

026734 005737 002370

026740

8620 026742

001412

026742 011100
8621 026744
026744 020200
026746 001401

8622
8623

0267
0267

8626 026762
8627 026764
026764
8628 026764

026764
026766
8629 026766
026766
8630 026770
026770
026772
8631 026774
8632 026776
026776
8633 026776
026776
8634 027002
027002
027004
8635 027006
8636 027010

WHILE R1 LOS @LAST

IF COUNT LT #0 THEN LET COUNT := #KDIAG-1

000002

IF COUNT NE #0

LET RO := (R1)

LET RO := 2(R1)
IF R2 NE RO

PERR17
END ;0F IF R2
ELSE

000411

LET RO := (R1)
IF R3 NE RO

011100
020300
001401

PERR20
END ;OF IF R3

104444

000002

LET RO := 2(R1)

IF R3 NE RO
PERR20
END ;0F IF R3

104444

027010

8637 027010

END ;OF IF COUNT

8638 027010

LET COUNT := COUNT - &1

027010
027010

8639 027014

005337

002370

SEQ 0221

B36:::1: é"p

R1,0LAST

BHI L23S

TST COUNT
BGE L236
MOV oKDIAG-1,COUNT
L236:333333
IF #374 OFF.IN R1 THEN LET COUNT := COUNT - @1
BIT 0374.R1
BNE L237
DEC COUNT

PERR17
END ;OF IF R2

104443

016100
020300
001401

Page 250

IF R2 NE RO

104443

026752
8624 026752
026752 016100
8625 026756
026756 020200
026760 001401

Monday 07-Oct-85 16:57

LET R1 := R1 « 04

L237:3333343

TST COUNT

BEQ L240

MOV (R1).RO
CMP R2,.RO
BEQ L241
L281:::33:3
MOV 2(R1).RO
CMP R2,RO
BEQ L242
L242::;:::::
BR L243
L240:;::3::3

MOV (R1).RO
CMP R3,RO
BEQ L244
L244:;;:;::::

MOV 2(R1).RO
CMP R3.RO
BEQ L245
L245:;::3::

L243:::::::
DEC COUNT

MACRO Y05.02
CVMJABO MSV11-J MEMORY DIAG.
MTPO22 REFRESH & SHIFTING DIAGONAL TEST

027014

062701

027020

000727

8640 027020

Monday 07-Oct-85 16:57

000004

SEQ 0222

ADD ¢4 .,R1

END ;OF WHILE

BR B36
L23S:583333
36:533313

;END OF READ LOOP

8641

8643

Page 250-1

027022

027022
027
0270.

005237
023727
003643

027036
027042
027050

005237
023727
003616

8645 027052

000207

002366
002366

002364
002364

END ;OF FOR STRIPES

INC STRIPES

CMP STRIPES,KDIAG-1

000007

BLE B34

E34:;533333

END ;OF FOR EVEN

INC EVEN
CMP EVEN, @2
BLE B33
E33:5:53333

000002
RETURN

<<SUBR

REFRESH DELAY>>

8647 027054

REFRESH:SUBTST

8648

H 2228882880488 2000000 RARARASARRR AR R0 R0 R40408454848458088080000000404000
;DISTURB EACH ROW FOR > 3.2 MS

[ AARAAREREERARRRARRRRRRRARAARREAARARRAREASEEREEESEE04448480488888080084000000
REFRESH DELAY
SUBR
:#SUBTEST

8649 027054
027054

012700

060000

8650 027060

8651 027064
027064

004737

027124

062700

000004

027074

003771

027070

020027

012700

120000

027102

020027

020372

8654 027110

004737

027124

062700

000004

8655 027114
027114
8656 027120
027120
027122
8657

7122

027122

101005

000207

012704

0271

140

8659 0271

8661 027136
“‘i 027140
8663 027142

CALL REFSUB
END ;OF FOR RO

LET RO := OFIRST+BIT14
WHILE RO LOS #LAST+BIT14.374

CALL REFSUB
LET RO := RO + 4

END ;OF WHILE

000770

“g‘ 0271

700

120
005110
005110

:= OFIRST TO &FIRST+374 BY 44

060374

027076

027106

FOR RO

MOV &FIRST,.RO
B37:5:3333

ADD #4.RO
CMP RO,&FIRST+374
BLE B37

E37::5:35333

MOV &FIRST+BIT14.RO
B40:;:::::
CMP RO,OLAST+BIT14.374
BHI L246

ADD @4 .RO

BR B40

L246::;:3:::

000640
©V0002

REFSUB:

1%:

RETURN

MOV
COoM
CoM
COM
COoM
S08
SuB

RETURN

E40:;:::::

0640 ,R4
02,R0
-CRO)
(RO)«
(RO)
(R0)
R4, 18
#2.RO

;TIME FOR A > 3.2 MS LOOP

CVMJABO MSV11-J MEMORY DIAG.

SUBR

REFRESH DELAY

8669 027154

MACRO Y05.02

MTPA24: SUBTST

<«<MTPA24

1#SUBTEST

MTPA24

SEQ 0c23

FAST GALLOPING PATTERN TEST>>

FAST GALLOPING PATTERN TEST

(RSAASEESAESASEAEEAESEEEREREEEERERAAEAERARERREEARARAAEL0RRESRRNRRNNNNINNRRNRNSS

;THE TOTAL TEST C(INCLUDING SETUP) IS AS FOLLOWS
;=(1) THIS TEST WRITES THE MEMORY WITH A BACK GROUND PATTERN
i

867

12(2)
i*
1#(3)
1#(4)
;#(5)
;#(6)
18(7)
;#(8)
12(9)
;#(10)
i®

867
8674
8675
8676
8677
8678
8679

8680

8681

“.i
868
8684
8685

STORED AT LOCATION BAKPAT

TEST BEGINS AT LOWEST LOCATION BEING TESTED
CLETS NAME IT 'A’')
LETS NAME THE 1ST LOCATION IN THE ROW/COLUMN UNDER TEST AS ‘B’.
SWAPS BYTES FOR LOCATION 'A’.
READS 'A‘', READS 'B’'
(ADDS 64 DOUBLE WORDS TO ‘B')
'B' = 'B'+400
REPEATS STEPS S AND 6 UNTIL ‘B’ IS GREATER THAN THE
END OF THE BANK A+2
REPEATS STEPS 3-8 UNTILL ‘A’ REACHES THE END OF THE BANK
AFTER EXECUTING THE TEST DATA IS COMPLEMENTED
AND STEPS 1-9 ARE REPEATED

;REGISTERS ARE USED AS FOLLOWS
TEST DATA
:RO
‘A’
iR1
‘8’
iR2
BAKPAT
:R3
SWAPAT
iR4
LAST
;RS

8686
8687
8688
8689
.l::g

;:NOTE THE PATTERN STARTS AT MTPB24:!:tttttrssrree

:2:

8694

8695 027154 011100
8696 027156 020004
8697 027160 001401
as 027162 104447

8700 027164 011200
8701 027166 020003
8702 027170 001401
:;8‘ 027172 104450
8705 027174 062702
8706 027200 020205

000400

:;gz 027202 101764
8710 027210

Page 252

188688408880808000880000000080080800080000000R00080804800008000000000000000000000

8670
8671

8709 027204

Monday 07-Oct-85 16:57

062701

000137

000002

027214

;UIPAR'S

1¢:

(R1),RO
MOV
RO,R4
CMP
24
BEQ
PERR23

24:

(R2),.RO
MOV
RO,R3
CcMP
3
BEQG
PERR24

3s:

ADD
CMP

BLOS

ADD

JMP

9400,R2
R2,R5

#2.R1

aoMTPB24

:1V177640
V177642
;V177644
;1V177646
1 V177650
;V177652
:V177654
V177656
;1V177660
V177664

;READ 'A’
;CHECK ‘A’
:BR IF OK
;REPORT ERROR
;:READ 'B’
;CHECK 'B’
;B8R IF OK
;REPORT ERROR
;BUMP B’
;AT END YET?

V177670

;BUMP ‘A’

1V177666
1V177674

:BR IF NO

;:GOTO V177260

CVMJABO MSV1il1-J MEMORY DIAG

MACRO Y05.02

MTPA24 FAST GALLOPING PATTERN TEST

Monday 07-0Oct-85 16:57

Page 254

SEQ 0224

FAST GALLOP PART B>>
<<MTPB24
MTPB24: SUBTST
;“.‘.““‘.‘..“““‘“‘..““.‘...“...‘...““‘..“‘..‘.“.‘.......‘.‘.“.“.

8713 027214

1«SUBTEST

MTPB24

FAST GALLOP PART B

.““.‘.“‘..“..‘“.....‘.‘..“0“.“‘.‘.‘....“.“...‘..““..“‘..“....0“"

|
|

8714

8715 027214
8716 027216
8717 027220

8718 027222
8719 027224

027230

8720

8728 027242
8729

JMP

80MTPC24

1V172260
1V172262
1V172264
1V172266

1V172270

sWRITE 'A’
DONE ?

:BR IF NO

:YES - RETURN
;GOTO V172360

FAST GALLOP PART C>>
MTPC24: SUBTST
<<MTPC24
(SARAARASAAREERAEARRAERRREASAIREARARARARAAEEEEE40R044040858000000000000000000000
MTPC24 FAST GALLOP PART C
1 #SUBTEST
3‘“.‘“.‘.‘.“.“...“...“‘.....“.““‘.“.““‘...“‘.“C‘...‘...‘.““.....

8721 027230

8726
8727 027240

1%:

: SOPAR' S
R4,(R1)
MOV
R1,RS
CHMP
1$
BNE
RETURN

;KDPAR' S

010102
011100
020004
€01401

104447
000137

027174

1%:

MOV
MOV
CHP

R1,R2
(R1),RO
RO,R4

JMP

0MTPA24+20

BEQ
PERR23

1V172360
1V172362
:1V172364
;1V172366
:1V172370
;V172372

;RESET 'B’'
sREAD 'A’

«<---

;BR
;sREPORT ERROR
;:GOTO V177660

'A’

CVMJABO MSV11-J MEMORY DIAG.

MTPC24

FAST

GALLOP PART C

8732 027246

MACRO Y05.02

MTPA26: SUBTST

<<MTPA26

1#SUBTEST

MTPA26

010221
010321
077005
000207

RANDOM DATA (WRITE)

GOTO V172360

1V177640

MTPB26: SUBTST

<<MTPB26

RANDOM DATA (READ)>>

1#SUBTEST

MTPB26

JMP

MOV
MOV
S08
RETURN

1V177644
1V177646
1V177650
1V177652

R2,(R1)«
R3,(R1)+
RO,1$

1888846888808 848880R880R000A0000ERR0RRERERARERRER0R00RLRRR0ER000R0RE0000000

RANDOM DATA (READ)

1888088808080 0888 8888008800008 00000000080008000040404008080000000000000000000

7
874
8744 027270
8745 027 72
.749 27274

000157

020221
001401
104451
005127

027316

020321
7
7302 001401
O 7;& 104451
005167
027
027312 077015
027314 000207

2%:

177764

8757 027316

JMP

cHP
BEQ
PERR25
coM

AMA
LSB

SOMTPC26
R2,(R1)+
24

(PC)+

R3,(R1)«
cHP
3%
BEQ
PERR25
RANODD
CcoM
RO,1$
S0B
RETURN
.DSABL LSB

1V177640

GOTO V172360

1V177654

FOR ERROR REPORTING

1V177644
1V177646
1V177650
1V177652

1V177656
1V177660
1V177662
1V177664
1V177670
iV177672

MTPC26: SUBTST

<<RANDOM NUMBER SUBPROGRAM>>

; #SUBTEST

RANDOM NUMEER SUBPROGRAM

;8848888804848 0ERARRARARRRERARRARRRSEERRRRRSARERRR0ENSRRRRERE00000800800000
1884 AAREEEERLE0EAERR0ARRERERARAMERARARAERRARRRERRRERRERRELSERER000400000000

;CALLER MUST SETUP

8759
8760
876
87
8763 027316 073427
305
027322
8764
8765 027324 005504
060204
027
8766
062705
8767 027
:;s 027334 000240

000007
001057

8770 027336

8771 027336
8772 027340
8773 027344
8774 027346
8775 027350

1%:

.DSABL
.ENABL

RANODD: 0

8747 027276 000000

87
874
8750
8751
8752
8753
87

RANDOM DATA (WRITE)>>

SOMTPC26

8739 027262

0763

SEQ 0225

188688888888 08008888808088858408000000880000800408004008000000000000000000000000

14:

8740
8741

Page 256

168688088880888080888088040808000080000000080080008800000000000000000000000000000

8733 027246 000137 027316

8734 027
8735 027
8736 027256
:;g‘ 027260

Monday 07-Oct-85 16:57

:
i
3
3
ASHC
ADD
ADC
ADD
ADD
NOP
MTPD26: SUBTST

SEEDLO.R3
MOV
SEEDHI,R2
MOV
R3,R5
MOV
R2.R4
MOV
1V172360
#7.R4
;V172364
R3,RS
1V172366
R4
1V172370
R2,.R4
1V172372
21057.R5
GOTO V172260
1V172376
<<RANDOM NUMBER SUBSUBPROGRAM>>

1 #SUBTEST

RANDOM NUMBER SUBSUBPROGRAM

1888550000004 80044 RS4RSAARAARRASRERRRERLARSRRERER0R000004000080800000000

005504
062704
010503
010402
000137

8
4000808000000
008400
0RRE04000408800
880800
0000000800
(8454880880058 808480000808

047401
027252

ADC
ADD
MOV
MOV
JMP

R4
#47401.R4
R5,R3
R4 ,R2
SOMTPA26 +4

1V172260
1V172262
1V172266
1V172270
V172272

GOTO V177644

CVMJABO MSV11-J MEMORY DIAG.

R ANDOM NUMBE!R SUBSUBPROGRAM

8778 027354

MACRO Y05.02

Monday 07-Oct-85 16:57

MTPO30: SUBTST

Page 258

<<MT0030

FLUSH OUT DBE'S>>

|.‘.‘...‘.““...“‘“.‘.‘...“..‘.“.‘...“...“.“...‘.“..“.....‘.‘“......‘

8779 027354 011002
8780 027356 010220
8781 027360 077103

1 #SUBTEST

1%:

MTO030 FLUSH OUT DBE'S

8734 027364

MTPO31: SUBTST

<<MTPO31

|““.‘.“.".“‘.“..‘."..““...‘.“““..‘.‘.‘.““““‘...‘.t.‘.‘..‘.‘..“.

:;” 027362 000207
8785

8786 027364

;1 #SUBTEST

SOB-A-LONG TEST>>

MTPO31 SOB-A-LONG TEST

|...‘..“..t.‘.‘.‘.““.‘.‘.“".0“““.l“‘.““‘.“““““‘0““.0‘0‘.‘.“..

000000

'3 027434 014344
uo'
027436 001376

8804
8805 027440 000752

8806
8807

1V177640
V177642
V177644
1V177646

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

077001
005167
020167
001403
104454
010167
005167
010200
010503
005725
010504
020537
001001
8801 027432 000207

8787 027
8788 027370
8789 027374
8790 027400
8791 027402
8792 027404
8793 027410
8794 027414
8795
87 oznsg
879 8;14
8798 027422
8799 027424
8800 027430

(RO),R2
MOV
R2,(RO)+
MOV
R1,1$
S08
RETURN

177772
177766

177756
177752

14:
2:

002522

.DSABL

AMA

RO.1$
So8
14
COM
R1.1$
cHP
23
BEQ
PERR30
R1,1$
MOV
14
COM
R2.RO
MOV
1UPDATE MOVE REGISTERS
RS,R3
MOV
(RS
TST
RS.R4
MOV
RS, 80LINK1
cMP
33
BNE
RETURN

MOV

BNE
B8R

-(R3),-(R4)

34
14

SOBLENGTH= . -MTPO31
LENABL AMA

;MOVE TERMINATOR

1S0B TILL RO UNDERFLOWS
;WRITE COMPLEMENT OF SOB
{READ & CHECK FOR NOT "SOB RO,DOT*
10K - SKIP
;CORRECT SOB INSTRUCTION
;REINITIALIZE SOB CONSTANT
;BUMP (SAFELY) BY 2

;DONE?
iNO - SKIP
s YES

SEQ 0226

CVMJABO MSV11-J MEMORY DIAG.

MTPO31

SOB-A-L ONG TEST

MACRO Y05.02

Page 260

SEQ 0227

WRITE RECOVERY TEST>>
<<MTPO32
MTPO32: SUBTST
1884408888808 800408888 088880440000 0480804404004040008080048004000000000000000000
MTPO32
WRITE RECOVERY TEST
1#SUBTEST
04000000
F 24448288482 8080 00008842888 A2R4RAR0RRRER08R 4088008088808 80 0000000000000

8835 027442

;THE TEST ACTUALLY EXECUTED ALREADY IN THE MEMORY UNDER TEST.

8836
8837
8838
8839

884

Mondey 07-Oct-85 16:57

: THIS CODE INSURES THAT IT CHANGED MEMORY TO HAVE
WHICH IS A “COM -(R1)” INSTRUCTION AND
1172 BANK OF #5141
WHICH IS A “JMP (RO)*
INSTRUCTION.
1172 BANK OF @110
1¢:

7442

uc;

7444

8844

027450

8843 027446

013703

8851 027470
8852 027472

002522

MOV
CHP

(R4)+,R1
R1,R2
24

24:

R3,1$

3%:

(R4)+,RO
RO,R5
44

44:

R3,3$

SO0LINK1,R3

1V177640
1V177642

;GET DATA FROM LOWER 1/2 BANK
:IS IT 051417

1V177646
1V177650
1V177652
1V177656
1V177660
1V177662
:V177664
1V177666

iNO - TAKE ERROR TRAP
;LOOP FOR 1/2 BANK
sRESTORE LOOP SIZE
sGET DATA FROM UPPER 1/2 BANK
+IS IT 01107
:YES - SKIP
iNO- TAKE ERROR TRAP
;LOOP FOR 1/2 BANK

1V177644

sYES - SKIP

CVMJUABO

| MTPO32

MTPO33: SUBTST

s #SUBTEST

~ <~

027

xncs

18:

95 027
8896 027
8897 027570
8898
8899

1TEST WORD (TWO BYTES)

000036

{BRANCH WHEN BIT7 IS SET
iLOOP 128 TIMES

1$
(R2)
BRGOBB

; INCREMENT HZGH BYTE OF “BGTEST”

NOW CHECK FOR CORRECT CONDITION CODES

IF V-BIT SET (SHOULD BE)
18R

INCB
8CS

(R2)
38

: INCREMENT HIGH BYTE OF -osresr- ONCE MORE
NOT BE)
i8R IF C-BIT SET (SHOULD

28:

34:

3
8vVC
as
8MI
PERR3S

as:
Y

:SET CARRY (TO BE ADDED TO “BGTEST")

: INCREMENT LOW BYTE OF “BGTEST”

(R1)

PERR3S
cLV

mm TEST
iNO- REPORT ERROR AND
:COND CODES NOT EQUAL TO 1010
;CLEAR V-BIT

:BR IF V-BIT CLEAR (SHOULD NOT BE)
1BR IF N-BIT SET C(SHOULD BE)
:NO- REPORT ERROR AND ABORT TEST
:COND CODES NOT EQUAL TO 1010

;UPDATE TEST POINTERS

MOV
SuB
MOV
INC

PC,R1
@54 -BGTEST.R1
R1,R2
R

;UPDATE MOVE REGISTERS

MOV
TST
MOV

RS,R3
(RS)+
RS.R4

S0LINK1
gl RS,
6%
BNE
RETURN

002522

8891 027560

MTPO33 BRANCH GOBBLE TEST

sMOVE TERHINA

BRGOBB: SEC
ADCB

8884 027544
S 027546
027550

BRANCH GOBBLE TEST>>

<<MTPO33

027542
ta8t1 §31382

Page 262

BGTEST: O

8MI

8878 027532
8879 027534

94 027

Monday 07-0Oct-85 16:57

"....‘..‘....““‘.‘““‘..“.“‘.‘.“‘..‘..‘.‘..‘..‘.“‘“.‘.“..‘.“.‘“.“.‘
AMA
.DSABL

o 5%

SRRRRR R

~own SUENE

2233

MACRO Y05.02

1888888888 848804000480808048088808888808880000008040804040R0000000000000000000000

§0&

RRR

SERRRREEREE

8855 027474

~NsNNN~ ~ =~

ST
=§¥%é RECOVER; E5

68:

;BUMP (SAFELY) BY 2

;DONE?
iNO - SKIP
:YES - RETURN

1 LOCATION
;MOVE CODE

MOV
CLR
BR

-(ns).-(nn
uu)
BRGOBB

LENABL

AMA

GBLENGTH= . -MTPO33

;CLEAR TEST WORD "BGTEST"
{RUN MOVED CODE AGAIN

SEQ@ Oze8

CVMUABO MSV1i-J MEMORY DIAG.

BR ANCH GOBBLE TEST

MTPO33
8901 027572
027572
8
8903 027574
027576
8904
8905 027600
8906 027602
8907 gg?.“
.g 7606
027610
8
8910 027612
8911 027614

MACRO Y05.02

Mondsy 07-Oct-85 16:57

MTPO34: SUBTST

<<MTPO34

:#SUBTEST

MTPO34

Page

- 263

SOFT ERROR - BACKROUND PATTERN TEST»>>

188888688888 8888880808040848080088800800880804040848800888008000080800000000000000

010220
077102
000207
012401
020102
001402
104430
000240
077306
000207

SOFT ERROR - BACKROUND PATTERN TEST

18848088080848888888888080840888000004888080048440800088080000000000000000000000

1s:

2¢:

3%:

R2,(RO)+
MOV
R1,MTPO34
So8
RETURN

1V177640
1V177642
1V177644

PERRO2

1V177654

MOV
CHP
BEQ

(R4)+,R1
R1,.R2
3

NOP
R3,2¢
S08
RETURN

1V177646
1V177650
1V177652

1V177656
1V177660
iV177662

SEQ 0229

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y0S.02

Monday 07-Oct-85 16:57

Page 264

MTPOS4 SOFT ERROR - BACKROUND PATTERN TEST
WORST CASE NOISE PARITY TEST>>
<<MTPO3S
MTPO3S:SUBTST
8913 027616
|‘.“““...‘..‘.O...‘..‘...‘.“‘C..‘.‘.“.‘.“‘.O‘.‘...‘.O...‘..‘...‘..0.‘..“.
TEST
MTPO3S WORST CASE NOISE PARITY
;1 #SUBTEST
884088888408008488888888888008884008800008000004

:3{; 027616 012737 000003 002076
8916 027624

027
0276
3917 0276

8918
8919

!“3
931

027636
027640

;s
1
012737

027674

76
7

1;0
010037

002034

660

004737

050354

7672
7674

001002
104426

027676

104050

032763

002000

8932
89
89

027704
gg'mz
7714

89
89

7724
7726

8935 027722

027732
8938
027734
8939
027740
8940
7740

012737
104435
%gv 7

710

002150

027726

002304

050354

062700

004000

027744 020027 157776

ovel

(RO).(RO)

;WWP TEST LOCATION

TST
MOV

(RO)
RO,ADDRESS

CALL

PERBNK

027756

000207

MOV OFIRST,RO

@BIT10,CONFIG+2(R3)

24
BNE
READCSR

ERRGEN

CLRICSR(RO),(RO)
28: MOV

#BITO,CSR
MOV
LOADCSR
©3%,PARTHERE
MOV

TST

38:
4s:

;CLEAR WRONG PARITY IN MEMORY

(RO)

4%
BR
MOV _ RO,ADDRESS
ERROR +50
CALL PERBNK
END; OF FOR

ADD #4000,RO

CMP RO, OLAST

BLE Bai

gsngg 003727

8942 027752 005037 002076
8943

MOV

BIT

002666

000001

104050
004737

@BIT2!BITO.CSR

LOADCSR
@18 ,PARTHERE
MOV

14:

000405
010037 ©02034

MOV

041“3 : **b
S INTO CSR
;SET WRITE WRONG PARITY & PAR.

ERROR +50

104512

011010

:SET PARITY TRAPS TO RETURN TO “PARTHERE”

FOR RO := OFIRST TO OLAST BY #4000

002304

7700 104503
027702

MOV

012700 060000
og‘m 000005 002150

7646 011010

;.‘.“......“.‘...‘0‘» $8284230200

CLR

RETURN

NOPAR

E81::::3:33

;RESET PARITY TRAP ACTION

SEQ 0230

CVMJABO MSV11-J MEMORY DIAG

MTPO3S

MACRO Y05.02

WORST CASE NOISE PARITY TEST

8945 027760

Mondey 07-Oct-85 16:57

Page 265

SEQ 0231

CORRECTION CODE TEST>>
<<MTPO36
MTPO36: SUBTST
] 8840886804 888882888888088888888888288888888808888484888888088808000800800000000000

MTPO36

1 #SUBTEST

CORRECTION CODE TEST

1865888888880888088808080888888888080088888080800088888888880848000800000000000¢

BIT OF A DATA WORD
: THIS TEST CHECKS TO SEE THATLY EACH
FROM A ZERO TO A ONE AND

8946
8947
8948

3 CAN BE CORRECTED INDIVIDUAL

027760

77
770

VISA VERSA.
CACHOFF
CLRB PASFLG
CBREG
REPEAT

002264

i TURN OFF CACHE
:CLEAR PASFLG

;ENABLE CHECK/SYNDROME BIT REGISTER

LET PASFLG :B= PASFLG + @1

002264

LET R4

177777
002324
002264

MOV #-1.R4

LET BITNO := &0

;CLEAR INNER LOOP COUNTER

IFB PASFLG EQ @1

:SELECT DATA TO BE CORRECTED BY PASSNO

END

INC BITNO
LET R4 := R4 . &1

; INCREMENT BIT POINTER
:POINT TO NEXT SET OF Cfi% gTS

LET R2 :B= PTABLECR4)

:GET NEXT SET OF CHECK BITS

ASH #5,R2

sSHIFT TO LINE UP IN CSR
:ENABLE DIAG MODE
:GET CHECK BITS TO BE WRITTEN

LET CSR := R2
LOADCSR
LET (R1) := RO
TST (R1)

002314
030100

8977 030104

002246

LET ADDRESS := #60000
LET CHECK

MOVB PTABLE(R4),.R2

R2.CSR

sLOAD CSR WITH DATA
;WRITE DATA TO TEST ADDRESS
MOV RO,.(R1)
s CORRECY SBE

:WAS DATA CORRECTED???

IF (R1) NE RS

002034

IS A ZERO
;DATA=177776;BIT TO BE CORRECTED
MOV $177776.RS
B43:;5:3:3:

8IS #8IT2.R2

002150

B8R L250

L247:;533:3

L2S0:33::33

REPEAT

030164

CMPB PASFLG,#1
BNE L247

MOV #1.RS

LET RS := 0177776

002324

CLR BITNO

:DATA=0;BIT TO BE CORRECTED IS A ONE

1= 91

ELSE

177776

INCB PASFLG

;INDEX TO SINGLE BIT ERROR TABLE

:= @-1

LET RS

000001

B42:

s INCREMENT LOOP COUNTER '

:= R2

LET TSTDAT := RS

LET TSTDAT+2 := (R1)

CMP (R1).R5
BEQ L251

:MOV ERROR INFORMATION IN
MOV 860000, ADDRESS
MOV R2,CHECK

MOV RS,TSTDAT

D
CVMJABO MSV11-J MEMORY
| M”O!G CORRECTION CODE TESY
030104
8978 030110

8979

0301

011137
104052

8980

005011

8983 ¢

133721

006308

.898

MACRO Y05.02

002250

002264

ERROR +S2

CLR (R1)
IF8 PASFLG EQ o1

000001

ASL
ELSE

000402

SEC
ROL
END

00026
¢
8984
sy
eSR

0
8987

ga3727

1351

002324

3727
1305

8990 (

8991 0

002264

000002

CLR1CSR
CACHON
RETURN

104503

104423
7

030203

002
o3

1
046
070

007
032
020
052
040

037 PTABLE: .BYTE
025
057
045
075

Page 265-1

SEQ 0232

MOV (R12,TSTDAT.2

sNO ERROR

;CLEAR

L2S1:33s8s

1 SHIFT 'EU DATA DEPENDING ON PASFLG
;SHIFT BITNO TO THE LEFT

COM RO
UNTILB PASFLG EQ 02

996 030164
olole?
030172
0
0

UNTIL BITNO EQ #16.

000020

005100

Monday 07-Oct-85 16:57

CMPB PASFLG,®1
BNE L252

BR L253

L2S2:533333

:SET CARRY BIT AND......
lROTlTE LEFT

JUNTIL ALL BITS Kae oo’
are 8ITN0. 016.
TM
i
;COMPLEMENT DATA AND' REPEAT

'UNTIL 2 PASSES ARE COMPLETE!

02
CHPB PASFLG,
caz .., N B2

{CLEAR CSR

;sTURN CACHE

MSV11-P SINGLE BIT ERROR CHECK BIT TABLE

hpidgod

cvn.mo

l TEST
'wCTIfm
DIAG.

MACRO Y05.02

8996 030204

Monday 07-0Oct-85 16:57

MTPO37: SUBTST

<<MTPO37

1 ¢SUBTEST

MTPO37

Page 266

CHECK ECC DISABLE TEST>>

16000088680808060866000004000000000008008000080000000000000040000000000000000000

CHECK ECC DISABLE TEST

1886806800888685,86888488868808000000000088000080000800080884880000000000000000000

. THIS TEST CHECKS THAT ECC CAN BE DISABLED AND THAT
s NO CORRECTION TAKES PLACE WITH ECC DISABLED.

104424

005037

002044

002314

Frevid
000100 002314
- HE
005011

005711

001406

|GOWDM’GFMMNMM”

LET CHECK := #0

;CLEAR CHECK BIT FIELD

CB1CSR

;ENABLE SYNDROME/CHECK BIT REGISTER

CLR CHECK

LET CHECK := #100

:1SBE CHECK BITS

CB1CSR
LET (R1) := @0

;1WRITE CHECK BITS TO CB REGISTER
an ¢a)
;WRITE CHECK BITS TO MEMORY

IF (R1) NE #0

:1WAS CORRECTION MADE?77?

LET BAD := (R1)

011137

012737
104037

:1TURN OFF CACHE

LETGW:GOO

sYES IT WAS.....ERROR

LET ADDRESS := #60000 ;

002034

ERROR +37

fi‘m

1 TURN

TST (R1)

BEQ L256
MOV (R1).BAD
MOV 860000, ADDRESS

:
3

MOV #100,CHECK

—

ACHE

L2S6::53::3

CVMJABO MSV11-J MEMORY DIAG.

MTPOS7 CHECK
9019 030256

ECC DISABLE TEST

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 268

SEQ 0234

ADDRESS TO CSR ON DOUBLE BIT ERROR TEST»>>
MTPO41: SUBTST <<MTPO41
|‘..‘.‘...‘...‘..‘..‘...‘.O...‘..‘..“....“..‘..“...‘.....“‘..‘..‘..““.“..
BIT ERROR TEST
MTPO41 ADDRESS TO CSR ON DOUBLE
1 #SUBTEST
““.“.“..‘..‘.0‘.‘.“.‘.““.00..‘..‘0.‘.‘
"..“.‘.“...““...““‘.‘.“...‘

”zo

: THIS TEST CHECKS TO SEE IF THE CORRECT ADDRESS APPEARS

902

: IN CSR BITS 5-11 ON A DOUBLE ERROR.
i
;GET STARTING BANK NUMBER
LET R4 := BANK

9024 030256
030256

013704

002102

9025 030262 072427 000011

9027 030272
030272
9028 030276
030276

012700

177740

030

012701

060000

030306
9030 030312

105037
C05037

9029 030306

002264
002314

CLR CHECK

{ENABLE CHECK/SYNDROME BIT REGISTER

REPEAT

030320
9033 030320
9034 030324
030324
9035 0303
030330
9036 030334

105237

002264

062700

000040

062701

004000

030334

012737

9038 030344
030344

005011

9040 030350
9041 030352

005711
104426

9039 030346 104503

;INIT PASFLG

CB1CSR

9032 030320

9037 030342 104475

LET PASFLG :B8= @0

001340

{CLEAR OFF EXTRANTNUS BITS

;INIT CSR ADDRESS T0 O - 1K (BIT 5 = 1K ADD.)
MOV ¢-40,RO
LET Rl := OFIRST - #4000 ;GET LOWM ADDRESS IN BANK
MOV OFIRST,.R1

LET RO := #-40

162701 004000

9031 030316 104475

;SHIFT INTO POSTION TO MATCH ADDRESS IN CSR

BIC ¢tC7740.R4

9026 030266 042704 170037

MOV BANK,R4

ASH ©9.,R4

INCB PASFLG
LET RO := RO + 040
LET Rl := R1 + 24000

002314

LET CHECK := #1340

CB1CSR

LET (R1) := @0

CLRLCSR

TST (R1)
READCSR

SUB #4000,R1

CLR8 PASFLG
;CLEAR CHECK BIT FIELD TO BE LOADED
B44:;5:53:;
:INC LOOP COUNTER
+INC CSR ADDRESS TO BE EXPECTED
ADD #40,RO
ADD #4000,R1
;DOUBLE ERROR CHECK BITS

MOV #1340,CHECK
:WRITE DATA AND D.E. CHK BITS AT A=0
CLR (R1)
;CLEAR CSR
;READ ADDRESS TO GET DOUBLE ERROR
:READ CSR FOR CORRECT ADDRESS

;MRITE DOUBLE ERROR CHECK BITS

CVMJABO

§agge

EEE

MTPO41

MSV

-J

SS T0

Y 85‘6.

CSR

013705

042705

MACRO YOS.O?

DOUBLE BIT ERROR

LET RS := CSR

002150
170037

BIC #tC7740,R5
LET R2 := RO

010002
060402
000240

ADD R4,R2
NOP
IF R2 NE RS

020205
001405

010537
104455

LET (R1)

104475

104503

000207

;DEBUG AIDE
:D0 ADDRESSES AGREE?

MOV R2,BAD

002264

002570

:= @0

CMP R2,RS

8EQ L257

:NO ERROR

PERR31
ND

SEQ 0235

MOV CSR,RS
!
:GET CORRECT ADDRESS
MOV RO,R2
;ADD STARTING BANK TO DOUBLE BIT ADDRESS

LET GOOD := RS

05011

9056
9057

Page 268-1

LET BAD := R2

010237

123737
001336

Monday 07-0Oct-85 16:57

TEST

MOV RS,GOOD

L2ST:533333
CLR (R1)

;E NABLE CHECK/SYNDROME BIT REGISTER
CB1CSR
UNTILB PASFLG EQ PASCNT ;DO 16K AT A TIME
CMPB PASFLG,PASCNT
BNE B44

CLR1CSR
RETURN

E44:;;:;::::

CVMJABO MSV11 -J MEMORY DIAG

MACRO Y05.02

flo'\d.y 07-0ct-85 16:57

ADDRESS TO CSR ON DOUSLE BIT ERROR TEST

MTPO41

Page 270

SEQ 0236

EXTENDED ADDRESS TO CSR ON ERROR TEST»>>
<<MTPO42
MTPO42: SUBTST
1860088888884 808808008848000808088800088000000008008088040080800800000000000400000

030430

MTPO42

1 #SUBTEST

EXTENDED ADDRESS TO CSR ON ERROR TEST

8
~

§ fammm

] 2888488884 88888082888888008840888888880008088800080008488480088000000000000000000

THIS TESTS THE EXTENDED
Q -BUS ADDRESS IN THE
A
A SINGLE eaaoa. EN”LIIB BIT @ 14,
CSR BY CAUSING
FOR THE PROPER ADDRESS IN THE CSR

013704

002102

023727

002102

001004

012737

88
~
~

$§ § 8

3358 a8 g2 ages $ 8

:GET BANK NUMBER TO FIGURE OUT EXTENDED Aooucss

LET R& := BANK

000177
002570

000403

9073 0
9074
9075
9076
92077

;TURN OFF CACHE MEMORY

CACHOFF

104424

002570

THEN CHECKING

IF BANK EQ €177

CMP BANK, 0177

LET PASCNT := @01

BNE L261

;0O ONCE IN LAST BANK

MOV @1,PASCNT

ELSE

BR L262

LET PASCNT

L261:::5:3:

:= @2

MOV #2,PASCNT

012737

000002

042704
072427
052704
062737

177607

BIC 0+C170.R4

;CLEAR OFF LOWER BITS

000400

8IS #BiT14,R4
ADD 9400, ximts

iSET EXTENDED ADDRESS

105037

002264

LET PASFLG :B= @0

:SET _UP PAR TO POINT TO TW OF A BANK
:INIT LOOP COUNTER

013705

002102
177770
000011
000020

LET RS := BANK

:RS GETS THE BANK NUMBER

BIC #C7.RS

;CLEAR ALL BUT THE LOMER BITS

END

ASH 02,R4

172352

;SHIFT TO LINE UP unu csa

ASH 9. RS
8IS #BiT4.RS

002264

012737
104425

000104

INCB PASFLG
LET CSR := 0104
LOADCSR
LET (R1)

:= @0

002150

013737

002150

010537
104023

002044

;ENABLE CHECK/SYNDROME

BIT REGISTER

;INCR LOOP COUNTER

B4S:

;LOAD CSR WITH DATA

READCSR
8IC flITlS.gSR

;READ CSR FOR DATA

THEN

LET BAD

002052

;READ A=0;DATA BIT O SHOULD BE CORRECTED TO A 1

sCLElR POSSIBLE INHIBIT MODE IN DATA “C
;HAS SINGLE ERROR BITS SET IN csg'r'

BEQ Lzsi

:= C5R

MOV CSR,.BAD

LET GOOD := RS

END

ERROR +23

MOV 2104,CSR

;WRT ZEROS AT A=0 AND SINGLE ERR&'%‘YS)
;CLEAR C SR

IF CSR NE RS

{MRITE CHECK BITS TO CSR WITH DIAG MODE

CLRICSR

TST (R1)

020000

MOV BANK,RS

+SET UP SBE INDICATOR ; ‘MTA T0 BE EXPECTED

CBREG

002150

CLRB PASFLG

sROTATE INTO POSTION

REPEAT

105237

L262:35::3:3

;

MOV RS.GOOD

MACRO YOS .02 Monday 07-Oct-85 16:57
EXTENDED ADDRESS TO CSR ON ERROR TEST

CVMJABO MSV11-J MEMORY DIAG .

MTPO42

030610

012737
25

040000

002150

020000

002150

002150
002150

030644

010437

002044

0306

012737

177777

9105 0306

104023

002052

:= 240000

LET CSR

LOADCSR
READCSR
BIC #BIT13,CSR
IF CSR NE R4 THEN

030662

012701

137776
000740
001000

030700
030706

123737
001312

002264

LET R1

002570

iREAD EQB ADDRESS

:= #137776

MOV $40000,CSR

CHP CSR,R4
BEQ L264
MOV CSR.BAD

MOV R4.GOOD
MOV

ERROR +23

:= @0

L263:::1333

'CLEAR INMIBIT MODE POINTER IN

SET HEADER

002612

SEQ 0237

ADDRESS
"READ FOR CORRECT EXTENDED Q-BUSDATA

LET GOOD := R4

LET (R1)

CO05011

;WRITE EQB BIT TO CSR

LET BAD := CSR

END

030660

Page 270-1

sCLEAR LUT

;SET UP NEW ADDRESS

@-1,HEADER

L264:;::::::

CLR (R1)

MOV @137776.R1
ADD #740,.R5
;ADD TO GET NEW ADDRESS
;SET BIT 9 SINCE WE ARE ASSERTING Al ON PASS2
BIS #BIT9.R4
;ENABLE CHECK/SYNDROME BIT REGISTER
CBREG
UNTILB PASFLG EQ PASCNT ;LOOP 2 TIMES
CMPB PASFLG,PASCNT
BNE BAS
E4S:;3:33:3
;CLEAR CSR
CLR1CSR
;TURN ON CACHE
CACHON
RETURN

CVMJABO MSV1l-J MEMORY DIAG

MTPO42

EXTENDED ADDRESS

MACRO Y05.02

TO CSR ON ERROR TEST

Monday 07-Oct-85 16:57

Page 271

SEQ 0238

MTPO43: SUBTST <<MTPO43 WRITE BYTE CLEARS SINGLE BIT ERROR TEST>>

9117 030716

188888888888 8888800048888008800088800488800800800000088080880880080000000000800000

WRITE BYTE CLEARS SINGLE BIT ERROR TEST

MTPO43

1 #SUBTEST

1868888845408 088888888808048800 8088804000000 000000R 000400048800 00000000000000004

THIS TEST CHECKS TO SEE IF A SINGLE BIT ERROR WILL BE CORRECTED DURING

THE READ PORTION OF A WRITE BYTE AND THAT THE CORRECT CHECK BITS WILL

; BE GENERATED ON A WRITE.

104424
104513

105037

CACHOFF

002264

010102

005202

LET R4

012704

105237

002264

002150

104425

010411

+ @1

112712
104426
042737

000377
177757

002150

023727
001407

002150

000020

012737

000020

002044

013737
104060

002150

002052

;CLEAR _LOOP_COUNTER

:R2 POINTS TO HIGH BYTE

INCB PASFLG
LET CSR := 9604

; INCREMENT LOOP COUNTER

LOADCSR
LET (R1)

sWRITE C SR

:= R4

:B8= #377

READCSR

BIC #+C20,CSR
IF CSR NE #20

LET BAD

MOV 01.R4
B46:;:::33

;WRITE CHECK BITS CORRESPONDING TO DATA OF O
MOV 9604 ,CSR

;WRITE DATA OF 1 CREATING A SINGLE BIT ERROR
;WRITE CSR_TO NORMAL MODE
;WRITE BYTE OF WORD
;READ _CSR
:SEE_IF SBE INDICATOR IS SET
;IS SBE SET?222?

LET GOOD := 220

END

MOV R1,R2
INC R2

;INITIAL DATA = 1

:= 01

CLRICSR
LET (R2)

104503

005711
104426

:ENABLE CHECK/SYNDROME BIT REGISTER

REPEAT

012737

104513

: TURN OFF CACHE

CBREG
CLRB PASFLG
LET R2 := R1

MOV R4,(R1)

MOVB #377,.(R2)

CMP CSR, 920
BEQ L266
MOV &20,G00D

:= CSR

MOV CSR,BAD

ERROR +60

CBREG

TST (R1)
READCSR

L266:;:::::

;WRITE CSR T0 DIAG MODE
;READ SAO FOR CORRECT CHECK BITS
:REAC CSR

MACRO Y05.02

Hond.y 07-0ct-85 16:57

WRITE BYTE CLEARS SME BIT ERROR TEST
174037

002150

042737
9145 031
0310
9146
031034 023727 002150 000300

031042 001412

8IC OfCS'MO

IF CSR NE 500

9150 031066

9151 031070

921
91

031070

104061

031070
031072
031072

005302

012704

000400

031076
031104

123727
CO1314

002264

9154 031076

LET GOOD:= @300

;

LET BAD := CSR

ERROR +61

031106
9155 031106
9156 031110

104423
000207

DEC R2
LET R4 := £#400

000002

72??
;WERE CORRECT CHECK BITS GENERATED??
CMP CSR, ¢
3

END

SEQ 0239

:MASK OUT CHECK BIT FIELD

SET HEADER

9147 031044

031044 012737 177777 002612
9148 03183;
012737 000300 002044
031
9149 031060
031060 013737 002150 002052

Page 271-1

BEQ L267

MOV #-1,.HEADER
MOV #300,G00D
MOV CSR,BAD

*uan

;POINT TO HIGH BYTE AND REPE
;BIT O OF HIGH BYTE

UNTILB PASFLG EQ @2

;00 HIGH AND LOW BYTE

CACHON
RETURN

sTURN ON CACHE
:

MOV #400.R4

CMPB PASFLG,#2
BNE B46
E46:;::::::

S—

CVMJABO MSV11-J MEMORY DIAG

MTPO43

CVMJABO MSV11-J MEMORY DIAG.

MACRO_YOS.
05.02

Monday 07-Oct-85 16:57

MWRITE BYTE CLEARS SINGLE BIT ERROR TEST
MTPO44: SUBTST
9158 031112

MTPOAS

Page 272

SEQ 0240

SHIFTING CHECK BITS THROUGH THE CSR TEST»>>

<<MTPO44

186800008048880004888880404840040048080800488800000000008000080400000000000000000

MTPO44

:1#SUBTEST

SHIFTING CHECK BITS THROUGH THE CSR TEST

19888888808 0800888000880 0880000080080080080000800000000080008000000000000000000

; THIS TE.. CHECKS THE ABILITY TO READ AND WRITE CHECKBITS INTO MEMORY THE

9160

; BY SHIFTING A ONE BIT THROUGH A FIELD OF ZEROS. THE CSR IS READ FOR

9161

; CORRECT PATTERNS. THE TEST IS THEN REPEATED ON A ZERO BIT THROUGH A

;s FIELD OF ALL ONES.

:{6

9165 031112
031112
9166 031112
9167 031114
031114
9168 0311;8
0311
9169 031124
9170 031126
031126
9171 031132

031132
9172 031132
031132
9173
9174
9175 031136
031136

9176 031142

031142
9177 031142
031142
9178 031146
031146
9179 0311
0311
031154
9
9181 031156
031156
031160
91
031162
91
184 031164
9185 031166
031170
9187 031172

031172
9188 031176
9189 031200
9190 031202
031202

104424

105037 002264
012705 174037
104475
C€12702 000046
105237

002264

005037

002266

005237

002266

010204

010237
104425

002150

005011
005105
010
040416
040504
052604

010437
104425
104426

002150

013703

002150

020304

ougu 001412

9193 031216

031216

9194 031222

010137

CACHOFF
LET PASFLG :8= #0

LET RS := 174037

CB1CSR
LET R2 := @946
REPEAT

LET PASFLG :B= PASFLG + #1

LET PASSNO := @0
REPEAT

LET PASSNO := PASSNO +» #1
LET R4 := R2

LET CSR := R2

LOADCSR
LET (R1) := @0
COM RS
MOV RS,-(SP)
BIC R4,(SP)

9191 031206 042703 020000
9192 031212
031212

sILC;;REV B

REPEAT

002034

BIC RS.R4
BIS (SP)+.R4
LET CSR := R4

LOADCSR
READCSR
LET R3 := CSR

BIC #BIT13,R3

IF R3 NE R4 THEN

sTURN OFF CACHE
;INIT PASFLG

B47:3531333

CLRB PASFLG
;CHECK BIT MASK FOR CSR
MOV #174037.RS
;ENABLE CHECK/SYNDROME BIT REGISTER
;SET UP INITIAL CSR DATA
046 ,R2
BSO0::33333
:INC LOOP COUNTER
INCB PASFLG
;CHK BITS = 1
;DISABLE ECC;DIAG CHK SET
sINIT PASSNOCINNER LOOP COUNTER)
CLR PASSNO

BS1:::35333
;INC LOOP COUNTER
INC PASSNO
;COPY R2 TO R4
MOV R2.R4
;:GET CSR DATA 7O BE WRITTEN
MOV R2,CSR
sWRITE SBE CHECK BITS TO CSR
;WRITE DATA AND CHECK BITS AT A=0
CLR (R1)
;sCOMPLEMENT MASK
:SAVE R5 ON STACK
;:CREATE AN XOR FUNCTION
3
:
:
MOV R4,CSR
sLOAD CSR WITH COMPLEMENT CHECK BITS
;sREAD CSR FOR COMPLEMENT CHECK BITS
;COPY CSR DATA TO R3
MOV CSR,R3

sCLEAR ANY POSSIBLE INHIBIT nuoé POINTER
:READ CSR FOR PROPER CHECK BITS
CMP R3,R4

LET ADDRESS := R1

LET GOOD := R4

BEQ L271

MOV R1,ADDRESS

J MEMORY DIAG.

CVMJABO MSV1
SHIF
MTPO44

MACRO Y05.02

Page 272-1

Monday 07-Oct-85 16:57

§3 38
2328282822222232208
3
RRERRRERERE

iNG CHECK BITS THROUGH THE CSR TEST

012737
104463

177777

005105
005711
000240
104426
040537

002034

012737
104464

177777

&800

010137

33943333 39400 3ottt

END

002264

000001

{MASK OUT CHECK BIT FIEL
{GET CHECK BITS THAT WERE WRITTEN
MOV R2.R4
sMASK OUT CHECK BIT FIELD

{ARE CHECK BITS THE SAME?

CMP R4,CSR

:= R1

PERR4O

BIC RS,.R2
IFB PASFLG EQ #1

ASL R2
ELSE

006302
000413

005105
o1

BEQ L272

MOV R4,GOOD
MOV CSR,BAD
MOV R1,ADDRESS
MOV @-1,HEADER

1
:
;
.

;ERROR CALL

::ILC; ;REVB

L272:33333 %

;SHIFT CHECK BITS AND CREATE NEW DATA FOR CSR
;SELECT FUNCTION

CMPB PASFLG,®1
BNE L273
:00 A FIELD OF ZEROS--->ONES
;SHIFT CHECK BITS

;D0 A FIELD OF ONES --->ZEROS

BR L274
L273:::3333

iTAKE OUT CHECK BIT FIELD

H
H

ASL az

006
010546
16
040
052602
005105

MOV RS, -(SP)
uc aa csp)

axs (sé). R2

COM
R
END
LET R2

062702

123727
001262

L271:333333

IKEAD CSR FOR CORRECT CHECK BITS

SET HEADER

002612

13 ILC; ;REVB

.aeao CHECK BITS AT A=0 INTO CSR

LET BAD := CSR
LET ADDRESS

MOV R3.BAD
MOV @-1,HEADER

!
:

s COMPLEMENT MASK

LET GOOD := R4
002052

MOV R4,GOOD

:ERROR CALL

PERR37
END

BIC RS5,.R4
IF R4 NE CSR

040502

123727
001002

SET HEADER

TST (R1)
NOP
READCSR
BIC RS,CSR
LET R4 := R2

010;3:

002150

002612

002150

013737

LET BAD := R3

COM RS

002044

00000

~ownm

002052

010437

O‘§
$8S
el

010337

002150

o
12 03
0
0

22
o
[ogn

002044

020437
001413

9210 831306

oon
[T

010437

0000000000000
00 OO
P
T
i
]
u«uauwuumuum
o e oo o 1 Pt e e [ ot o B (ot e e et et e s
e ([ e e b et

VOPD

9195 031226

SEQ 0241

002266

000006

:= R2 + 06

UNTILB PASSNO EQ 06

ISHIFT CHECK BITS

iPUT BACK CHMECK BIT FIELD
H
H

:CWLEUE'ENT DATA PATTERN

(SR uILL EnABLE DIAG MODE
JADD 6 SO THAT WRITE ON'Ldk
:D0 ALL CHECK BITS

6
CMPB_PASSNO,
BNE B51

MACRO Y05.02 Monday 07-Oct-85 16:57
CVMJABO "SVI%- J _MEMORY DIAG.
SHIFTI NG CHECK BITS THROUGH THE CSR TEST

MTPO44

031376
9232 031376
031376
9233 031402
402

012702

8
104503
005011
062701

020137
001231

9238 031430
9239 031432

104423

000207

popiiens

LET R2 := #3706

002264

000100
002562

000002

UNTILB PASFLG EQ @2
CLR1CSR
CLR (R1)

ADD #100.R1

UNTIL R1 EQ ENDADD

Page 272-2

SEQ 0242
ESYl:3s3333

;REPEAT WITH FIELD OF

MOV #3706.R2
CHMPB_PASFLG,®#2
BNE 850

ESO:s33333
3

;sALL 256 TO ADDRESS
:

:ILC: ;REVE
;ILC; sREVB

CMP R1,END

BNE B47

CACHON
RETURN

s TURN ON CACHE
i

E&47:;:33:3:3:

MEMORY DIAG.

MACRO Y0S.02

Monday

CVMUABO MSV11-J
inG CHECK BITS THROUGH THE CSR TEST
YRt
0

07-Oct-85 16:57

<<MTPOAS

MTPO4S: SUBTST

9241 031434

Page

273

SYNDROMES TO CSR ON DOUBLE BIT ERROR TEST>>

SEQ 0243

F} .‘.‘.““.‘“..‘.‘.“‘..““.‘."‘.‘.‘..‘.“‘..‘.‘.‘...‘...‘...‘...“‘.“““..

MTPO4S SYNDROMES TO CSR ON DOUBLE BIT ERROR TEST
#SUBTEST
1‘..‘...“.‘.‘
...“.......‘..‘.....‘.‘...‘..‘...“.‘.“...‘.‘.‘.‘.‘.‘.‘.‘.‘.‘.“‘

'a‘

SET THE
ISINTO
ERROR INDICATOR
DOUBLE BIT
THECORRECT
IF THE
SEE
TO
TEST CHECKS
IMISA DOUBLE
'! ON
LATCHED
ARE
SYNDROMES
AND
BIT ERROR

9543

9245

7 031434 104424
031436 104513
031440

031440 005037
9250 031444
031444 012737
9251 031452
031452 012737

9252 031460
3

1460
031460

COS237

9255 031466
031466

005011

031464 104425

104303
031470 005711
32367 031472
031474 108426
9 031476

CACHOFF
CBREG
B

002044

003144

002150

002266

031506
s261 g31514
031514

012737

177777

002612

013737
104063

002150

002052

9263 031
9264 031524 104514
9265 031526 104426
031

LET CSR := #3144

;0BE CHECK BITS FOR CSR

REPEAT

CLR1CSR
TST CR1)
READCSR

002150

iCLEAR LOOP COUNTER
:GOOD DATA

LET (R1) := 00

100000

;TURN OFF CACHE
JENABLE CHECK/SYNDROME BIT REGISTER

LET GOOD := 93744

INC PASSNO
LOADCSR

032737
001007

3262 031322

THIS TEST IS THEN REPEATED WITH MULTIPLE ERROR CHECK/SYNDROME BITS

LET PASSNO := 20

002266
003744

031476
031504

9260 031

CSR.

;

END
SYNREG
READCSR

BS2:533333

{WRITE ZEROS AND DBL ERROR

CLR (R1)

;CLEAR CSR OUT
IREAD A=O0 TO GET DOUBLE BIT ERROR
iWAS UNCORRECABLE ERROR BIT SET777
‘

LET BAD := CSR
ERROR +63

MOV 03144.CSR

‘
DBE CHECK BITS TO CSR BITS A=0
IWRITE
CHK

IF OBIT1S OFF.IN CSR ;

SET HEADER

CLR PASSNO
MOV #3744,GO0D

;BIT NOT SET

BIT #BIT1S.CSR
BNE L300
MOV @-1,HEADER
MOV CSR,BAD

{ENABLE SYNDROME BIT REGISTER
iREAD CSR FOR CORRECT SYNDROME BITS
L300:::::::

CVMJABO MSV11-J MEMORY DIAG.

MTPO4AS

MACRO Y05.02

Monday 07-Oct-85 16:57

SYNDROMES TO CSR ON DOUBLE BIT ERROR TEST

0;1530
9
9267 031532
9268 031

000;‘0
042737

174033

002150

023737
031546 001407
9269 031 gg
013737
031
9270 0;1
012737
031
104042
1
927
9272 031
031

002150

002044

031570 012737
9275 0 lg?‘
031576 012737
9276 031604
031604 (23727
031612 001322

003604
003004
002266

73 031
74 031570

031614

9277 031614
9278 031616

9279 031620

002150 002052
177777 002612

104503
104423

000207

NOP
BIC #tC3744,CSR
IF CSR NE GOOD THEN
LET BAD := CSR

END

005011

002044
002150
000002

Page 273-1

SEQ 0244

;:DEBUG AIDE
;MASK SYNDROMES OUT
;CHECK IF DOUBLE ERROR BIT IS SET
CMP CSR,GOOD
BEQ L301
:BAD DATA

SET HEADER

ERROR +42

3
i

MOV CSR,BAD
MOV @-1,HEADER
L301:333333

CLR (R1)
LET GOOD := #3604

;:CLEAR LUT
;REPEAT WITH MULTIPLE ERROR SYNDROMES

LET CSR := #3004

;sMULTIPLE ERROR CHECK BITS

UNTIL PASSNO EQ @2

CLR1CSR
CACHON

:
:

RETURN

MOV #3604 ,G00D
MOV #3004,CSR
02
CMP PASSNO,
BNE 852

ES2:333333

CVMJUABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Monday 07-Oct-85 16:57

Pege 274

NTPO4S SYNDROMES TO CSR ON DOUBLE BIT ERROR TEST
CHECK SINGLE BIT ERRORS WITH ECC DISABLED>>
MTPO46: SUBTST <<MTPOA6
9281 031622
) .‘.“..‘.“.‘....‘..“.....‘....“‘.“..“...“...‘.“.“.......‘...‘.‘....‘...

CHECK SINGLE BIT ERRORS WITH ECC DISABLED
eSUBTEST
1] “.‘..‘..“‘.
..‘."..“‘.‘.‘.‘.“....‘.‘.‘.‘.‘.‘....‘.‘....‘.“.‘..‘.““..‘.“

’2

TEST CHECKS TO SEE THAT FOR EACH BIT OF A DATA WORD THAT A SBE
' THIS
IS TREATED LIKE A UNCORRECTABLE ERROR WITH ECC DISABLED AND TRAPS

i ARE DETECTED.

1622

005037

104424

0
9290 ¢

;
:

:
:

002266

105037

002264

104513

CLR

002266

105237

002264

9297 ¢
;

012704

177777

012737

000001

005037

002324

Ja37121
001003

002264

012705

000001

9296

9298 ¢

9299 (
4
9300 031676
031676
9301 ¢

D317

9302 ¢
031704
9303 081710
D31710
9304 031710
’
9305 081710
031710
031714
0817
DS1720
9308 0317

9306
9307

9309

(

3310 ¢

9311 0817
081786

3313 o8iras
9313

0817

000402

REPEAT

177776

37
37

002072
002324

005204

JCLEAR DATA
{CLEAR PASFLG

LET NOPAR := 01
LET BITNO := 00

IF8 PASFLG EQ 01

B8S3:5:3:131

INC PASSNO

IENABLE CHECK/SYNDROME BIT REGISTER
’
—
;INCREMENT LOOP C

INCB PASFLG

TABLE
;INDEX TO SINGLE BIT ERROR
MOV @-1,R4
JENABLE PARITY ACTION

MOV #1.NOPAR

;CLEAR INNER LOOP COUNTER

CLR BITNO

{SELECT DATA TO BE CORRECTED BY PASSNO

ELSE

CHPB PASFLG,#1
BNE L303
:DATA=0;BIT TO BE CORRECTED IS A ONE
MOV #1.RS
3

LET RS := 9177776
END
REPEAT
LET PARCNT := €0

:DATA=177776:8IT TO B CORRECTED
IS A ZERO
MOV #177776.RS
"
L304:35:3:3
.
.
s388333
;CLEAR PARITY COUNTER

LET RS := o1

L303:;;

BR L304

LET R2 :8= PTABLE(RA)

CLR PARCNT
s INCREMENT BIT POINTER
iPOINT TO NEXT SET OF CHECK BITS
INC R4
GET NEXT SET OF CHECK BITS *

{ENABLE

INC BITNO
LET R& := R& + 01

fi;fizooo&s
000006

ASH #5,R2

8IS #81T2!8IT1.R2

LINE UP IN CSR
sSHIFT TODIAG
MODE

010237

LOADCSR

;LOAD CSR MITH DATA

D31744 010011

9314 031746

CLR RO
CLRB PASFLG

LET R4 := @-1

000001

i TURN OFF CACHE
.

LET PASFLG :B= PASFLG + #1

002076

JCLEAR OUTER LOOP COUNTER

LET PASSNO := PASSNO + o1

CBREG
REPEAT

012705

'PASSNO

CACHOFF

9295 ¢

002150

LET CSR := R2

LET CR1) := RO
IF PASSNO EQ #1

{GET CHECK BITS TO BE WRITTEN
MOV
R2,

{WRITE DATA TO TEST ADDRESS
MOV RO, (R1)
:MRITE CSR

SEQ 0245

acns DTl 1003 1657 o 2101
EIRAE0 TRLT
ig

e P
BNE L

000001

3’121

1“471

ECC1D0IS
ELSE

000401

104507

SEQ 0246

END

TST (R1)

032106

100000

002150

CALL CHKT
READCSR
IF #BIT1S OFF.IN CSR

LET BAD := CSR

002150

SET HEADER

002612

ERROR +45

Yo Y-Ys

CLR (R1)
IFB PASFLG EQ @1
ASL
ELSE

SEC
ROL
END

Lsos, ., IR L306

L306:553:33

SECOND PASS 1ECC DISABLE.PBL ENABLED
it

.a‘m“crmse

AT
.nenoORRE %fl
T

UNTIL BITNO EQ @16.

CoM RO
UNTILB PASFLG EQ @2

BIT #8IT13.CSR

MOV CSR.BAD
MOV #-1,MEADER

’
y

1CLEAR LUT

L307:5535333

PCHIFT NeW DATA DEPENDING ON PASFLG

CP8 PASFLG. 01
8NE L310

sSHIFT BITNO TO THE LEFT

5
RS

(ECC DISABLE,.NO PBL

177777

ENA1SBE

JFIRST PASS

B8R L311

L310:33353353

sSET CARRY BIT AND......
iROTATE LEFT
L311:

sUNTIL ALL BITS ARE D“

CHP BITNO,#16.
BNE BSS

Eh e

REPEAT
;COMPLEMENT DATA AND
{UNTIL 2 PASSES ARE COMPLETE!
cHP8.;‘me.oe
ES4:33:3:

UNTIL PASSNO EQ #2

cP ugsm
.! 8s

cuusu
RETURN

000001

CHKTRP: IF PASSNO EQ 01
IF PARCNT EQ 01

ES3::353:3

i TURN CACHE
f

sPASS 1 CHECK FFOR NO TRAP
o
BNE L315

gy ©7-0ct-85 16157 Paue 214-2
Bkons Lol
SIRHA SRLM ST
032116
032124
9346 032126

032126

9347 032134
9348 0321“

9349 051“

032140
9350 032140
032140

9351 Og
gg
032146

9%330321‘0

023727

002072

000001

012737
104057

177777

002612

001004

SET HEADER
ERROR +57

023727
001404

002072

000001

012737
104064

177777

002612

IF PARCNT NE @1

SET HEADER
ND

ERROR +64

9354 032160

032160
9355 032160

000207

CMP PARCNT, 01
BNE L316
MOV

@-1,HEADER

L316:::35333

ELSE

000410

SEQ 0247

RETURN

BR L317
L31S:s33333

CMP PARCNT, 01
BEQ L320
MOV
L320::33333
L317:5:53333

@-1,HEADER

CVMJABO MSV11-J MEMORY DIAG.

MTPO4%S

MACRO Y05.02

Mondey 07-Oct-85 16:57

CHELC” SINGLE BIT ERRCRS WITH ECC DIS‘ED

<<MTPO47

Pege 275

ScQ 0248

NO CSR UPDATE ON SBE WITH EXSISTING DBE>>

9357 032162

MTPO47: SUBTST

p—

MTPO47 NO CSR UPDATE ON SBE WITH EXSISTING DBE
1 sSUBTEST
18680888 60880008800480488000880880088880800200880080088488800800880000000000000000

188880888008 88400088800480048088888000400000000008000808000800800000080000000000

9360

NOT CHANGE
SEE THAT THE CSR CONTENTS UILLALREADY
+ THIS TEST CHECKS TOERROR
WHEN A DOUBLE BIT ERROR

',323 05¢162 104424

LET R4 := BANK

éWF

CACHE
OFF NUMBER
TURNBANK
1:GET

ASH 09.

1 SHIFT INTO PLACE

93:3

:“1

9364 08“0
0 19‘
9365 032170

013704
972427

104513

08%“

012737

002102
000011

170037
99367 032174 O0A4c/04
052704 100000
9

9369 032206

9370 032214
9371 032216
0
6
9372 0

o
9373 %
9374 O
o
9375 ©
9376 032234
9377 032236

104425

003144

00501%
10450
005711
104426
042737

020000

023704

002150

013737

002150

010437

002044

012737

177777

001411

104063

052704
005712
104426

EXISTS.

002150

002052

002612

aSEY UP GOOD DATA

LOADCSR
LET (R1) := @0

:
;WRITE DGE CHECK BITS

LET CSR := @104

sWRITE SBE CHECK BITS

LOADCSR
LET (R2) := @0

P
;WRITE SBE CHECK BITS AT ADDRESS + 4K
CLR (R2)
;CLEAR CSR
:READ DBE LOCATION
;READ FOR CSR DBE INDICATOR
:CLEAR TWHIBIT MODE POINTER

LET CSR := #3144

R1CSR
ST (R1)
READCSR
ggccnxus*

;ENABLE CHECK/SYNDROME BIT REGISTER

IC’QCK BITS FOR DNUBLE BITERROR

MOV R4 ,GOOD

SET HEADER

8IS #20,R

ST (uzi

READCSR

CLR (R1)
MOV #104,.CSR

MOV CSR.BAD

LET GOOD := R4

ERROR +63

MOV #3144,CSR

CMP CSR.R4
BEQ L321

LET BAD := CSR

END

000020

sMASK OUT MED BITS

MOV BANK R4

0'C‘7740 R4
8IC
BIS #BIT1S,.R4

CBREG

005011

0127357 000104
104425

WITH A SINGLE BIT

MOV
H

L321:

'
'A
;SET BIT IN GOOD DAT
READ SBE
:READ CSR FOR NO CHANGE

@-1,MEADER

MSV11-J MEMORY DIAG.

MACRO YOS5 02

Monday 07-Oct-85 16:57

W
NO égfl UPDATE ON SBE WITH EXSIST ING DBE
Svm
9388 032306

042737

020000

032314

023704

002150

9389 032314

0
9390 O

001411

013737

002150

010437

002044

oi
pes S§

SH2EE

177777

104503

0
9391 0323
0

9392 0

0
9
9398 0
9399 0323

005011
00501
10442
000207

002150

002612

BIC @BIT13,CSR

IF CSR NE R4
LET BAD

:= CSR

LET GOOD

:= R4

Page 275-1

SEQ 0249

;CLEAR INHIBIT MODE POINTER

’

CLRICSR
CLR (R1)

CLR (R2)

CACHON
RETURN

8EQ L322

MOV CSR,BAD
MOV R4,GOOD

SET HEADER

ERROR +51
END

CHP CSR,R4

MOV
:

:CLEM 1 CSR

:TWN ON CACHE

L322:533333

@-1,HEADER

CVM ABO "SV* i'-és'tnoav DIAG.

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 276

SEQ 0250

MIS

.SBTTL

9401

m 032356

MISC SUBROUTINES

REGCOPY:SUBTST

<<SUBR

COPY RO TO R4,R1 TO R3, & R2 TO RS>»»

s ¢SUBTEST

SUBR

COPY RO TO R4,R1 TO R3, € R2 TO RS

1880888884888 8808888888888000808088008000008080008088088080080000000000000000000

1688884808 8888088888084808080808808088800800000000808808880080080000800000000000

MOV

9404 032356
9405 032360
9406 032362

MOV
MOV

RETURN

9407 032364
9408
9409 032366

RO.R4

R1,R3
R2.R5

FLIPWARN:SUBTST <<FLIP WARNING CONSTANTS IN WORST CASE NOISE TESTS»>>

(6888804888808 80800880080840008008048888400880808080088008488808880080000000000000

1 #SUBTEST

FLIP WARNING CONSTANTS IN WORST CASE NOISE TESTS

3‘.‘....;fi;;‘...;a““‘...‘.‘.‘.‘.‘.....‘.“....“‘...‘...“.0....‘...0‘.....‘..

002616

177774

002616
002616
002616
002616

14:

000401
002614

010037
012600
000207

[

000401
000401
024650
024664
024710
024724

as:

INC
BIC
cMP
BEG
CHP
BEQ
CHP
BEQ
CLR
MOV
8R

CLEAR

FLIPLOC
0+C3,FLIPLOC
@1.FLIPLOC
18
#2,FLIP.OC
24
03, FLIPLOC
3%
RO
ONES R4
as
RO.R4

8R
MOV
MOV
B8R

as
0401 ,RO
ONES .R4
as

MOV
MOV
MOV
MOV

RO, MARN2
RO, WARN3
RO . WARN4
RO . WARNS

MOV RO, -(SP)

CLR
CLR

RO
R4

g
RETURN

+,RO
MOVv (SP)e.R

CVMJABO MSV11-J MEMORY D IAG.

.
MACRO Y05.02

Monday 07-Oct-85 1€:57

FLIP WARNING CONSTANTS IN WORST CASE NOISE TESTS
9436 032516

9437

9438 032516

9439 0
9440 oszsg
9441 032530
mg °’,§§.’2
9443 0
9444 032550

9445 032556
9446 032560

Page 277

SEQ 0251

BACKGND:SUBTST

<<SUBR

WRITE BACKGROUND>>

1 #SUBTEST

SUBR

WRITE BACKGROUND

RRRRSS
RERRRR
0RO
188588888888 80888888880808880008080000000000000R0RRRRRRRR

] 2888888888882 80880820 8848000044888 8080008000802408 088840

104415

012700
012701
012737
012737
004737
012737
104416
000207

060000
040000
000207 024532
024526 002262
024334
000240 024532

;WRITES DATA FROM R2

SAVREG

MOV
MOV
MOV
MOV
CALL
MOV

RESREG
RETURN

oFIRST,RO
@SIZE ,R1
9207,MTP000+4
OMTPOO00 , SUPDOADD
SUPDO3
©240,MTP000+4

LRR0R00000000000

;WARNING PUTTING "RETURN” AFTER WRITE
;RESTORE ‘NOP’ AFTER WRITE

CVMJABO MSV11-J MEMORY DIAG.
BACKGROUND
WRIT
SUBR

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 278

SEQ 0252

<<SUBR GET CSR INFORMATION FROM CONFIGURATION TABLE>>
GETCSR: SUBTST
1848488088808 80 808 04R0A04008008480000400000000040000R804040000008000000000004

9449 032562

;#*SUBTEST

GET CSR INFORMATION FROM CONFIGURATION TABLE

(8884888444 AESE RS0 RRRAERASRRRA0AREARAARASAAARRARESEREAREEAER0000000000040

: INPUTS

013702

016203

000

042703
010337
000207

002104
002664
177741
002152

: OUTPUT : CSRNO = CSR NUMBER
BANKINDEX
MoV
MOV
SWAB

Sg‘ IG(R2
R3
#tC36,R3
R3.C SRNO

S?fis

sGET INDEX INTO CONFIG TABLE

;MOV IT INTO R3
:

:CLEM OFF SOME BITS
;SAVE CSR NUMBER

CVMJUABO MSV11-J MEMORY DIAG.

SUaRnBO

MACRO Y05.02

Monday

HOYLEsR TNFORMATION FROM CONFIGURATION TABLE

9463 032610
9464 032610

032610
032614

<<SUBR

1 #SUBTEST

SUBR

280

SEQ 0253

PRINT CONFIGURATION MAP>>

PRINT CONFIGURATION MAP

|....“‘..‘...“.‘O‘.‘..“.““.“.‘...‘.‘.‘..‘.‘.‘..“.‘.“‘..“....‘...“““.

013746
013746

033222
033170
000340
147776
000200
000100

9472 032662
032662

104401

104401
104401

PUSH

000060
000062

010046
010637
012737
012737
017700
042737
052777

9474 032672
032672

PCONFIG:SUBTST

Page

|..‘...“.““‘.‘.‘.“..‘.‘.“.‘.‘..‘.“‘.......".“““.“‘...“‘..‘.‘.“...‘.

032620
9465 032622
9466 oszsc
9467 032634
9468 032642
9469 032646
:;g 032654
9473 032666
032666

07-Oct-85 16:57

TKVEC,TKVEC+2,RO

MOV
MOV
MOV
MOV
BIC
BIS

SP,PCONFS
oPCONF2, TKVEC
0340, TKVEC+2
8$TKB,RO
0BIT7.PSW
08IT6.88TKS

065173

TYPE
TYPEIT

MSGOO1
,MSGOO1

065255

TYPE
TYPEIT

MSGOO2
,MSGOO2

065332

TYPE
r;nen

MSGOO3
éggsoos

000060
000062
177776
147760

.DSABL
.DSABL

:SAVE LAST GOOD SP

CRF

BGE

9478 032706

IF oSW4 SET.IN @SWR THEN JUMPTO PCONF1

:IF FAT PAPER ON TERMINAL GOTO 1$

9477

9479 032722

033130

012700

000074

9480 osav;g 010004
9481 0327

032730
032732

9482 032734
032734

9483 032740

000020

147722

005001
005003
104401

065437

004737

033224

104401

002660

9484 032744 022737 000060 002556
9485 032752 002106

9486 032754
032754

9487 032760

032760

9488 032764
032764
9489 032770
032770

9490 032774

032774

104401
104401
104401
104401

NOOJ:

MOV

960. ,RO

RO,R4

CLEAR

R1.R3

TYPE
r;ge‘gz

MSGOO4
éarm

CALL

960, LASTBANK
PCONF2

cMP
BGE

TYPE
TYPEIT

.DSABL

TYPE

TCONFIG

CRF

MSGO17

,MSGO17

TYPEIT

065640

TYPE
TYPEIT

MSG11A
,MSG11A

002660

TYPE
TYPEIT

$CRLF
,$CRLF

.DSABL

.DSABL
.DSABL

TYPE

TYPEIT

BIT OSW4,@SWR
BEQ L323
JHP PCONF1
L323:::5:33
CLR
CLR

R1
R3

;G0 TYPE CONFIGURATION (1ST HALF)

$CRLF
,$CRLF

066146

LASTBANK
cn»E - #60,
NOO.J

9475 032676 022737 000060 002556
032777
001402
000137

MOV RO, -(SP)

sKILL ANY OLD INTERRUPT
;LOMER CPU PRIORITY TO 140
{ENABLE KEYBOARD INTERRUPTS

9476 032704 002006
032706
032714
032716
032722

MOV TKVEC, -(SP)
MOV TKVEC+2,-(SP)

:PRINT SPACE(S)

CRF

MSGO17

,MSGO17

;PRINT SPACE(S)

B—

MACRO Y05.02
CVMJABO MSV11-J MEMORY DIAG.
MAP
N
URATIO
CONFIG
PRINT
SUBR
9491 033000
033000

104401

065726

9492 033004
033004

104401

002660

9493 033010
033010

104401

066146

9494 033014
033014

104401

066014

012701
010103

000360

004737
022737

033224
000170

104401

002660

w
w

BNONB WO

333333352

.DSABL

CRF

TYPE

CRF
$CRLF

;PRINT SPACE(S)

CRF

MSGO12

002556

NOOJ1:

CRF

MOV
MOV

060, 8242,R1
R1,R3

BGE

PCONF2

CALL
CMP

.DSABL

TYPE

TCONFIG
@170, LASTBANK

CRF

nssor{_'

104401

066111

104401

002660

104401

066146

MRSe017

104401

066113

MRSe1ic

104401

002660

$CRLF
$CRLF

104401

066146

MRee017

104401

066115

MSG11D
MSG110

012701

000740

000420

012700
010004

005001
005003

;PRINT SPACE(S)

CRF

TYPEIT ‘s&fr
.

CRF

;PRINT SPACE(S)

CRF

:PRIRT SPACE(S)

CRF

MOV
MOV
MOV

000010

033224
000170

SEQ 0254

. $CRLF

CRF

066146

010103
812700
10004
004737

Page 280-1

eQ011

104401

SERRERRE

002053

Monday 07-Oct-85 16:57

PCONF1:

CRF

8740, ,R1
R1,R3
@8. RO
R4

MOV

CLR
CLR

R1
R3

u% cowwuwnnon ‘mMAP

9519 033142

033142

9520 033146

033146

9521 oggzgg
033152

9522 oggzg:

104401

MACRO Y05.02

066130

104401

065726

104401

065437

104401

066014

Monday 07-Oct-85 16:57

TYPE

TYPEIT

.DSABL

CRF

MSGOO4

.DSABL

CRF

MSGO12

.DSABL

CRF

CALL

004737

033224

B8R

gno

013706

033222

PCONF2: MOV

117700

147436

MOVE

€12600
012637
012637

35’3‘1’ 033220 000207
9532 033222

000000

000062
000060

,MSGOO4

TYPE

TYPEIT

BIC

POP

+ SPACE

,MSGO11

TYPE

TYPEIT

SEQ 0255

CRF

.DSABL

000721

os 10
033214

,MSGO14

MSGO11

3 oguu

114 042777 000100 147440

MSGO14

TYPE

TYPEIT

Page 280-2

,MSGO12

TCONFIG

NOOJ1

PCONFS, SP

{RESTORE STACK

@$TKB.R

;READ CHAR TO KILL FLAG

o8IT6, anxs

RO, rxvsc.z TKVEC

MOV (SP)+.RO

MOV (SP)+,TKVEC+2
MOV (SP)+,TKVEC

RETURN
PCONFS: O

;STACK SAVED HERE!

D
cvruuo MSV11-J MEMORY

CVMJABO

R8O

MACRO
Yt - L one TCORATION AP
MSV11-J MEMORY

DIAG.

9535 033224

Y05.02

Mondasy

07-Oct-85 16:57

SUBTST

<<SUBR

SEQ 0256

Page 282

TYPE CONFIGURATION>>

'...“..‘.“.‘.....“..“..“‘.‘..‘..‘..“.‘.‘..‘...“"....‘....‘..‘.‘....‘...‘

1 #SUBTEST

SUBR

TYPE CONFIGURATION

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

"....‘.““..‘...‘....0“.‘....‘.“‘...‘.‘.“.‘..‘.‘...“‘.“...“.‘.“‘.....‘.

’ss‘

MOV

ON,RO

:N=NUMBER OF CHARACTERS

H
H

MOV
MOV

oK. .R1
R1,R3

s INDEX CONSTANT
1BACKUP

RETURN

sCALL:

9537

33;:

MOV

CALL

RO.R4

TCONFIG

1BACKUP

+ACTUAL CALL

:ONLY RETURN

;.“‘.‘.‘.‘.‘.““‘.“““‘.‘.‘.““.“..‘..O““...““..‘.....“‘.‘.““.““.
YYY YY)
I

;% ERROR ¢s

012737

000340

[

104401

065545

032761

000001

104401

066126

g:. 0
9 0 8
0
0
033246

’SB Og
0
95

001403

000402

104401

066130

S 033260
0
033
033270

701
077014
010400
010301

000004

177776

R LTS
L 2]

TCONFIG:MOV
TYPE

T;PEM;T

002664

14:

24:

3s:

#340,PSW
MSGOOS

:1DISABLE INTERUPTS

é:rms

BIT

#8ITO,CONFIG(R1)

;ERROR ON THIS BANK?

B8R
TYPE

3
MSGO14

;PRINT SPACE

DSABL
ADD
S08
MOV
MOV

CRF
04 ,R1
RO,1$
R4 ,RO
R3,.R1

BEQ
TYPE
T;PEIT
TYPEIT

24
MSGO13
é22(5013

,MSGO14

;NO - SKIP
sPRINT "X*

;BUMP POINTER
;:LOOP UNTIL DONE

CVMJABO MSV11-J MEMORY DIAG.
TYPE CONFIGURATION
S

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 284

SEQ 0257

(188888888088 8880

;o¢ INTERLEAVE oo

i fe

(1888888888800
8800

012737

112737

177776

066132

;THIS IS AN ENTRY POINT FROM ERROR REPORTS

TCFIG1: MOV

005737

#340,PSKW

MOVB
TYPE

TYPEIT
.DSABL

066132

e g 00140;
83

000340

@' ,MSGO15S
MSGO15

;:DISABLE INTERUPTS

sMOVE A BLANK IN TO BE PRINTED

,MSGO1S
CRF

IF NOTAB NE 90 THEN $RETURN

002372

TST NOTAB

BEQ L324

RTS PC
L328:;:;::::3

00020

R4 ,RO

MOV

010400
010301

MOV

R3,R1

180888888888848808

;& MEMORY TYPE s=

1888888040800 0008s

104401

065614

033761
0014

002106

333022

002664

TCFIG2:

032705
001404
112737

000002
000120

000105

#tC7,RS

RS, 03

cHP

174
8GT
IF #BITO SET.IN RS

IF #BIT1 SET.IN RS

#'P,MSGO15

MOove

066132

ELSE

#'E,MSGO1S

END

000403

112737

066132
066132
002372

&' P ,MSGO15

END

174:

84:

MOV
TYPE

TYPEIT

.DSABL

+IS IT AN ECC MEMORY??22?

BIT #BIT1.RS
BEQ L326

;:IT IS A MSV11-P

BR L327

L326:::33:3

;IT IS A MSV11-J

L327::35333

BR L330
L32S::33333

;IT IS A MSV11-L/P
3

-1

BIT #BITO.RS
BEQ L3325

;IS IT A MSV11-P OR A MSV11-J227

MOVB

066132

:IF IF SO BRANCH:!:ttit!

ELSE
000120

;:GET MEMORY TYPE
;CLEAR NON INTERESTING BITS
:IS IT A LEGAL MEMORY TYPE

MOV

066132

000403

005737

E;gaxr.courxs(n1)

BIC

000403

104401

8IT

ggurxs.z(ax).as

177770
000003

032705
001413

112737

LSB

002666

000001

112737

.ENABL

L330:::33::

#' ,MSGO15
MSGO15
é.ngcoxs

IF NOTAB NE €0 THEN $RETURN

TST NOTAB

VMJABO MSV11-J MEMORY DIAG.

TYPE CONFIGURATION

SUBR

033444

033450

S0
9597
gg og:g
0
9600 033460
.“i

MACRO Y05.02

000207

062701 000004
077052
010400
010301

BEQ L331

AD"
8
A0V
MOV

4 ,R1
RO. TCFIG2
R4 .RO
R3.R1

YY)

:BUMP POINTER
;LOOP UNTIL DONE

RTS PC

L33%:53334

i1#s CSR o

*ooo“oou

9607 ¢

;
;
10 033

9617

SEQ 0258

- 284-1

.DSABL LS8

9616

Page

001401

9604

9612

Mondey 07-Oct-85 16:57

D33

104401

066134

757

000040

’os 002664
05 000002
001414

4 C

s ¢

705

;

104401

9618 ¢

110537

000007

oooogg
0661

066132

0
0
0

MSGO16

.DSABL

CRF

TCFIG3: MOVB

MOV
BIT
BEQ
8IC

SWAB
o

000011

108:

168 :

8PL

ADD
ADD

MOVBE

TYPE

TYPEIT

.DSABL

,MSGO16

,MSGO1

CONFIG(R1),.RS
#8IT1.RS
164
#tC7400,RS

#9..RS

104

o7.RS
960, RS

RS,MSGO1S

MSGO1S

sMAKE ASCII

:PLUG INTO MEMORY

,MSGO1S

CRF

iIF NOTAB NE €0 THEN SRETURN

9619 0

066132

170377

YPE

TYPEIT

000207

og'mg 000004
07703
010400
010301

ADD
S08
MOV
MOV

#4,R1
RO.TCFIG3
R4 ,RO
R3.R1

;BUMP POINTER

RTS be

L332::3:333

VMJABO

1-J MEMORY DIAG.

flg’é CONF IGURATION

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 284-2

SEQ 0259

1888808888500080

164 PROTECTED »»

—~4e

— 8*%3:: 104401
%

114:

ifi&?‘l

76 11273g

000120

066132

;;2§

SEE

o~
o

3232 §ii§i§ 104401

066130

066132

134:

144:

15¢:

LA ARASEBLERS

MSGO10
MSGO10

CWIG(RD
MSGO15

S
154

MRSe014
CRF

118
RO
R1

:BANK PROTECTED?
iNO - SKIP

1PRINT SPACE

1BUMP POINTER
:LOOP UNTIL DONE

YD
m\"ABO Eflih-J553.m&i

MACRO Y05.02

Mondey 07-Oct-85 16:57

.SBTTL

SEQ 0260

Page 286

PARITY ERROR HANDLER

TRAP

|...‘.‘0..‘0“...‘0..‘0“.0‘.‘.“‘.‘.‘.O....““‘.“...“..0...0.0.‘....0.0.‘0‘.

“‘g

|....0‘0‘.“‘..‘.‘.“.‘..Q..O.‘.‘....“‘.‘..“.“..‘.0.‘..t‘..‘o“t.“..‘0‘0“‘0

g“g

CODE

sVECTOR TO HERE FROM TRAPS TO 114
s IGNORE ERRORS BUT COUNT IF NOPAR FLAG = 1.

9644
9645

964

)

96
>
a

9655 0

9656

g 0
9659 0 gg
9660 0
9661 0
0
’“i 0
966 og 2
9664 033676
9665 ogsvu
ng 033706
966 osgnt
oug 033716
9669 033722
9670 033724
9671 0337
0337
0337

:
:
'

1
2
3

CHP
022737 000001 002076 PARITY: BNE

00 ogs

7 002072
022737 000002 002076 1%:

001013
012737

004737
063716
042766
ooooga
737
;oos
013716
000002
004737
005237

104032

177777

002144

034040
002326
000004 000002
000003 002076 2%:
002304
34
034040
002064

ACTION
-

PRINT UNEXPECTED PARITY TRAP

COUNT ERROR
SET "ABORT” / SETUP “BADPC” / RETURN VIA PCBUMP
RETURN VIA “PARTHERE"

@1 .NOPAR
14

grtux:
cMP
BNE
SET
CALL
ADD
BIC
RTI
cHP
BNE
MOV
RTI
CALL
FATAL
INC

PARCNT
92 ,NOPAR
F
ABORTFLAG
BADSTACK
PCBUMP, (SP)
#BIT2,2(SP)
3 ,NOPAR
33
PARTHERE , (SP)
BADSTACK
32
FATALS

.DSABL

CRF

ERROR

+32

;COUNTING PARITY ERRORS?
iNO - SKIP

;PARITY ERROR COUNTER + 1
;ACTION CODE = 2 ?
:NO - SKIP
i YES
MOV #-1,ABORTFLAG
;FIND BAD SP,PC,.PSW OFF STACK
;UPDATE RETURN PC
;SHOW FAILURE BY .NE.
;ACTION CODE = 3 ?
iNO - SKIP

;FIND BAD SP,PC.PSW OFF STACK
:SET FATAL INDICATOR

‘

CVMJABO MSV11-J MEMORY DIAG

TRAP

MACRO Y05.02

NON-EXISTANT MEMORY (HOLES) MANDLER

Mondey 07-0Oct-85 16:57

.SBTTL

9674

TRAP

Page 288

SEQ 0261

NON-EXISTANT MEMORY (HOLES) MANDLER

1906008000800 00000800800000000800000000000000800000000000000000000000000000000000

9675

sVECTOR TO HERE (SOMETIMES) FROM TRAPS TO 4
CODE IN NONEM DETERMINES ACTION AS FOLLOWS:
:
IGNORE ERRORS BUT COUNT IF NONEM (NO NON-EXISTANT MEMORY) FLAG = 1.
i 1)
TO EXIT PATTERN O DURING SIZING IF NON-EXIST MEM ERROR
i 2)

9%7
%7

9678
9679

106080000000600800000000808000000000080000000000000000000000000000080000000000000

3680

033736

033744
033746
9685 033752
760
“’

022737

00;0 g

82137
gg;

968 - ig Os

000001

002100

002070
000001

002070

002034

2s:

002070
0 0 oos;sv
== 033774
012701 000001
9690

:si 034000

004737

034r40

005237

002164

104006

.SBTTL
TI’ENT:E:#%L

INC

Esflfl

9697

004737
034020 005237

9701

0340

104007

.DSABL

004737

034040

005237

002064

104005

.SBTTL
MMTRAP : g‘l'h
INC

034040
002064

.SBTTL

PNII.OS:'C_.N.tLu-

MEMORY MANAGEMENT (TRAP TO 250) HANDLER
TRAP
+FIND BAD SP,PC,.PSW OFF STACK
!’ADSTACK
;SET FATAL INDICATOR
FATALS
*7

CRF

TRAP

gMSTlCK
FATALS

.DSABL

CRF

RESERVED INSTRUCTION HANDLER

:FIND BAD SP,.PC.PSW OFF STACK
:SET FATAL INDICATOR

BADSTACK:SUBTST <<FIND BAD SP, PC, & PSW FROM STACK>>

9711 034040

16680888800 8808080040088800400008080000080000008000080000000000040000400000000000

i #SUBTEST

9716 034066

;BUMP NON-EXISTANT MEMORY COUNTER

;DUMMY UP R1 FOR A FORCED SOB EXIT

TIMEOUT (TRAP TO 4) HANDLER
TRAP
=ADSTACK
+FIND BAD SP,.PC.PSW OFF STACK
:SET FATAL INDICATOR
FATALS

Efl

RROR

3710

9712 034040
9713 034044
9714 O
9715 O

NEMCNT
#1.R1

sCOUNTING NON-EXISTANT MEMORY ERRORS?
iNO - SKIP
;BUMP NON-EXISTANT MEMORY COUNTER
1FIRST ERROR?
iNO - SKIP
;ASSUME RO CONTAINS THE ADDRESS ACCESSED

1888880008888 8060804008080040800888004848008000800080848800800088088088080008000000

9698
’*” 83:358

;;gi 8

01 ,NONEM
24
NEMCNT
@1 ,NEMCNT
14
RO, ADDRESS

1060080080800808080080800808080808000000080800000400080808000088800088808000800040

9694
’”‘a 8

034024

INC

MOV
RTI

000002

034012

NONEXIST:CMP
BNE
INC
cHP
BNE
'I?g
%8

010637
062737
016637
016637

mb
2
000002
0uv0004

FIND BAD SP, PC, & PSW FROM STACK

1088880880080 00804040080808008400000800080000480000480080400080808808000000800000000

002026
002022
002032

MOV
ADD
MOV
MOV

RETURN

SP ,BADSP
#2,BADSP
2(SP),BADPC
4(SP) ,BADPSH

MSV11-J MEMORY DIAG.

VMJABO
KEI&L TRAP HANDLER
§TRAP

MACRO Y05.02

.SBTTL

9719

|‘.‘.“.‘.“.“‘....‘....‘......‘.“‘..“..‘..“““‘.0‘.““..‘.‘.0..0.‘.0..“‘

972

9724 034070
9725 034076
97

042766
000002

034100
034106

052737

140000

9737

034
034

9738 ouxc

9739 0341
9740 034142
9741
’703
034144
9743
9744 034150
9745
9746
034152
9747
034160

000002

$KERNEL :

8IC

177572

.SBTTL
$ENERCT Zs %EIS

ENERGIZE TRAP HANDLER
TRAP
@81IT0,MMRO

RTI
18688808880 000480008880000808008008088080000008008808008000800000000000000000000

(8868488080 8004808808004008800080008880008000088080808040008000888000000000000

o3a110 042737
3732
97 ;. oauc 000002
97
97
9736

KERNEL TRAP HANDLER

sKERNEL IS A TRAP THAT COMES HERE

3738

972

TRAP

Page 290

1608808088888 880880080088088000008880880008000880808000008000000000000000000000s

9720
97

9728
9729
97

Mondey 07-0Oct-85 16:57

177572

.SBTTL

TRAP

DEENERGIZE TRAP HANDLER

ODEE'CRI%%E:IIC 081T0,MMRO

|“...‘.“‘.“‘..“..‘."‘...“““.0“‘..0...‘.“..“.“..“‘.‘.‘..“‘..“..‘O‘

005737
90;‘“
C13737
737

177746
177746

.SBTTL
$CACHN: TST
BEQ

MOV

=¥.;»

TRAP
CACHKN
1

CACHON TRAP HANDLER
+IS THERE A CACHE
iNO_- RETURN

CACHKN,CONTRL

#8170, CONTRL

;SETUP CACHE AS PER CONSTANT (USUALLY 1 = FULLY ON)

:DISABLE TRAPS (BUT NOT ABORTS)

...“.“‘.“..“‘...‘........“.“‘.“..‘......““..“.“...O.““‘...O‘.‘..‘..

.SBTTL

$CACHF : ET

005737
001403
053737
000002

002550

177746

TRAP

CACHKN

CACHOFF TRAP HANDLER

1 IS TDER; A CACHE?
NO - RETURN

DISABLE TRAPS (NOT ”M*S). FORCE MISSES, FLUSH, BYPASS

'¥§

CACHKF , CONTRL

CVMJABO MSV11-J MEMORY DIAG.

TRAP

9750

LOAD CSR TRAP MANDLER

MACRO Y05.02

SBTTL TRAP

010046
010146

005737
6 goioel

9756
9757
9738

0
0

9762

034224

9759 034212

9760 O
9761 O

737 002532
100007
113701 002533

177740
002152
020137
001404

3767 034234

002532

002152

012601
012600

034256

9773 0
9772

034260

9774 034272

034272

9775 034274

MOV

CSRNO, RO

ICREATE CSR ADDRESS

ST
8hL
MOVE

PGHCSR
Pcncsn.x R1

,PROGRAM IN INTERLEAVED SPACE?
1BRANCH IF NOT
iCHECK SECONDCSR

CHEB

BGMCSR.CSRNO

TS THE CURRENT CSR?

P
8EQ

BNE
815
MOV
POP

otC37
CoRn
3%

34
#8IT13,CSR
CSR, CSRADDCRO
R1,RO

MOV RO, -(SP)
MOV R1.-(SP)

;DON'T WANT INH. MODE POINTER ON

TST INMECC
BNE 3§

iCLEAR UNNECESSARY BITS
THIS THE CURRENT CSR?
IS
{BRANCH IF IT

iBRANCH IF NOT
iSET THE INMIBIT MODE POINTER TO
iLOAD THE CSR
RESTORE REGISTERS

1ST 16K

MOV (SP)e.R1
MOV (SP)+.RO

RTI

000002

READ CSR TRAP HANDLER
SBTTL TRAP
READ THECORRECT CSR INTO LOCATIONS CSR

9769
9770

9771 034256

i SAVE REGISTERS

BIC

042701

123737

RO.R1

IF INHECC IS TRUE THEN GOTO 3¢

002536

001003
9763 0
9764 034334 052737 020000 002150 28:
9765 034242 C13760 002150 172100 3%:
9766 034
0
0

SEQ 0263

LOAD CSR TRAP HANDLER

PROGRAM CSR’'S ASSERT INMIBIT MODE POINTER WHEN LOADED

SLOADC: PUSH

9734 g:xr 013700 002152
9735 0

Page 292

iLOAD CORRECT CSR WITH DATA IN CSR

9751

9753 34162

Monday 07-0ct-85 16:57

010046

$READC: PUSH

016037 172100 002150

MOV
POP

000002

RTI

013700

012600

002132

MOV

CSRADDCRO) . CSR

;READ IT

MOV RO, -(SP)
MOV (SP)+,RO

MACRO Y05.02

CSR ¢AREFULLY
FUmgAe0 MEYHilTEEOREAD

Monday 07-Oct-85 16:57
.SBTTL

9778 §§§i§

034388

010046
010246
010
01
063700

$TSTRD: PUSH

172100
002152

002533

342

002532

9791 034356

020000
034430

3730 034332
’1’3
9793 034362
034362

002152

1%:

Ss:

034366
9794 034370

9CSRADD,RO
CSRNO,RO

BPL
MOVB
BIC

1
PGMCSR+1,R3
#8IT7,R3

BEQ

cHP

002152

002150

R3,R2,R0

177776

140000
002150

177776

MOV (SP)+,.R3

IF 0BIT4 SET.IN CSR AND #BIT15 OFF.IN CSR

BIS

ELSE

#BITO,2(SP)

9BITO,2(SP)

RTI

002552

MOV R3,-(SP)

PGMCSR , CSRNO
CMPB
3¢
BNE
#B8IT13,R2
MOV
CALL
TSTRD1
‘g SINGLE BIT ERROR ONLY - SET CARRY BIT

BIC

053737

;CREATE CSR ADDRESS

R3,CSRNO

END ;OF IF #BiT4
010210

ROV R2. (3P

R2
PGMCSR

002150
000002

SEQ 0264

TEST (R1) & READ CSR CAREFULLY
TRAP
RO,R2,R3

MOV
ADD

CLR
ST

002532

Page 293

R2,(RO)
TSTRD1: MOV
TESTAREA
8IS
.DSABL

8IC
MOV

TESTMODE ,PSW
CRF
(R1)
#B8IT15!BIT14,PSW

(RO),CSR

MOV (SP).,.R2
MOV (SP)+,RO
BIT
BEQ
BIT
BNE

#BIT4,CSR
L333
#BIT1S,CSR
L333

BR L334
L333:55:333
L334:;::::3

;GO TO SYSTEM TEST MODE

gx:xnao Efxlbigu'fMLoéfi' s TR#CME*OZ
9809

9810 034456
9811 034464

9.1; 034470

981

012737
004737

000002

”

000002
035202

3818 03ad08 faRaL O

002150

2 002150

000002

9818 034504
9819 034512

012737
004737

000001
035202

002150

ggzg;

000001

002150

034516

1
"2% 834520

000002

C00002

034546
Og:ggz

012737
104425

9830
33

983
”g‘ 03:322
9835 0

9836 034574
7 034600

9839 034602
9840 034610
9“5 034616
9842

034620

000003

002150

004737
000002

013737
052737
104425

000002

(ORBesw
.SBTTL

$ECCINIT:MOV
CALL

TRAP

ECC DISABLE ALL CSR'S TRAP HANDLER

o8IT1,CSR
CSROUT

I:?'T" t:SSCC DISABLE OF 1 SELECTED CSR TRAP HANDLER
TRAP

INITIALIZE ALL CSR'S TRAP HANDLER

#BIT0,CSR
CSROUT

.SBTTL
OEMSBE:E"'V.L
RTI
.SBTTL

ENABLE SBE PARITY TRAPS ON ALL CSR'S
TRAP
?ITO%BITI.CSR
SROU

TRAP

ENABLE SBE PARITY TRAPS ON 1 SELECTED CSR

98ITO!BIT1,CSR
$ENA1SBE:MOV
LOADCSR

WRITE CHECKBITS THRU ALL CSR’'S TRAP HANDLER
TRAP
;BITS 11-5
CHECK,CSR
; CHECK MODE
#BIT1!8IT2,CSR

002314
000006

002150
002150

.SBTTL
$CBCSR: MOV
8IS

002314
000006

002150
002150

CHECK, CSR
$CB1CSR:MOV
@BIT1!BIT2,CSR
8IS
LOADCSR

035202

28 0265

Page 295

INITIALIZE 1 SELECTED CSR TRAP HANDLER
.SBTTL TRAP
0ECC1INIE%¥SR #81T0,CSR

RTI

000002

0%3737
737

RTI

‘ECCIDIS.SM"L

RTI

:“gl 03353 000002
000003 002150
012737 035202
ag 034532 004737
9827 034
8 034544

.SBTTL

$ECCDIS:MOV
CALL

RTI

9816 034502

9817

Monday 07-Oct-85 16:57

CALL CSROUT
RTI
.SBTTL

RTI

TRAP

WRITE CHECKBITS THRU 1 SELECTED CSR TRAP HANDLER

:BITS 11-5
; CHECK MODE

MACRO Y05.02 Monday 07-0Oct-85 16:57
c VMJABO HSVI%-J ME!MORY DIAG.
WAS THERE A SBE ON ANY CSR TRAP HANDLER
T RAP

.SBTTL

9845
9846

010146

010446
013701
005004

9847 O
9848
9849
9850

9852

$WASSBE : PUSH

005037

9833 0
9854

9855
9856

9857 0

R4
CLR
BEGIN LWSBE

FOR CSRNO

002152

103010
104426

000020

12704

177777

BCC L33S

SET

BIT #BIT4,CSR
BEQ L336

MOV

LEAVE LWSBE

L336:333333

9858
9859

IF R1 EQ #0 THEN LEAVE LWSBE

005701
001407

i HE

000002

002152

002152
000036

POP

§8

000403

000002

R4 ,R1

000002

BIS

ELSE

BIC

#BIT0,2(SP)

@#BITO,2(SP)

END ;OF ON.ERROR
RTI

ADD #2,CSRNO
CMP CSRNO,#36

BLE BS7
$38388383

$SET C BIT FOR ERROR

ES6::::31:

MOV (SP3eiR1
.'

ON.ERROR

000002

TST R1

BEQ ES6

—

ROR
012604
012601

L33S:3533333

END ;OF FOR CSRNO

END LWSBE

@€-1.R4

BR ES6

END ;0F IF #BIT4

END ;OF ON.ERROR

042766

CLR CSRNO
BS57::33333

IF O0BIT4 SET.IN CSR

002150

000411

103004
052766

BS6::133:3

READCSR

032737
001403

062737
023727
003755

MOV R1,-(SP)
MOV R4, -(SP)

:GET CSR'S BYTE

:= #0 TO 436 BY @2

ASL
ON.ERROR

006301

SEQ 0266

WAS THERE A SBE ON ANY CSR TRAP HANDLER

TOTCSRS,R1

MOV

002224

TRAP

R1.R4

Page 297

BCC L337

BR L340
L337:::33:3
L340:;:::::

CVMJABO MSV11-J MEMORY DIAG.

| TRAP

9870

9871

034736

104426

9874 034746
9875 034

032737
001403

9877 034764

000002

9872

9873

07-0ct-85 16:57

MACRO Y05.02

WAS THERE A SBE IN 1 SELECTED CSR TRAP

034740 042766

9876 034

052766

000001

000002

000020

002150

000001

000002

Page 297-1

SEQ 0267

WAS THERE A SBE IN 1 SELECTED CSR TRAP HANDLER

.SBTTL

TRAP

BIT
BEQ

¢BIT4,CSR
1%

;ON RETURN IF CARRY IS SET THERE WAS A SBE
BE
: READCSR
$WAS1S
;CLR C BIT ON STACK
#8170,2(SP)
BIC
1s:

8IS

RTI

#8170,2(SP)

;SET C BIT ON STACK

MACRO Y05.02
Monday 07-Oct-85 16:57
CVMJABO MSV11-J MEMORY DIAG.
WAS THERE A DBE ON ANY CSR TRAP HANDLER
TRAP

.SBTTL
$WASDBE
: PUSH

9880

9881 034766

03:7’6

010146

034772
9883 034776
9884 035000

013701

034770

9885 0

010446

005004

005037

006301

9886 003
9887

002152

0
0
o3
9890 0
03
9891 03
03
9892 9
9889

032737
001403

100000

c12704

177777

002150

SET

9899

elel>

062737
023727
003755

002152
000036

END ;O0F FOR CSRNO

ROR
POP

012604
012601

103004

R4 ,R1

ON.ERROR
000002

000002

BIS

ELSE

BIC

@BITO,2(SP)

#8ITO,2(SP)

END ;OF ON.ERROR
RTI

g2} s
@-1.R4

L341:;:35533:
TST R1
BEQ E60

ADD #2,CSRNO
CMP CSRNO,#36
BLE B61
E61l:::33333

END LWDBE

006004

BCC L341

L342:33533:3

IF R1 EQ 0 THEN LEAVE LWDBE

000002
002152

Bfilznn?;a —

BR E60

END ;OF IF 4BIT4

005701
001407

B60:;3:1:1

MOV

END ;OF ON.ERROR

elele

9898

0000000000000 0000000000

9897

LEAVE LWDBE

000411

9894 0

9896

READCSR
IF #BIT15 SET.IN CSR

9893 3;
9895

:GET CSR'S BYTE

:= 90 TO #36 BY @2

ASL
ON.ERROR

103010
104426

0
9888 0

MOV R1,-(SP)

R4
CLR
BEGIN LWDBE

FOR CSRNO

SEQ 0268

WAS THERE A DBE ON ANY CSR TRAP HANDLER

TOTCSRS,R1

MOV

002224

TRAP

R1.R4

Page 299

:SET C BIT FOR ERROR

E60:::::33

MOV (SP)+.R4
MOV (SP)+,.R1

BCC L343
BR L344
L343:;::33353
L344:;;:;:;:::

c VMJABO
T

MSV11-J MEMORY DIAG.

MACRO Y05.02

mflg?-&:t-” 16:57

WAS THERE A DBE ON 1 SELECTED CSR TRAP

035102

035104

033110
0 lg

10‘45‘

005737

8900004
766

0351

000002

0351

000002

03 1‘%

042766

Page 299-1

WAS THERE A DBE ON 1 SELECTED CSR TRAP HANDLER
.SBTTL TRAP
;ON RETURN IF CARRY IS SET THERE WAS A DBE

$WAS1DBE : READCSR
ST
CSR

002150

000001

000002

000001

000002

3%:

BPL
BIS

34
#8170,2(SP)

8IC

#8170,2(SP)

RTI

:DBE?

iNO_- SKIP
:SET C BIT ON STACK

;:CLR C BIT ON STACK

SEQ 0269

CVMJABO MSV11-J MEMORY DIAG.

TRAP

MACRO Y05.02

CLEAR ALL ECC CSR'S TRAP HANDLER

t ot

9918 035136
ag 035142
1 035144

S
Og lgg

siid
9931 035170
035176
g

005037
004737
000002

002150
035202

005057

002150

Mondey 07- Oct-85 16:57

.SBTTL
$CLRCSR:CLEAR

CALL

RTI

.SBTTL
$CLRICSR:CLEAR

LOADCSR

RTI

052737
004737
000002
052737
104425

000006
035202

Page 301

TRAP

CLEAR ALL ECC CSR'S TRAP HANDLER

TRAP

CLEAR 1 SELECTED CSR TRAP HANDLER

TRAP

ECC DISABLE, CHECK MODE, & WRITE CHECKBITS IN ALL CSR'S TRAP ME#

z::WT

.SBTTL
CHE CKBI TS _ALREADY IN LOC “CSR*

002150 $CHKDIS:BIS

CALL

RT1
.SBTTL

002150

?IYI!OITZ.CSR

TRAP

LOADCSR

RTI

CLR CSR

+ECC DISABLE & DIAG CHECK MODE

ECC DISABLE, CHECK MODE, & WRITE CHECKBITS IN 1 SELECTED CSR

sCHECKBITS ALREADY IN LOC "“CSR"

$CHK1DIS:BIS

SEQ 0270

#8IT1!BIT2,CSR

;ECC DISABLE & DIAG CHECK MODE

e Eee

07-Oct-85 16:57

MACRO Y0S.02
-J MEMORY DIAG.
ISABLE, CHECK MODE

PRIt creckBITe N1 SECECTED

9936 035202

Page

303

CSROUT: SUBTST

<<SUBR

WRITE IN ALL CSR'S>>

18SUBTEST

SUBR

WRITE IN ALL CSR'S

SEQ 0271

18868888880088800008688048880080000008808000048808884008080880000088000800000000

.o“uuoooooooo;ouooonuuuouuouou“uououuuuuuonouoouuuuu

010146
013701

005037

002224

PUSH

MOV

TOTCSRS.R1

BEGIN LCSROUT
FOR CSRNO

002152

ON.ERROR

10300
1044

023727
003764

IF R1 EQ #0 THEN LEAVE LCSROUT

000002

002152

CLR CSRNO
B63:5:5333

L34S:5:5333
7ST R1
BEQ E62

END ;OF FOR CSRNO

002152

ADD #2,CSRNO

000036

CHP CSRNO, #36

BLE B63
E63:3:33333

END LCSROUT

POP

006267

B62:3533133

BCC L34S

LOADCSR
END ;OF ON.ERROR

€05701
001407

737

:= #0 TO #36 BY @2

ASL

006301

MOV R1,-(SP)

s1GET CSR'S BYTE

E62:::33:3

MOV (SP).+,.R1

RETURN

INVALIDATE BACKGROUND PATTERN>>

$INVALID:

SUBTST

<<TRAP

1#SUBTEST

TRAP

INVALIDATE BACKGROUND PATTERN

$80888008000880888808840889888880488808008848888484888888888480288488884040088488088

168888088 8680000888084888888048808800484840008048808408484880888888888880888008480

010046
010146
013701
1
1
042761
012601
012600

002102

002666

PUSH

RO,.R1

MOV
ASL
ASL

BANK ,R1
R1
R1

POP

R1,.RO

BIC
RTI

MOV RO, -(SP)
MOV R1,-(SP)

#BIT13,CONFIG+2(R1)
MOV (SP)+.R1
MOV (SP)+,.RO

$W~0 MV&&% ’.% Y¥05.02

Monday 07-Oct-85 16:57
SUBTST<<TRAP

Page 304

SEQ 0272

GENERATE AND TEST ERROR ADDRESS>>

|.“.‘.‘..‘....‘“‘.‘............‘.‘.‘......““..‘...‘.‘.....“‘...‘....“‘.‘O.

TRAP

18SUBTEST

GENERATE AND TEST ERROR ADDRESS

'“..“.“‘....‘..‘..‘..O.“.O....‘......“..‘.‘.‘.“.‘.....“..“‘.‘....“..."

RO.R1,.R2,R3

MOV R1,-(SP
MOV R2,-(SP
MOV RS, -(SP)

002104

002456

A A
B A

irdy N iririririr iy

= S AS S8 S0 AP S SR SR SR

MR P P PP
MBI B BB

VT A

LV
R BBt B

PUSH

172246

64:

177

177773
002132

74:

AsH

18:

177775

)

002132
D!

8IC
SWAB

#+C177.R0
R1

81
ng

:;%1

172100

‘)

BNE
ST
8EQ

z
EQFLAG
24

MoV
8IS
HOY

CSRNO, R2
#8IT14,CSRADD(R2)
R2),RO
C

172100

03!

ASL

#*C740.R0

8IC

#BIT14,CSRADD(R2)

o;c

)

e,
)

ASL
g

RO
RO,R1

e
u:g

RO.R1
S¢

)S!

2¢:

+
kL

e,
e

002136

+ <
.

4
*
)3

000100

..!
34:

;GET CURRENT ADDRESS BITS 11 AND 12

ASR
R1
ASR
R1
ASR
R1
#1C2,R1
8IC
ADD THEM TO THE ADJUSTED PAR VALUE
R1.RO
ADD
:GET ERROR Mss FROM CSR WE‘ TEST
MOV
CSR, 1

PUSH

1GENERATE WHAT ERROR ADOR SHOULD BE

#-5.R0

BHNE

177600

°¥#§°

)

,R3
BANKINDEX
64
SIPARS,RO
7
UIPARS,RO

MOV
ST
BNE
MOV
8R
MOV

Roo RO
N 64K

€100,R0
.°o.‘
%3

+IS THIS AN 11/83,11/23-8 OR 11/23 ?

veétssuv
IF NOT
:BRANCHEg
?
:IS IT

:BRANCH IF NOT

SAVE GENERATED ERROR msss
1GET CSR

IT CAREFULLY
mnu ON “

TSR
I oo

+SHIFT ADDR BITS 18-21 INTO POSITION
+ADD TO CURRENT ERROR ADDRESS

TeD EAn ADOR.
{COMPARE REAL_AND GENERATED
R
o W e
lfl WE HAVE AN ERROR
164K INTERLEAVED MEMORY?

TR IR

Cumgne0 N o T NG TeST EAROR ADORE

5;05.02

gig
1000. 03
10010 OSSS
10011 03

0
10013
1001

104462
010137
005037

S$:

002460
002066

Monday 07-0Oct-85 16:57

PERR36
MOV

CLR

POP

012603
012602
012601
012600
000002

Page 304-1

1ELSE PRINT ERROR ADDRESS ERROR
:SAVE CSR'S ERROR ADDRESS

R1,ERRADD

SKPERR

R3,R2,R1,R0

SEQ 0273

1ENABLE flfi ERROR PRINTOUT AGAIN

+RESTORE REGISTERS

MOV

S’;ul?

MOV (SP)+,.R1
MOV (SP)+,RO

RTI

10014 035550

(SP)+,.R3

$CBREG: SUBTST

<<TRAP

ENAP_E CHECKBIT REGISTER>>

:#SUBTEST

TRAP

ENABLE CHECKBIT REGISTER

1830888808480 0808008808088N0040888408020040040804880080800808008084888000000000000

10018 Ssg 34 052737 000004 002150
005037

002150

.‘o.uooe:ooooooa;;oooc.o.uoooouoo‘oo-uoo-oo.oooo‘oooo.o“uo“uuuououu

#B8IT2,CSR
8IS
k?;DCSR
$SYNREG: SUBTST <<TRAP

:ENABLE DIAGNOSTIC MODE
:LOAD CSR REGISTER
i

ENABLE SYNDROME BIT REGISTER>>

1888888050880 080 8808880040000 0008000808048880000884088800008088008008880000000000

TRAP

;#SUBTEST
0050
g 572 052737
igOg
37

1
1

002150
040004

ENABLE SYNDROME BIT REGISTER

;oooo.o‘oooooooooooooo.ou.uuouu.cuoooooo.ooooo‘oooooooouo“uuuouuuo

002150

CLR

.IS

DCSR

CSR

HITIO 'BIT2,CSR

sEmLE DIAGNOSTIC MODE
;:LOAD CSR REGISTER
:

CVMJ.

A'm

MSvV1l-J '!l‘ll' DIAG.

MACRO Y05.02

E SYNDROME BIT REGISTER

Monday 07-0Oct-85 16:57

SUBTST<<SUBR

10028 035604

Page 306

SEQ 0274

MAPPER>>

;o;‘o‘;oo;ooooooooooooooooooo.oooooooooooooooo.oooooooo.ooooooooooooooooooooooooo

::oooosiooo‘.oooo.oooaoo‘ooooooooo‘oooo.oooo.o“oooooooooooooooooooooooooooooooo
1 THIS SUBROUTINE MAPS THE MEMORY BANK (16K WORDS = 1

10080

BANK)

sIN R3 TO THE TEST PATTEPN AREA (SUPERVISOR VIRTUAL (60000 - 157777) FOR
;THE 11/83 ; USER VIRTUAL (60000 - 157777) FOR ALL OTHERS.

10031

sCALL
3

MOV
CALL

RETURN

MAPPER

;SET UP BANK ARGUEMENT
sACTUAL CALL
;ONLY RETURN

MOV
MOV
MOV
TST

4%:

30%:

35%:

SRR

18:

.§-

40%:
000011

172246
002456
1/7646

000004

000200
002240

10075 035776
10076 036002

000010

Ss:
2%:

BEQ
MOV
MOV
MOV

OKIPARO,RO

@SIPARO,R1
#SIPDRO.R4
WSWER
ouxnao R1
OUIPDRO. R4

rmos R2

(aoio (R1)+

MOV
MOV
MOV
S08
MOV
MOV
cMP
40
BNE
osxmo.s.m
MOV
MOV
BIS
S08
sSET UP
cMP
30
BEQ

i e
L
L
L

;FIRST AREA TO MAP TO
;FIRST ADDRESS REGISTER
{FIRST DESCRIPTOR REGISTER
;CAN WE USE SUPERVISOR MODE?
iYES, BRANCH

333a3

33323

RO,R1,R2,R4,RS5

;SET SUPERVISOR/USER UP FOR 1 TO 1 MAP

MAPPER: PUSH

:FIRST ADDRESS REGISTER

iFIRST DESCRIPTOR REGISTER
;CONSTANT FOR 4K PAGE, UP, R/W
: COUNTER
:PUT IN SUPERVISOR ADORESS
:PUT IN SUPERVISOR DESCRIPTOR
iLOOP TILL DONE

:CORRECT LAST FIELD FOR PERIPHERALS PAGE
A 11/73/83/847
;IS THIS
IF NOT
:BRANCH
;POINT TO PDR 3
;COUNTER=4
:SET UNCONDITIONAL CACHE BYPASS IN PDR3-6

nxhs (R&)
Aaeu
s@enxgsoa/usea FOR TEST iMAP
uon?ns (1 70 1)?
'

ASH

99..R3

;BANK 1 STARTS AT 100,000 LESS 6 LSB'S

MOV
TST
BEQ
MOV
MOV
MOV
ADD
S0B
ST
BEQ
suB
MOV

#SIPARS,R1

iSETUP FOR AUTO INCREMENTING
?
:D0 WE HAVE SUPERVISOR MODE
ANCH
;YES :SETUP FOR AUTO INCREMENTING

NOSUPER
5S¢
NI:MSR1
2
R3, (Rl)o
0200 R3
R2. 20

SPLTCSR

éz

;FOR MEMORY MANAGEMENT= 1000

:LOOP TILL DONE

CVMJABO MSV1l -J MEMORY DIAG.

SUBR

MAPPER

10077 036004

10078 036010
10079 036016
36020

062702

000004
000001

MACRO Y05.02

Monday 07-Oct-85 16:57

002240

10%:

010000

002456

002104
002140

177652
172252

ADD
cHP
BEQ
MOV
MOV
MOV
MOV
MOV
MOV
TST
BEQ
MOV
B8R
MOV
TST
BEQ
MOV
BR
MOV
ADD
ADD

Page 306-1

SEQ 0275

04,R2
01.,SPLTCSR
104
R2,.R0
R1.R2
RO,R1
(R1)+,(R2)+
(R1),(R2)
, RO
BANKINDEX
INT64K
114
RO
94000,
124
#10000, RO
NOSUPER
133
SUIPARS,R1
144
#SIPARS,R1
RO, (R1)+
RO.(R1)

;IF WE ONLY HAVE AN 124K SYSTEM, WE DON'T WANT TO TEST THE
;LAST 4K, WHERE THE Q-BUS DEVICE PAGE IS. INSTEAD, THE
;PROGRAM WILL REMAP THE LAST 4K TO 8-12K. ALSO, IF THERE

;IS A BANK 177 ON AN 11/83,

_SBTTL

PUSH

TRAP

MOV
MOV

172354
012701

172%40

036306

MOV
CLR

MOV

323335

2
O
B

B
LR

NN NN

MAP KERNEL (ALMOST 1 TO 1) TRAP HANDLER

RO,R1,R2.R3,R4

833

$KMAP:

RG
, SVKPARG
KIPA
RO

OKIPARO,R1

MOV

;1ST AREA TO MAP TO

:FIRST ADDRESS

RETURN

10118 036200

10119
10120 036202

172254

172252

177654

lalalelala)

177652

Lalalolelel

84:

002456

:BANK 77
:NO - BRANCH

7%:

:BRANCH IF SO

002102

87,BANK
3
8s
€177, BANK
38
NOSUPER
64
UIPARS ,UIPARG
33
SIPARS, SIPARG
RS,.R4,R2,R1,RO

000177

CHP
BNE
B8R
cHP
BNE
TST
BEQ
MOV
BR
MOV
POP

22823

BEQ

002102

008787

001423
022737
001017
000404
022737
001012
005737
00&404
013737
000403
013737

94:

33333

002556

022737

THE PROGRAM WILL REMAP THE LAST

é.‘.'f TO 8-12K FOR THE SAME REASON.
07, LASTBANK
74
BNE
1ST
NO22BIT
:11/83,11/23-8 OR 23?

Monday

1) TAAPRANDLERS
A NOSTCi T0 HACRO

CYMIABO MSY11-J MEMORY OIAG.

10124 036230
036234
10125
10126 036240
10127 036244
10128 036246
10129 0
10130 0
10131 036256
1ou§ 036262

012702
012703
012704
010021
010223
062700
077405
012741
0.2741

036272

012604

077406
172300
000010

000200
177600
177400
10133 036266 O01.711 036306
10140 036272

14:

TMY 07-Oct-85

MOV
MOV
MOV
MOV
MOV
ADD
S08
MOV
MOV
MOV
POP

077406, R2
3
oKIPDRO,R
e8. R4
RO.(R1)+
R2.(R3)+
0200, RO
R4, 14 -(R1)
©177600.
0177400, -(R1)

012600

10142 036306

000000

10141 036304

000002

Page

SVKPARG, (R1)
R4,R3,R2,N1,RO

012603
036276
ogioo 012601
036302

16:57

- 306-2

P, R/W
;CONSTANT FOR 4K
n
i:r.iste
oescaxnoa
mas
.xst
COUNTER
mn IN KERNEL ADORE
.P\n IN KERNEL oxscaxnoa
Aooa:ss CONSTANT FOR 4K CHANGE
L DONE
.Loor
s THE peaxmsm.s PAGE TO KIPAR?
;AND NEXT LOWER PAGE TO KIPARG
MOV (SP)+.R4

A2
(SP3s
MOV
MOV (SP)+.R1
.l

RTI

SVKPAR6: .WORD

MOV (SP)«.RO

;3K SAVE THE XXDP V2 KPAR6 POINTER HERE

SEQ 0276

Monday 07-Oct-85
MACRO YO0S.02
Y
MAP yKERNEL CALMOST i 10 T oar CRARBLER

CVMUABO MSV11-J MEMORY DIAG.

10146 036310
036310 032777
036316 001402
036320 000261
036322 000207
036324
10147 036324
036324 005737
036330 001003
036332 005737
036336 001405
036340
005737
001402
C00261
000207

036460
036466

036470

10165 036470

036470
036476

SEQ 0277

RELOCATE PROGRAM

1808484804040 00 0800040800000 0000000R00R00RRERRRARREERRERRSRLERRRERIRRIRRSRNIISS

010000

144320

IF #SW12 SET.IN 8SWR THEN $RETURN ERROR

IF APTFLAG IS TRUE OR ACTFLAG IS TRUE

002352
002350

IF $PASS NE #0 THEN $RETURN ERROR

056724

END; OF IF APTFLAG
BEGIN LOADERBANK

012737

000001

004737

037760

10153 036364
036364 005737
036370 001431
036372 005737
036376 001026
036400 005737
Om 001023

S2
10162 O
036452
10163 036454
036454
10164 036454
036454

- 308

(000880808000 0000880004000008008000000000000000000R000RRNttRttRtttIRRNIRIINS

;#SUBTEST

10154 O
10155 036412
10156 036416
10157 036422
10158 036426
10159 036432
10160 036436
10161 Og::“

Page

RELOCATE:SUBTST <<RELOCATE PROGRAM>>

10145 036310

10148 036340
036340
036344
036346
036350
036352
10149 036352
036352
10150 036352
036352
10151 036352
036352
036360
10152 036360

16:57

002102

002116
002122
002130

013700 002102
010037 002432
013701 002576
004737 037350
004737 037702
013701 002104
052761 100000
042761 020000

002666
002666

000416

FOR BANK := @1 TO LASTBANK

MOV
MOV
MOV
CALL
CALL
MOV
BIS
BIC

002556

032777
001002

020000

144140

L350:;::3333
B64:;;:::::

BANK ,RO
RO, LOADBANK
,R1
LOADHOME
BANKMOV
;MAP NEW LOADER BANK IN KERNEL
NEWLOAD
BANKINDEX,R1
:MARK LOADER
#BIT15,.CONFIG+2(R1)
;INVALIDATE BACKGROUND PATTERN
9BIT13,CONFIG+2(R1)

LEAVE LOADERBANK

END ;OF FOR BANK

002102
002102

L346::53333
TST APTFLAG
BNE L347
TST ACTFLAG
BEQ L350
L347:::5333
TST $PASS
BEQ L351
SEC
RTS PC
L3S1::33333

MOV #1,BANK
B65::::::3:
CALL EXBANK
IF ACFLAG IS TRUE AND PFLAG IS FALSE AND BMFLAG IS FALSE
TST ACFLAG
BEQ L3S52
TST PFLAG
BNE L352
TST BMFLAG
BNE L352

END ;OF IF ACFLAG

005237
023737
003734

BIT oSW12,8SuWR
BEQ L346
SEC
RTS PC

IF 6SW13 OFF.IN a8SWR

BR E64

L3S2::33333
INC BANK
CMP BANK ,LASTBANK
BLE BéS
E6S:::3333:
BIT oSW13,8SHR
BNE L353

SEVHJ OEH&&“JMEMORY DIAG.
10166 036500
036500

MACRO YOS 02

Monday 07-Oct-85 16:57
TY

104401

TYPEIT
.DSABL

070246

,MSGO75

Page 308-1

SEQ 0278

sRELOCATION NOT POSSIBLE

MSGO75

END ;OF IF &#SwW13

10167 036504

L3S3:353333

$RETURN ERROR

10168 036504
0

SEC

RTS PC

END LOADERBANK

10169 036510

E64:5::3:33

BEGIN FINDBANK
013702
006302
006302

MOV

002556

ASL

10180
10181 036604

10182 036606
10183 8366“
10184 036614
036614

10185 O

10186 036626

000201

032761
001031

100000

002666

033761
001425

002106

002664

032761
001460

000400

032761
001405
032761
001001

000100

002664

000200

002664

002666

:= #2+2 TO R2 BY #4

IF 0BIT1S OFF.IN CONFIG+2(R1) ;IF NOT LOADER BANK
IF CPUBIT SET.IN CONFIG(R1) ;IF ACCESSABLE

012737

177777
002540

OIT 00178 covrxcoztu)
Q E66

IF #BIT6 SET.IN CONFIG(R1) AND #BIT7 OFF.IN CWIG(R
1)

IF INHECC IS FALSE

002536

SET

INHECC

R1, INHBANK
MOV
END; OF IF INHECC
END ;OF IF CPUBIT

END ;0F IF #BIT1S

10188 036626

END ;OF IF @BIT7

10189 036626
062701
020102

BIT CP\S.%IY.CONFIG(R1)
BEQ
L

END ;OF IF #BIT6

002536

BIT 0BIT15.CONFIG+2(R1)

IF #BIT8 OFF.IN CONFIG+2(R1) THEN LEAVE FINDBANK ;IF
P

;IF 1ST PROTECTABLE ECC BANK

0C5737
001005

MOV #2+2.R1

IF BIT7!BITO OFF.IN CONFIGCR1) ;IF NO ERRORS & NOT BIT #8177:8110,CONIG(RL)
AM SPACE

LEAVE FINDBANK

000447

10187 036626

10190 036626

;R2 <- R2 » 4

B67:

32761
001035

010137

FOR R1

012701

B66:3:3333

LASTBANK ,R2

END ;OF FOR

BIT
BEQ
BIT
BNE

“176 CONFIG(R1)
L35
”IT?.CW!G(RI)
L357

BR E66
L357::5533:3

TST INMECC
BNE L3560

MOV

#-1,INHECC

L360::::3::
L356:553333
L3SS::333:3

L354:::5:3:

ADD #4.R1
CMP R1,.R2

CVMJABO MSV11-J MEMORY DIAG.
RELOCATE PROGRAM
036634
036636

|
|

10191 036636
36636

MACRO Y05.02

Monday 07-Oct-85 16:57

SEQ 0279

BLE B67
E67:33:383

003733
005737
001012

002542

005737
001407
013701
023727
001421
000420

002536

IF FULLREL IS FALSE

002540
002300

MOV

CMP

000030

INHBANK,R1

230
REALPAT,

RELENT1
BEQ
BR
RELENT1
END; OF IF INMECC

END; OF IF FULLREL
005037

002536

032777

020000

143734

023727
001402

002300

000030

104401

070246

023727

TST FULLREL

BNE L361

IF INHECC IS TRUE

|
|

Pege 308-2

CLR _ INHECC
IF #SW13 OFF .IN aSuWR

REALPAT, #30
CMP
SKuUB
BEQ
MSGO75
TY
MSGO75
TYPEIT
.DSABL
END ;OF IF &#SW13
SKUB:

000261
000207

TST INHECC

BEQ L362

;IS THIS PATTERN 307
;:YES - SKIP MESSAGE
L362::3333:3

L361:

/MAKE SURE FLAG TS TURNED'bFFs
;IS THIS PATTERN 307

:YES - SKIP MESSAGE
;RELOCATION NOT POSSIBLE

L363:;:::33

$RETURN ERROR

SEC
RTS PC

END FINDBANK

CLEAR

005037
042761
005000
071027

002536
020000

010037
013737
004737

002310
002532
037516

002534

052737

140000

177776

004537

040732

002666

E66:

INHECC

+IF WE RELOCATED PRWERL& THI?.‘S’QLD BE OFF!

ooxus.co'rmozcnn

:INVALIDATE BACKGROUND PATTERN

“ RO
DIV
::= RO
RELOC1: LET NEWBANK

000004

000001
037600

RELENTI:CBIC

MOV

CALk

BIT #SW13,aSWR
BNE L363

PGMCSR PGMCSR+2

USERMAP

eBIT15!BIT14,PSW
car
100000, SIZE

JSR né.oLocxs

MOV RO,NEWBANK

:SAVE CURRENT PGM. CSR
:MAP NEWBANK TO USER PAR
:ENTER USER MODE
;G0 TO USER MODE

+MOVE PROGRAM

;ENTER KERNEL MODE
:DEENERGIZE MEMORY MANAGEMENT

177572

002310
002664

CONFIG(RO),R2

= 4
;RO <- RO

CVMJABO MSV11-J MEMORY DIAG.

RELOCATE

10223 037032
133; 037034

000302
042702

MACRO Y05.02

006302
052737
010237
032760
001412
016002
042702
07222

000001 177572
002532
010000 002666
002664
007777
177775

og-mo

012737

177777

037116
037120

000241
000207

037100 052702 100000
1
10234 037104 050237 002532
10235 037110
10236 037116

SWAB
8IC

177760

037040
1
10226 037042
10227 037
037
1
037062
1
037
1
10231 037070
037074
1

002126

Monday 07-Oct-85 16:57

ASL
8IS
MOV
BIT
BEQ
MOV
BIC
ASH
18:

8IS
8IS
SET

R2
@1C17.R2

Page 308-3

R2
98IT0,MMRO
:
R2,PGHCSR
081712, CONFIG+2(RO)
14
CONFIG(RO),R2
R2
#+C170000,
e-3,R2
eeIT15,.R2
R2,PGMCSR
RLFLAG

$RETURN NOERROR

SEQ 0280

{ENERGIZE MEMORY MANAGEMENT
;PUT NEW PGM. CSR INTO PGMCSR
;IS THE NEW BANK INTERLEAVED?
:BRANCH IF NOT INTERLEAVED

MOV

@-1,RLFLAG

cLe
RTS PC

CVMJABO MSV11-J MEMORY DIAG.

RELOCATE PROGRAM

MACRO Y05.02

Monday 07-Oct-85 16:57

SEQ 0281

<<UNRELOCATE PROGRAM>>

UNRELOCATE : SUBTST

10239 037122

Page 310

|.““‘.‘...".‘.‘...‘."..‘.““.O““..‘..‘..‘.‘.‘.“‘“““‘.“..............

UNRELOCATE PROGRAM

1 ¢SUBTEST

|‘.“...““..‘..“‘..“...‘.....‘.‘..‘......““.‘...‘.“.‘.....““..‘.“‘..“

RESTORE LOADERS

0241 037
0241 837152

et e

et S

002432
002576
037350
037702

~
-

o e

et et e

et et

002102

0024
037760
002104
100000
002576
037760
002104

020000

002102
002666

002102

002666

037

10263 OS?&
g?
037

005037
004737

002310
037516

052737

140000

004537

PUSH

BANK

NK
, BANK
LOADBA
EXBANK
BANKINDEX,R1
@BIT15,CONFIG+2(R1)
ME
, BANK
LOADHO
EXBANK
BANKINDEX
o8IT13, courxcozuu)

;:CLEAR LOADER FLAG

CLEAR

INHECC

sMAKE SURE ECC TESTS ARE NOT INHIBITED:

LET NEWBANK

7% 037346

-3

012700

Jsa ns0CK3

042710
062700
7

003771
012600
000207

.DSABL

002126

KERNEL

177572

18:

CRF

BIC

98170, MMRO

MOV
8IS
CLR

+2 ,PGMCSR
PGMCSR
e8ITO,MMRO
RLFLAG

8IC

uxus (RO)

CALL

002532
177572
2s:

003620

:= 00

.DSABL car
100000, SIZE
8MOV

040732

000001

CLR

eBIT15!8IT14,PSW

8IS

MOV

ADD
cHP
BLE
POP

RETURN

@CONFIG+2.RO

#4,R0
RO. #3620
24
RO

; INVALIDATE BACKGROUND PATTERN
MOV _(SP)+,BANK

USERMAP

CALL
USER

%°°°°°
-~

&
OO

=0~

~
-~ NNNSNNNNNNNSN

00000000

-~ ~N =~
» WO
WY

ooo

ot Pt
s et o
8 et o
et e e
P

037

BANK

RESTORE
B

177776

MOV BANK, -(SP)

MOV
CALL
MOV
BIC
MOV
CALL
HOV
BIC

o373ed

s
3

:MAP NEW LOADER BANK IN KERNEL SPACE

BTE ORE B TT13CONFIG+2

002666

MOV RO, -(SP)

BANKMOV
NEWLOAD

POP

002536
020000

RO
LOADBANK
,R1
, RO
LOADHOME

CALL
CALL

002102

042737

PUSH
MOV
MOV

INHECC

: INVALIDATE BACKGROUND PATTERN
;MAP NEWBANK TO USER PAR
;:ENTER USER MODE
;GO TO USER MODE

CLR NEWBANK

:1MOVE PROGRAM

;ENTER KERNEL MODE
;:DEENERGIZE MEMORY MANAGEMENT

;RESTORE PREVIOUS PGM. CSR
sENERGIZE MEMORY MANAGEMENT
;MOVE 2ND WORD OF CONFIG TO RO

;CLEAR BACKGROUND VALID BIT
; INCREMENT TO NEXT BANK
;DONE?
:NO - BRANCH

MOV (SP)+.RO

CVMJABO MSV11-J MEMORY DIAG.

UNRELOCATE PROGRAM

MACRO Y05.02

10280 037350

Monday 07-Oct-85 16:57

BANKMOV:SUBTST

<<MOVE BANKS>>

s #SUBTEST

MOVE BANKS

Pege 312

SEQ 0282

188880888888 88448888888888888884008000880088808008888080400080000000000000000000
18688888088888888888808008080888088000808000840040080888808400000000000000000000

sMOVE_3/4 OF A BANK
sCALLING SEQUENCE
;RO = DESTINATION BANK

sR1 = SOURCE BANK

SAVREG
CALL
RESREG
SAVREG

037516
000011
000011

177650
i
01218% 000200
010122

el
ooogx

010022
060300
010022
060300

052737

140000

004537
020000
140000
100000

040732

177776

USERMAP

ASH
ASH
MOV
MOV
MOV
ADD
MOV
ADD
MOV
ADD
MOV
AD"

09..RO
09, .:R1
OUIPARS ,R2
0200,R3
R1,(R2)+
R3.R1
R1.(R2)+
R3.R1
RO,(R2)+
R3.RO
RO.(R2)+
R3.RO

USER

eBIT15!BIT14,PSK

8IS

.DSABL

8MOV

CRF

100000,140000,SIZE/2

JSR RS,BLOCK3

SIZE/2
140000
100000
.DSABL

CRF

sMAP 1ST HALF BANK
:BUMP BY 4K

;GO TO USER MODE
;MOV 1ST HALF BANK

CVMJABO MSV11-J MEMORY DIAG.

MOVE BANKS

MACRO Y05.02

Monday 07-Oct-85 16:57

{8,’89 037442 104417
xo;a 037444 012702 177650
010122
10 037450

KERNEL
QUIPARS ,R2
MOV
su (az»
MOV

xo"i 3143: mgx
o 7460 010022
o 7462 060300
010022

ADD
MOV
ADD
MOV

037464

u 037466

osuvo
470 052737

140000

10321 037476
037476 CO4S37 040732
ig

03
og
0

010000
140000
100000

037510 104417

104416
ugg 037512
037514 000207
10325

177776

SEQ 0283

;ENTER KERNEL MODE
sMAP 2ND m.r BANK

R
RO,(R2)+
R3.RO
RO.(R2)+
*

R3.RO

ADD

300

Page 312-1

USER

guussutuPSW

ugs

100000, 140000, SIZE/4
- RS,BLOCK3
imo! JSR
SIZE/4
140000
100000
.DSABL

KERNEL

RESREG
RETURN

CRF

;GO TO USER MODE

;MOV 3ND FOURTH OF BANK

;ENTER KERNEL MODE

CVMJABO MSV11-J MEMORY DIAG.

MOVE BANKS

MACRO Y05.02

10328 037516

10329
1
10331
1
10338

037516
037
0
0
0

10
O
10338
o3
{8
og;ggg
1
0
10339
1
0
i
O
0342
10
03
10344
10348 °§;§7‘
037576
ig
10348 037600
10349 037600
037600

10350
10351
10352
10
10354
10355
1
1
10

Page 314

SEQ 0284

USERMAP:SUBTST

<<SUBR

MAP USER TO NEW BANK>>

1sSUBTEST

SUBR

MAP USER TO NEW BANK

1886888680888886800808888088880000488508008008800488808080080888000000800000000000

012701
012702
0127035
012704
012705

ouzzi
01142
077503
013700
072027
012705
010021
062700
e%us
077505
7

177640
172340
177600
172300
000004
002310
000011
000004
000200

188688888488080088808000088888888840400880000088880080888488000000040000808000008000

MOV
MOV
MOV
MOV
MOV

SUIPARO,R1
#KIPARO.R2
@UIPDRO,R3
. R4
#KIPDRO
#4 RS

;COPY KERNEL PAR'S € PDR'S (0-3)

CR3)+ ,(R1)+
MOV
(R&),(R3).
MOV
RS.1¢
S08
, RO
NEWBANK
MOV
;BANK 1 STARTS AT 100,000 LESS 6 LSB'S
9. .RO
ASH
;FOR MEMORY MANAGEMENT = 1000
04 ,RS
MOV
1SETUP UIPAR(4-7)
RO.(R1)+
MOV
2:
4K
1BUMP ADDRESS
0200,R0
ADD
UIPDR(4-7)
sSETUP
(R4),(R3).
MOV
RS,24
s08
RETURN
<<SUBR SETUP KERNEL PAR’'S FOR NEW BANK>>
NEWKERNEL : SUBTST
02888880288888808808
14:

] $888888888888028828888888888888084888088888882888888888088888888

1 #SUBTEST

SUBR

SETUP KERNEL PAR'S FOR NEW BANK

3 2888080880888 288888880888888888848884802288088880284888888888888888888882840088808808

010046
010146

037602
oxogu
037604

037606
037612
037616
037
037
037
815
76
o!'r
0 ;ua

Monday 07-Oct-85 16:57

012700
013701
072127
012705
010
o# 01
077504

172340
002310
000011
000004
000200

012605

gusox

14:

PUSH

RO,R1,.RS

MOV
MOV
ASH
MOV
MOV
ADD
S08
POP

OKIPARO,RO
. R1
NEWBANK
9. .R1
#4,.RS
R1,(RO)+
#200,R1
RS.14
R5.R1.RO

MOV RO, -(SP)
MOV R1.-(SP)

MOV RS.-(SP)

;BANK 1 STARTS AT 100,000 LESS 6 LSB'S
:FOR MEMORY MANAGEMENT = 1000
;SETUP KIPAR(O-3)
MOV (SP)+.RS

RETURN

10359 oguu m

MOV
gg;.g
'n'
*,

13&1 037646

: SUBTST <<SUBR MAP KERNAL PARS 4 AND S TO A BANK>>
MAPKERNAL

F 284882480288888848088882888248043882823888888880828888828808888283888080080800880800000

037646

0 '82
1
1
10
037
1
1
037670
1
037674
10369 037700

' 2889882808848 888884082888888800824880040288888880820480808888888888888088000800800

1 #SUBTEST

013705

072527
013737
010537
062705
010537
000207

002102

oooog
002272
172350
172350
172352

SUBR

MOV BANK,RS

MAP KERNAL PARS 4 AND 5 TO A BANK

ASH #9.,RS
MOV KIPAR4,SAVPAR
MOV RS,KIPARS
ADD €200,RS
MOV RS,KIPARS
RETURN

sMOV BANK NUMBER TO RS

;RS ENTERS 100000 LESS SHIFT TO CREATE MAPPING
:SAVE OLD PAR
:GET NEW PAR'S
:
:
:

| CVMJUABO MSV11-J MEMORY DIAG.

_ MACRO Y05.02

| SUBR MAP KERNAL PARS 4 AND S TO A BANK
10370

NEWLOAD:SUBTST

10371 037702

0383

10386

SEQ 0285

SETUP KERNEL PAR'S FOR NEW LOADER BANK>>

;1 #SUBTEST

SUBR

SETUP KERNEL PAR'S FOR NEW LOADER BANK

F] .....‘..".‘..‘.“"...“‘..O..““...‘.O.‘....“...““‘.O.‘“‘..‘.“‘..‘.‘.‘.

0373 0377

“8‘83

<<SUBR

Pege 314-1

] ...“‘.‘.‘.‘.“.“..‘0‘.‘.“...‘.0.‘.“‘...0“‘...“‘..‘.0‘.‘.‘“...0.. 28000000

RO CONTAINS THE DESTINATION BANK

i‘mi

10374
75
#
;:

Mondey 07-Oct-85 16:57

087
0377
77

77
7726
7

037734

010146

012701

010021

172350

3ooon

000200

012601
0

037734 O 31;7 002272 172350
737 000200 002272
77
7
013737 002272 172352

037

o%oaov

PUSH

RO,R1

MOV
ASH
MOV
ADD
MOV
POP

OKIPARS ,R1
9. ,RO
RO, (R1)+
RO, (R1)+
R1.RO

MOV RO, -(SP

MOV R1,-(SP

;BANK 1 STARTS AT 100000 LESS 6 LS8'S (1000)

:SETUP KIPARS
;SETUP KIPARS

MOV (SP)+.R1
MOV (SP)+.RO

RETURN

SUBTST <<SUBR UNMAP KERNAL PAR'S 4 AND S>>
UNMAP:
] $888088888088608088882888888888882888808882888888888882888880838808880848080828800080880008
1 #SUBTEST

SUBR

KERNAL PAR’'S & AND S

] $66828888888848880800888888888888888008208808888228888888880088808820808888880088000802

MOV
ADD
MOV

RETURN

SAVPAR, KIPARS

9200, SAVPAR
SAVPAR , KIPARS

;RESTORE K1PAR4
;ADD 200 FOR NEXT PAR
;RESTORE KIPARS

MSV11-J MEMORY

DIAG.

_ MACRO Y0S.02

SUBR®CABO UNMAR WERNAL PAR'S 4 AND''S
10389 037760

Mondey 07-Oct-85 16:57

Page

SEQ 0286

316

EXBANK: SUBTST

<<SUBR

EXAMINE BANK>>

1#SUBTEST

S8R

EXAMINE BANK

.ooo.ooo0..o‘oo.t..0..000.0.000“0.00.0.o.oo-oooooooooooooooto.ooooooooooooooooo

18068888080800008 8080 0088000400000008000400000400000000000080000080000000000000

:D0ES THE FOLLOWING:

10390

:(1)
:1(2)
:1(3)
:1(4)
:(S)
1(6)

SETS uP ".N.(I'OEX" AND R1 IASED ON VALUE OF "BANK",
IS ECC.
SETS THE "MKFLAG" IF THE BANK
SETS THE "KPFLAG" IF THE BANK IS THE PROTECTED REGIOC OF ECC MEMORY,
SETS THE “"ACFLAG"” IF THE INR CAN BE ACCESSED BY THIS CPU.
IS IN PROGRAM SPACE.
SETS THE “PFLAG” IF THE BANK
VER
SETS THE “RRFLAG" IF lELNATIN IS REQUIRED TO TEST THIS BANK

103

1040

i(7)

NECESSARY FOR THE USE OF THE RECURSIVE "MODE” SUBROUTINES). THE "RRFLAG"
IS ALMAYS SET TO DISABLE TESTING IF FIELD SERVICE MODE *SELECTED BANKS”
ARE BEING TESTED AND THIS BANK IS MT SELECTED.
HOMEVER, IT COMPLEMENTS
SETS THE "BMFLAG"” IF THE BANK ISA BAD MEMORY;

10391
10393
1039
10394
10395
0 99

1039
10 z

10400

1040

(THISIé
IT COMPLEMENTS THIS FLAG IF THE RELOCATION FLAG "RLFLAG" IS SE*

THIS FLAG IF THE “MORST” FLAG IS NOT SET (THiS IS NECESSARY FOR THE USE

OF THE RECURSIVE “MODE” SUBROUTINES).
:(2) SETS THE "INT64K" FLAG IF THE BANK IS

:(8) SETS THE "INTFLAG” IF THE BANK IS INTERLEAVED.
INTERLEAVED ON “K WORD BOUNDS.

10404

10405
1

AND HAS ALREADY
:€10) SETS THE “SKIPMK"” FLAG IF THIS BANK IS INTERLEAVED,
BEEN TESTED.

;

1040

10408

10409 037760
037760
037762
037764
10410 037766
037766
037772

10411 037776

010046
010146
010246
37
37

002120
002114

RO,.R1,R2

CLEAR

MKFLAG,KPFLAG

SET

ACFLAG

CLEAR

PFLAG,RRFLAG,BMFLAG

CLEAR

INTFLAG,INT64K, SKIPMK

037776
10412 040004
040004
040010
040014
10413

012737

177777

005037
005037
005037

002122
002124
0021

0400
10414 040034
10415 040040
10416 040042
10417 040044

37
37

002136
002140

37 002
013701 002102
006301
0“!0%
Ogg;! 002104

MOV
ASL
ASL
MOV

BANK ,.R1
R1

10419
10420

00140

BEQ
SET

is
KPFLAG

10418

10421

10422 040072
040072
040076

040100
040104

10423 040106
10424 040112

040112

002116

PUSH

032761

000100 002664

012737
712700

177777
000002

030037
001405

002106

030061

002664

005037

002116

001002

002114

R1,BANKINDEX

BIT

o81T6,CONFIG(R1)

MOV

#BIT1,RO

RO, -(SP)
MOV R1,-(SP)
MOV R2,-(SP)
CLR
CLR

MKFLAG
KPFLAG

MOV

@-1.ACFLAG

CLR
CLR
CLR

PFLAG
RRFLAG
BMFLAG

CLR
CLR
CLR

INTFLAG
INT64K
SKIPMK

:R1 <- R1 » &4

s:PROTECTED REGION OF ECC MEMORY?

:NO - SKIP

1F RO SET.IN CPUBIT AND RO OFF .IN CONFIG(R1)

MOV

@-1,.KPFLAG

BIT RO,CPUBIT
BEQ L364

BIT RO,CONFIG(R1)

ACFLAG
CLR
END ;OF IF RO

BNE L364

L364:;::::::

DIAG.

MACRO Y05.02

002116

012737
012737
737

001402
37
032761
001403
0

737
737

sits
137
040272

10451 040302
040302

040302
10452
10453 040310
10454 040312
040312

10455 040320

10456 0‘03%
10457 0403

040330
10458 040336
10459 040344
10460 040346
040346
10461 040354
040354
040356
040360
10462 040362

ACFLAG

SWAB

002666

177770

8IC

002130

177777
00020v

002120
002664

177777
177777

002122
002124

002126

24:

002124
000001

177777

002600

Ss:
64:

002002

012737

177777

032761
001421

010000

012737
032761
001403

177777

;ISOLATE MEM TYPE BITS

.xs THIS AN ILLEGAL MEM TYPE?
Sé BRANCH IF NOT
:SET BAD BANK FLAG
;JUMP OVER REST OF FLAG TESTS
;1S THERE ECC THERE?
iNO - SKIP
iYES - SET MKFLAG
MOV
@-1.MKFLAG
:BANK= PROGRAM SPACE?
iNO - SKIP

ST
BEQ
COM
BIT
BEQ

RLFLAG
64
RRFLAG
#81T0,CONFIG(R1)
8

IS nomm RELOCATED?
iNO - SKIP
;YES - COMPLEMENT RELOCATION REQUIRED FLAG
.emoas PRESENT IN THIS BANK?
iNO - SKIP

uoasr

;IS THIS A WORST FIRST PASS?

BNE
CoM

002130

sACTIVE MEMORY?

:BRANCH IF NOT

24
CONFIG+2(R1),R2
otC7,R2

SEQ 0287

az.oi
uruc
NE XBK
nxn.cwm.z(an
38
MKFLAG
#8IT7,CONFIG(R1)
S$
PFLAG,RRFLAG

SET

002130

Page 316-1

cHP
SET
JMP
BIT
BEQ
SET
BIT
8EQ
SET

BLE

177777
040354
000400

005737
001407
032761
001003

BMFLAG

anrAG

IF SELONLY IS TRUE AND BIT14 OFF

000040

012737

177777

@-1.PFLAG
@-1.RRFLAG

MOV

©-1,BMFLAG

.IN CONFIG+2(R1)

TST SELONLY

BEQ L365
BIT #BIT14,CONFIG.2(R1)
SET

MOV

L“S:iu

:IS THIS BANK INTERLEAVED?

SET

#81712,CONFIG+2(R1)
ENEXBK
INTFLAG

BIT

“ITII CONFIG+2(R1)

SET

INT“K

BIT

#8IT5,CONFIG(R1)
ENEXBK
SKIPMK

:SHOULD THIS BANK BE TESTED?
;BRANCH IF IT SHOULD

R2,R1.RO

;RESTORE REGISTERS

BIT

10%:

BNE L365

RRFLAG

END ;OF IF SELONLY

004000

177777

MOV
MOV

.ves SKIP
; - COMPLEMEN: BAD MEMORY FLAG

040000

012737
032761
001403

012602
012601
012600
000207

8EQ
MOV

000003

10‘10‘01

Monday 07-0Oct-85 16:57

SET

ENEXBK : POP

RETURN

iBRANCH IF IT IS NOT

MOV_

@-1,INTFLAG

;IS THIS BANK INTERLEAVED WITH 64K BOARDS?
:BRANCH IF IT IS NO

MOV

@-1,SKIPMK

MOV (SP).
. R2
MOV (SP).,.R1
MOV (SP)+.RO

CVMJABO MSV11-J MEMORY DIAG.
EXAMINE BANK
SUBR

MACRO Y05.02

Monday 07-0Oct-85 16:57

BANKOK:

10465 040364

SUBTST

Page 318

<<SUBR

BANK OK?>>

SUBR

BANK OK?

SEQ 0283

18688880880 8808880800000000800008000080080000000000080000080080000000000000000000

1 ¢SUBTEST

18888000000 8804080080000008004000040080000000400000000808800880080000000000000000

;TEST TO INSURE THAT THE TYPE OF MEMORY IN THE PRESENT BANK

;IS OF THE TYPE WE ARE TESTING “TMFLAG".
013700
005100
013701
074001
000207

;

;RESULT IS RETURNED IN THE CONDITION CODES (OK = (=0)).

MOV
comM
MOV
XOR
RETURN

002134
002120

INCRPT:

INCPAT: SUBTST

TMFLAG,RO
RO
MKFLAG,R1
RO,R1

<<SUBR

10K = (=0K)

INCREMENT PATTERN TESTING >>

|.........‘.....‘.‘...‘....‘..‘.‘.““‘.....‘..“......‘...........“‘.........‘

| eSUBTEST

SUBR | INCREMENT PATTERN TESTING

l.......‘....‘...‘.‘.‘.....‘........‘.‘.....‘.“..‘...‘................‘..‘.....

S INCREMENT THE PATTERN & SET UP THE CONDITION CODES

10481 040414
10‘.;
10483 040416
10484 040416

005237
022737
000207

002112
000030

RESULT - 2 BIT SET INDICATES OVERFLOM

PATTERN
NG
©30.PATTERN
CMP
RETURN

002112

SETPAT:

HIPAT:

SUBTST

INOT EQUAL TO ZERO IS GOOD (NO OVERFLOW)

<<SUBR

S"T HIGHEST PATTERN TESTING TYPE>>

SUBR

SET HIGHEST PATTERN TESTING TYPE

188088008848000008880884800ut008000808000800080008480800088808484400080088080800800080000

;#SUBTEST
10485 040416
10486 040424

4SET UP CONDITION CODES

012737
000207

000027

002112

10488 040426

10880008808 0000868480008008840000800000088048808084808884440084088080488000808000000

MOV

RETURN

027 ,PATTERN

:SET HIGHEST PATTERN

INCBNK: SUBTST

«<<SUBR

INCREMENT BANK & TEST»>

;1 sSUBTEST

SUBR

INCREMENT BANK & TEST

190888888888888442888888888%082800888888808880888800888028808822808000800000000000s
188880 288888808030888088898888800888808800880080008000880080800888080800000000000000

005237
023737
000207

002102

002556

1550.75 RETURNED IN CONDITION CODES

002102

cHP

RETURN

BANK

LASTBANK , BANK

;T00 FAR?

CVMJABO MSV11-J MEMORY DIAG.

INCREMENT BANK & TEST

SUBR

MACRO Y05.02
QUIT:

10495 040442

Monday 07-Oct-85 16:57
SUBTST

Page 320

SEQ 0289

«<<QUIT ROUTINE>>

'.“.‘.“‘...“.‘.‘.‘...“.‘...“.“...‘.‘.“““.‘..‘...‘.....‘..‘.“....0...0.

QUIT ROUTINE

1 #SUBTEST

|.‘...‘........‘..“...‘.“‘.“.0.".‘....‘...‘.‘..““““‘....“...‘.“‘.‘....

040442 104472
lagé 040444
10503

7 040472

s e e

e s e

040444

10
0511 040510

0512

012737

;INITIALIZE ALL CSR'S
1UNRELOCATE IF NECESSARY
sFLUSH OUT ANY DBE'S
;:TURN OFF MEMORY MANAGEMENT
;TURN OFF THE Q-BUS MAP
HALT

ECCINIT

040506

005737
001402
004737

002126

C04737
104421
005737
001003

022066

042737
000005
000000

SETA
MOV

000004

.DSABL

eQUITL
oQUIT1.4

,TRAP ON DOUBLE BIT ERRORS (NORMAL)

CRF

IF RLFLAG IS TRUE THEN $CALL UNRELOCATE

037122

CALL
MT0030
DEENERGIZE
TST
m%%lf

002454
000040

,TRAPS TO 4 GOTO QUIT1

172516

QUITL:

8IC

eBITS,MMR3

TST RLFLAG

BEQ L366
JSR PC,UNRELOCATE
L366:3533333

;FLUSH OUT DBE'S
: TURN OFF MEMORY MANAGEMENT
;IS THIS AN 11/83,11/23-B OR 11/237?

;TURN OFF THE Q-BUS MAP

CVMJABO MSV11-J MEMORY DIAG.

QUIT ROUTINE

MACRO Y05.02

Monday 07-Oct-85 16:57

EXIT:

10515 040512

SUBTST

040532;3
10519

<<HALT PROGRAM>>

HALT PROGRAM

004737

040544

005737
001003
005737
001402

002352

(8888884884840 088 8080080800000 000040000R0RRRRARSRRRR000R0RR0000R000000000000000

EXIT2:

TST APTFLAG
BNE L367

TST ACTFLAG

BEQ L370

L367:::5333

B8R
ELSE

000403
000000
000137

CALL
SHUTUP
IF APTFLAG IS TRUE OR ACTFLAG IS TRUE

002350

000777

040534
040536

SEQ 0290

;8688888884888 08088800040884000008004840800000040040000R00000000000000000000000

:1sSUBTEST

10516 040512
10517 040 i:

Pege 322

HALT

$EXHALT:

003670

BR L371

JMP

L370::53333

START

END ;OF IF APTFLAG

L371:533333

SHUTUP: SUBTST

<<SHUTDOWN DIAGNOSTIC>>

;#SUBTEST

SHUTDOWN DIAGNOSTIC

;888

ERARRARRRRRREERR AR RAEEASRAARARER02R04E404020088880484488888088000

(00 AR0RR0ARREEEA0RARRARAEAA0ARRARARSREAERRAERE4S40880440888484408808084848

sINITIALIZE ALL CSR'S
s UNRELOCATE
;FLUSH OUT DBE'S
sRESTORE LOADERS
;TURN OFF MEMORY MANAGEMENT
;UNMAP THE Q-BUS MAP
ECCINIT
:TRAP ON DOUBLE BIT ERRORS (NORMAL)
IF RLFLAG IS TRUE THEN $CALL UNRELOCATE

002126
037122

IF QUICK IS FALSE

002436

CALL

022066

000001
002576
037350

0V0040

;0OF IF QUICK

MTO0030

;FLUSH OUT DBE'S

MOV

#1,RO

sDESTINATION BANK

CALL

002454

172516

1$:

TST QUICK

END

MOV

LOADHOME ,R1
BANKMOV

DEENERGIZE
TST
NO22BIT
1
BNE
#BITS,MMR3
BIC
RETURN

TST RLFLAG

BEQ L372
JSR PC,UNRELOCATE
L372::53333
BNE L373
L373:::3:33:

:SOURCE BANK

; TURN OFF MEMORY MANAGEMENT
;:DOES THIS PDP-11 HAVE 22-BIT ADDR?
;BRANCH IF NOT
;:TURN OFF Q-BUS MAP

APTDOWN:SUBTST

<<APT SHUTDOWN SEQUENCE>>

:#SUBTEST

APT SHUTDOWN SEQUENCE

4
80000000088
R000
840080088808080
EERE
0020 ARERRARE0004000
;280808 RSARERRASAAS
(840K AAARSES RS RAELRARARARAAEAARAR420004004800800800004088488880080000000

010346

MAP

:MAP SUPERVISOR SPACE (TEST AREA) TO BANK &0
MOV R3,-(SP)

CVMJABO MSV11-J MEMORY DIAG.
TOOWN SEQUENCE

MACRO Y05.02

MOV
CALL
.DSABL

000000
035604

040630
040634

012703
004737

040640

012603

040642

053737

002552

177776

10554 040650
10555 040656
10556 040664
10557 040672
10558 040674

012737
012737
012737

040626
000340
000000

060024
060026
120626

10553 040642

104417

000000

Monday 07-Oct-85 16:57

TESTAREA

Page 322-1

SEQ 0291

00,R3

MAPPER

CRF

;ENTER TEST MODE

TESTMODE ,PSW
CRF
OAPTDOWN,FIRST+24
#340,FIRST+26

#0,FIRST+APTDOWN

MOV (SP)+,R3

+GO TO SYSTEM TEST MODE

;ENTER KERNEL MODE

e e

)

CVMJABO MSV11-J MEMORY DIAG.

SEQUENCE
APT SHUTDOWN

MACRO Y05.02

Monday 07-Oct-85 16:57

SUBTST

10561 040676

Page 324

SEQ 0292

«<<BLOCK MOVE SUBROUTINE>>

1888848808488 8488808880808800800800800000000008000000R 00R0RRAIRRNRRRRRARRRARSS

;#SUBTEST

BLOCK MOVE SUBROUTINE

188888888 048808854848008 0888008080080 0880000R00RR0RRRRRRARRRRR00RRRRERRRRRRSS

;BLOCK3 HAS 3 ARGUEMENTS
2 ARGUEMENTS
:BLOCK2 HAS
1 ARGUEMENTS
;:BLOCK1 HAS

$O“§
1056
lgg:l

10565

040676
040700
040702
10“9 040704
70 040710
71 040714

010046
010146
010246
012702
012701

000413

.ENABL
BLOCK1: PUSH

177640

000020

040720
040722
10574 040724

10575 040730

18377 040732
040732
040734
040736

1837. 040740
79 0‘0742
1
040746
1
10583 040750
10584 040752
040752
040754
040756

10585 040760
10586

010146
010246
012701

000404

010046
010146
010246

012501
012502
012500
012022
077102
012602
012601
012600

000205

MOV

#FASTCITY,R2

MOV

BLOCK2: PUSH

O‘O?lfi C10046
1057‘ 040716

MOV

000020

BLOCK3: PUSH
28:
3s:

1s:

LSB
RO,R1.R2

MOV RO, -(SP)
MOV R1,-(SP)
MOV R2,-(SP)

€16..R1

RO,R1,R2
#16. ,R1

MOV RO, -(SP)
MOV R1,-(SP)
MOV R2,-(SP)

RO,R1,R2

MOV
MOV
MOV
MOV
S08
POP

(RS)+.R1
(RS)+,.R2
C(RS)+,RO
(RO)+,(R2)
R1,1$
R2,.R1,RO

RTS
.DSABL

RS
LSB

MOV RO, -(SP)
MOV R1,-(SP)
MOV R2,-(SP)

MOV (SP)+,.R2
MOV (SP)+.R1
MOV (SP)+,.RO

1
10568 040676

;ALL ARE CALLED BY THE BMOV MACRO

CVMJABO MSV11-J MEMORY DIAG.
MODE
FIELD SERVICE

MACRO Y05.02

.SBTTL

iosu’

10591 040762

SAVREG

104415
066166

10594 040770
040770
040774
040776

005737
001003
005737

002126

ouooz 001404
041004
10595 ouoon
041004

104401

10596 041010
10597 041012

104416
000207

041014
10599 041014

005737

041014

10600 041020 001402
10601 041022
041022
10602 041026

041

041032

013746

041040
10605 041046

041046

TYPE

TYPEIT

10612 041072

041072
041074
041076

TYPE MSGO48

TYPEIT

.DSABL

10613 041102
10614 041104
10615 041106
10616 041110
10617 041112
10618 041114
10619 041116

:NOT AVAILABLE NOW - TRY LATER!

CRF

END ;OF IF RLFLAG
002544

18:

104401

067057

002006

PUSH

CONTRL

:SAVE CACHE STATUS

PUSH

CSRNO,.KAMIKAZE

;SAVE CSR & KAMIKAZE STATUS

TYPE

MSGO26

RDDEC
POP
cHP

RO
.
RO, #18.

r;;e&

BLOS
TYPE
TYPEIT

101403

066207

.DSABL

1s:

041150

CACHKN

CACHOFF
KAMIKAZE
SET
FS1:

L37S:5:5:33

TST

BEQ

177746

177777

041160
041262
041372
041540
042014
042334
043252

,MSGO48

L374::5::33

uesnes
RETURN

012737

010046
006316
004737

TST RLFLAG
BNE L374
TST NOF SMODE

BEQ L375

067627

002006

10611 041070 000766

;FIELD SERVICE CCMMAND MODE

002426

013746

104401

,MSGO20

IF RLFLAG IS TRUE OR NOFSMODE IS TRUE

10606 041052 104414
10607 041054
041054 012600
10608 041056 020027 000022
10609 041062
10610 041064
041064

MSGO20

.DSABL CRF

013746 002152

10603 041036 104424
10604 041040

FIELD SERVICE COMMAND MODE

|““““..O..‘.“‘.“.."..‘.““.‘.‘."..‘..‘“..‘.‘.“‘...‘...‘..“‘...‘.“‘.

104401

SEQ 0293

FIELD SERVICE MODE

SUBR

1 #SUBTEST

040764

Page 325

<<SUBR FIELD SERVICE COMMAND MODE>>
: SUBTST
FIELDSERVICE
;.‘.‘...“.‘...‘..".0‘..‘..“.‘..“.‘...“.“...“.‘.0..“‘0““‘.““‘.....‘..

xos!9o' 040762
10592 040764

Monday 07-Oct-85 16:57

B8R

CASE RO

é”nscozs

;TURN CACHE OFF
; COMMAND:

1READ A oecxm NUMBER
;COMMAND -->

MOV CONTRL,-(SP)

MOV CSRNO, -(SP)

MOV KAMIKAZE,-(SF)

MOV

@-1,KAMTXAZE

MOV (SP)+.RO

18
MSGO21
,MSGO21

CRF

FS1

FSCMDO
FSCMD1
FSCMD2
FSCMD3
FSCMD4
FSCMDS
FSCMD6

;EXIT FIELD SERVICE COMMANDS
;READ CSR
;LOAD CSR
;EXAMINE MEMORY
:MODIFY MEMORY
1SELECT BANK & PATTERN
;TYPE CONFIGURATION MAP

MOV RO, -(SP)
ASL @sP
JSR PC,L376

MACRO Y05.02
FIELD SERVICE COMMAND MODE

CVMJABO MSVil -J MEMORY DIAG.

10620 041120
1
041122
041124
1

1062

0‘11;3

“118

10624 0411

1
10627
1
1
10630

0411
041136
041140
041142
041144

10632

041150
0411;8

I.“gs 041146

043260
043552
044000

Monday 07-Oct-85 16:57

1S0B-A-LONG TEST

FSCMD7
FSCMD8
FSCMD9
FCMD10
FCMD11
FCMD12
FCMD13

SUMMARY
RROR
;ERROR

F
18
END ;0F CASE

0411

“lla
0411

10633 041156

Page 325-1

FS1

1REFRESH TEST
1SET FILL COUNT
;ENTER KAMIKAZE MODE
;EXIT KAMIKAZE MODE
1TURN CACHE OFF
:TURN CACHE ON
;s TEST ONLY SELECTED BANKS
sRESUME TESTING ALL BANKS
;ENABLE TRACE
1DISABLE TRACE

SEQ 0294

CVMJABO MSV1
SUBR

F IEL%SEIWI

MCROYOSOZ’
COMMAND MODE

Y DIAG.

Monday 07-Oct-85 16:57

Page 327

SEQ 0295

FSCMDO: SUBTST
EXIT>>
<<COMMAND 0
|.‘.."..“‘.‘.‘““........0‘.“..‘.“.‘.“.“‘.....“..‘.“‘.....“..0‘0‘..‘0‘

10636 041160

1 #SUBTEST

COMMAND 0

EXIT

MSG103
,MSG103
CRF

;LEAVING FIELD SERVICE MODE

i i g

333R2222222222222222222
22
72
SuuRi
HEEERRRRRRES
&:aa33% 3g

(8884488888888 804848808800 480 8008088848488

070605

et et et e
b e bt e
~~~

CLR
ADD

000002
002010

ELSE

POP

002006

002544

TST SKIPFAMI

BEQ L377

; THROW AWAY OLD KAMIKAZE FLAG

imnx

L377:333333

CSRNO

TST

CACHKN

MOV (SP)+ ,KAMIKAZE

L400:;:3333

MOV (SP)+,CSRNO

RESO

sIF CACHE IS OFF

IF CACHKN EQ CACHKF

002550

ADD

ELSE

002544
177746

: THROW AWAY CACHE STATUS

BR L4402

CACH(N

POP

CONTRL

LA01:;::::::

;RESTORE CACHE STATUS

END ;0F IF CACHKN
RESO:

CMP CACHKN, CACHKF

BNE L401

@2.SP

TS7T

BEQ

L400

JRESTORE OLD KAMIKAZE FLAG

KAMIKAZE

POP
BEQ

000002

10653 041252

02,5P

END ;OF IF SKIPKAMI

002152
002544

5 i

10645

080400400008 88008088008000000800000000

IF SKIPKAMI IS TRUE

002010

>220000

10643

ADD

000002

04
10638
10639

10642

TYPE
TYPEIT
.DSABL

MOV (SP)+,CONTRL

L&802:;::5:3:

RESREG
RETURN

<<FS
READ CSR>>
1
SUBTST
COMMAND
(8 8 8 0 8 8 8 0884888084800408808848488008848840840088840880008888448888828888080000

FSCHMD1:

;1 #SUBTEST

1
COMMAND

READ CSR

188088848080 08008000080850400000000008888000088080048008080000080000008000000000

10659 041262
10660 041266

004737
010637

044576
002306

041272

012737

041336

041300
041302

104426

1
10663
10664

10665

SE22ER
KRSk

t“‘l 041272

177777

012737

034002
000005

001002

.DSABL

READCSR

012737
104026

022737

CALL

MOV
SET4
MOV
002430

WHICHCSR

SP, FSSTICK
ORESL
ORES1.4

;TRAPS TO 4 GOTO RES1

CRF

SET

NOERROR

ERROR

+26

sUSE_ERROR ROUTINE FOR PRINTOUT

MOV
cHP
BNE

@TIMEOUT. 4
#5,PROTYP
101¢

;IS THIS AN 11/83/84 ?
;BRANCH IF NOT

RES4

IRESET TRAPS TO 4 TO DEFAULT

MOV

@-1,NOERROR

CVMJABO MSV11-J MEMORY DIAG.

COMMAND 1

SEREEEE ggv
(=]

w
~

10668
10669

10666
10667

133333333

005037

READ C

MACRO Y05.02

177766

101¢4:

104401

067033

013706

002306

s
001002

034002
000005

000207

CLR

CPUERR

CRF

000207

005037

Monday 07-Oct-85 16:57

177766

RES1:

MSGO25
MSGO025
RF
FSSTACK, SP

OTIMEOUT,.4

004064

101%:

#5,PROTYP
1014
CPUERR

CRF

Page 327-1

SEQ 029%¢

;CLEAR OUT THE CPU ERROR REGISTER BITS

s THAT A EXPECTED TRAP COULD HAVE SET
; THIS CSR DOES NOT EXIST
sRESET TRAPS TO 4 TO DEFAULT
;IS THIS AN 11/83/84 ?
1BRANCH IF NOT
sCLEAR OUT THE CPU ERROR REGISTER BITS
;THAT A EXPECTED TRAP COULD HAVE SET

———

CVMJABO MSV11-J mv DIAG.

|
l

READ CSR

COMMAND 1

| FS

Monday 07-Oct-85 16:57

MACRO Y05.02

FSCMD2: SUBTST

10673 041372

1 #SUBTEST

004737

10677 041410

104426

044576

041

10683 041454
10684 0414

“i
10685 041462

mag

oauu

10688 041472
1

041472

041

041
10690
10691 041

041

CRF

TYPE

15026

ERROR
RES4

ss:rl - NOERROR

012737 034002 000004

177766

104401

002150

104401

067106

012737

177777

104426

CPUERR

.DSABL

CRF

ém_nsu:ozs

READCSR

1010

TYP

ERROR ROUTINE FOR PRINTOUT
;USE
IRESET TRAPS TO 4 TO DEFAULT

RES2:

;CLEAR OUT THE CPU ERROR REGISTER BITS
;THAT A EXPECTED TRAP COULD HAVE SET

MSGO23

;FIRST CSR WORD

CSR

;READ AN OCTAL NUMBER
:PUT IN IN LOC "CSR*

+26

;USE FOR PRINTOUT - NOT AN ERROR

MSGO2S

;THIS CSR DOES NOT EXIST

CRF

NOERROR

TYPEIT En.'.coas

nov“ o FSSTACK,SP

RES4
MOV
cHe
BNE
:

MOV (SP)+.CSR

ERROR

RETURN
TYPE

4
OTIMEOUT,
#5,PROTYP
1014

CLR

CPUERR

.DSABL

CRF

RETURN

#-1,NOERROR

;IS THIS AN 11/83/84 7
;BRANCH IF NOT

MSGO28
,MSGO28

SET

002430

MOV

TYPE
TYPEIT

.DSABL

041514 012737 034002 000004
333131 000005 004064
“i
oo;
04
000207

;TRAPS TO 4 GOTO RES2

LOADCSR

104401 067033

177766

CLR

RDOCT
POP

ai”‘ oo&os

omtour

TYPE

104413

+26

MOV

cHP
BNE

067017

012637
104425

LOAD CSR

MSGO27

TYPEIT é.ngcozv

041510 013706 002306
10692
10693 041514

10694 041536

.DSABL

SP,FSSTACK
ORES2.4
ORES2

104401 067071

aim oo&os
041450

WMICHCSR

READCSR

022737 000005 004064
041434
041442 01002

10682 ouogg

COMMAND 2

CALL

MOV
SET4
MOV

10679 041416
041416 012737 177777 002430
110681 041
041

LOAD CSR>>

]...‘..“..‘...‘.O“....."..“‘....‘.0‘..“........‘..‘..‘“...‘0‘.‘0‘.“‘...“

10675 041376 010637 002306
10676 ou:gg
012737 041504 000004
041
041412

COMMAND 2

<<FS

SEQ 0297

'..‘“‘..‘.“.‘.‘...““‘.0‘.“....‘...‘O....“‘.‘..“.‘....‘.‘0‘.‘.00..0.‘.0‘.0

10674 041372

10678 uxog

Page 329

MOV

;RESET TRAPS TO 4 TO DEFAULT
;IS THIS AN 11/83/84 ?
;BRANCH IF NOT

@-1,NOERROR

;CLEAR OUT THE CPU ERROR REGISTER BITS

;THAT A EXPECTED TRAP COULD MAVE SET

VMJUABO

MSV11-J

oAb CsRMACRO

MEMORY DIAG.

COMAND 2

Y0S.02

10697 041540

10698 041540

o4
10699 041
10700 04

Page

- 331

FSCMDS: SUBTST

<<FS

COMMAND 3

s SUBTEST

COMMAND 3

SEQ 0298

EXAMINE MEMORY>>

]‘.0.0..“‘.‘.‘.‘.‘.....“‘.“..0.“...‘.‘.O.‘.‘.O..‘...‘.‘.‘.0.‘..‘.“...“.‘..

EXAMINE MEMORY

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

013746

PUSH

013746 000004
012737 000002 002076
104401 067122

16:
oug‘rs 104401 067161
10701 041572
3
041576 sm
xova
13737 056216 002102
107
10704

Monday 07-Oct-85 16:57

BANK,NOPAR,PARTHERE ,4

02, NOPAR
MOV
MSG029
TYPE
TYPEIT !nscoa

"PE“. MSGO31
aooc“T"' $HIOCT , BANK
MOV
TYPEIT Ensc;o.'.x

POP

MOV BANK,- J

MOV NOPAR, -

;INDICATE PARITY ACTION
1EXAMINE MEMORY

sPUT LSB'S xn RO

fig
'+
000341 52102
fifig7 002102 002556

cLe
ROL
=
e
86T

BANK
o

BANK,LASTBANK
14

FOR
;CHECK
1BRANCH IF

107

012737 041734 000004

oV e

SETA

#44

{TRAPS TO 4

700 060000
000001
157776
101347
7 041726 002304

”

10719 04

feres 'él7
7

HAP

BANK

:
TESTAREA
| LESTMODE.Psu

012603

714

#FIRST,RO
#8170.R0
LOLAST
Ao
14
$30 PARTHERE

BANK ,R3
MOV
CALL m’éaw

102
0 fi!7 095804
Eurs oit

10720 gfi%fi 053737 002552

ADD
8IT
c
o
8HI
MOV

8IS

177776

oa‘oo;
10441

(RO).R1

TYPOCS

MOV

R, -(SP)

%
'5 041724
18

MOV (SP)+.RO

100 HIGH

ICHECK FOR 000 ADDRESS
SS OVER 16K
JCHECK
1OHECKFOR
ADORESS
16K
IF OVER
;BRANCH
;INCASE OF ASORTS48
GOTO

IMAP SUPERVISOR SPACE (TEST AREA) TO BANK

MOV (SP)+.RS

{ENTER TEST MODE GO TO SYSTEM TEST MODE *
JENTER KERNEL MODE

""?#& "'rk"‘n?c'}x
fl"’!

000410

o4173¢ 10ee01 067221

TYPE1r |ReGos2

MOV 4,-(SP)

,-(SP)

{PHYSICAL ADDRESS (0-17775776)77
ocm. NUMBER ONTO STACK & $HIOCT
+READ
sPUT MSB'S IN BANK

10708
100
7
07

107
107
07’
107
07

MOV PAR

o i

MEMORY

OXkine

&YY”.“

Monday 07-0Oct-85 16:57
.DSABL
BR

10727 041732

10728

43:

062706
067240

04 ,5P

JFIX STACK

; TIMEOUT TRAP

MSGO33

3387

002076
002102

060665
10736 042012

SEQ 0299

.MSGO33

CRF
EXCMD3

EXCMD3:

177766

Peage 331-1

CRF
EXCMD3

£SO ComAnD

101%:

CLR
.DSABL
RETURN

;ENTER KERNEL MODE

4,PARTHERE ,NOPAR , BANK

OTIMEOUT,4

;RESET TRAPS TO 4 TO DEFAULT

MOV
MOV
MOV
MOV

(SP)+.4
(SP)+.PARTHERE
(SP)+.NOPAR
(SP)+.BANK

05 ,PROTYP
1014
CPUERR

;IS THIS AN 11/83/84 ?
:BRANCH IF NOT
;CLEAR OUT THE CPU ERROR REGISTER BITS

;THAT A EXPECTED TRAP COULD MAVE SET

;gn.ullo cflaVli-g PSQMV Dg%‘ wvvos.oz

10739 042014
10740 042014

042014

FSCMD4: SUBTST

«<«<FS

COMMAND 4

MODIFY MEMORY>>

;sSUBTEST

COMMAND 4

MODIFY MEMORY

..“.‘..‘.‘......“..‘....‘..‘......‘.“..‘.“‘..“‘...‘.“.......“.‘..........

013746

PUSH

002102

002076
002304
000004
000003 002076
067346

18:
042046 104401 067161
10743 042046
104413
10744
013737 056216 002102
10745
€12600

1073 m 006137 002102
100
100
106

023737
003357

002102

032700

000001

020027

157776

10753 042110 062700 060000

10754 042114

042114

10755

xo;gg

042

130

136

001352
101347

10753 042144
042144 010346
042146 013703

042204

042152 004737 03

10759

10760

042156
042160

012603
104511

162

053737

042162

042170 011001
10761
1oug

002556

042176

104401

POP

ROL

BANK

ADD

oF IRST RO

IF RO MI OLAST THEN GOTO 1$

SETa

000004

102

938 , PARTHERE
04$

ng;‘

c'# .4

MAP
MoV

BANK
BANK,R3

.DSABL

CRF

CALL

TESTAREA

ogs

177776

zs's_vmo:.rsu

MOV (SP)+.RO

;CHECK FOR BANK TOO HIGH
CMP BANK ,LASTBANK
8GT 18

TYPE

MSGO32

.DSABL

CRF

TYPEIT

BIT e8ITO.RO

BNE 14

:CHECK FOR ADDRESS OVER 16K
CMP RO, OLAST
BHI 18

OF ABORTS

& GOTO 43
;TRAPS TOINCASE

;MAP SUPERVISOR SPACE (TEST
AREA) TO BANK
MOV RS, -(SP)

;ENTER TEST MODE

MOV (SP)+.R3
;GO TO SYSTEM TEST MODE

e (RO),R1
MOV
;GETTING HERE MEANS WE GOT LUCKY - NO TRAPS

KERNEL
S
BR
067221

MOV 4, -(SP)

MAPPER

INVALIDATE

002552

;PUT
;PUT LSB'S IN RO

MOV

MOV NOPAR, -(SP)
, -(SP)
MOV PARTHERE

sPHYSICAL ADDRESS (0-17775776)7?
ONTO STACK & SHIOCT
OCTAL INNUMBER
;PEADMSB'S
BANK

IF @BITO SET.IN RO THEN GOTO 1% ;CHMECK FOR ODD ADDRESS

10763 042172 104417
}g;:; 042174 000410
10766 042176

rm“" MSGO31
é.n;f_.con
aoocst"' SHIOCT , BANK
MOV
T;’EIT

MOV BANK, -(SP)

;INDICATE PARITY ACTION
sMODIFY MEMORY

IF BANK GT LASTBANK THEN GOTO 1%

012737 042176 002304
012737

E
BANK,NOPAR,PARTHER,4

#3,NOPAR
MOV
MSGO36
TYPE
TYPEIT &'p’““

cLe
ROR

aogo 042074 000241
76 006000
10751

10782

Page 333

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

013746
013746
013746
012737
1013
10742 042042
042042 104401

10746

Mondey 07-Oct-85 16:57

,MSGOS2

{ENTER KERNEL MODE

;PARITY ABORT

CW“O MSV1l-J "MY DIAG.

MACRO Y05.02

MODIFY MEMORY

COMMAND 4

{g;:: 042202 000431
10769 042204 062706 000004
10770 042210
042210

104401

067240

umf o‘zgu
042216

104401

067365

{g;;x 042214 000424

as:

S$:

042230

006
000

104401

104413
042234
10776
042236
10777
36

012601

0422640

053737

10778 042240

104401

10785 042266

104417

012637
012637
012637

10786 042270

002552

304

000207

6
©

IYPE

MSGO39

;0LD DATA WAS

R1,-(SP)
CRF

sPRINT IT

::SAVE Ri FOR TYPEOUT
:1GO TrPE--OCTAL ASCII

;3 TYPE 6 DIGITS
: 1SUPPRESS LEADING ZEROS
;INPUT NEW DATA

ézfscoss

;READ ON OCTAL NUMBER ONTO THE STACK

:GET NEW NUMBER
;ENTER TEST MODE

R1,(RO)
MOV
(RO),R1
MOV
KERNEL

sPUT IT IN MEMORY
éaeno IT AGAIN
;ENTER KERNEL MODE

g.gmooe.vsu

TYPE

MSGO38

.DSABL

CRF

MOV
TYPOS

R1.-(SP)

.DSABL

CRF

POP

JEXIT

R1
POP
TESTAREA

EXCMD4: KERNEL

sg 005037 177766

CRF

.BYTE
BYTE

BYTE
BYTE

002304
002076
002102

;TIMEOUT TRAP

EXCMDA
R1

TYPOCS

012737 034002 000004
mgz: 022737 000005 004064
001002

10788 042332

.DSABL

SEQ 0301

JEXTT
JFIX STACK

CRF

1YPOCS

TYPEIT

067404

MSGO33

Pege 333-1

MSGO37
TYPE
,MSGO37
TYPEIT

a‘x’gm

177776

70 oxg 7 000004

xo'm

B8R

m:ooc!rIL

042260 oxoug
042262 10440

006
000

,MSGO33

t;v:xr

067422

10783 042260

042264
042265

TYPEIT

TYPE

.DSABL

10779 042246 010110
10780 042250 011001
104417
10781
10782 042

EXCMD4
04SP

MOV
TYPOS

010146
042224 104403

10775 042230

B8R
ADD

.DSABL

10774 m

gggt
7

Monday 07-Oct-85 16:57

6
O

{PRINT IT

;sSAVE R1 FOR TYPEOUT
::G0 TYPE--OCTAL ASCII

::TYPE 6 DIGITS
: 1SUPPRESS LEADING ZEROS
;ENTER KERNEL MODE

4
#TIMEOUT
05 ,PROTYP
101$

.DSABL

CRF

RETURN

;:DATA IS NOW

, BANK
HERE
, NOPAR
4 ,PART

RES4
MOV
cHP
BNE

CLR

;GO TO SYSTEM TEST MODE

,MSGO38

MOV (SP)+.R1

CPUERR

;RESET TRAPS TO 4 TO DEFAULT

MOV (SP)..4

MOV (SP)+.PARTHERE
MOV (SP).+.NOPAR
MOV (SP)+.BANK

;IS THIS AN 11/83/84 ?
:BRANCH IF NOT
;CLEAR OUT THE CPU ERROR REGISTER BITS
;THAT A EXPECTED TRAP COULD HAVE SET

MACRO Y05.02
C VMJABO MSV1l- J MEMORY DIAG.
MODIFY MEMORY
COMMAND 4

10791 042334

FSCMDS: SUBTST

<<FS

COMMAND S

1 #SUBTEST

COMMAND S

PUSH

TYPE

TYPEIT

067444

104401

18:

067142

012637

002102

023737
003367

002102

013701
006301
006301

002102

033761

002106

104401

067470

001003

SP,FSSTACK
MSGO40

,MSGO40

CRF

MSGO30

,MSGO30

CRF

BANK

IF BANK GT LASTBANK THEN GOTO 18

002556

MOV BANK, -(SP)

MOV
MOV
MOV
MOV

;SAVE LAST GOOD STACK POINTER
:SELECT BANK & PATTERN TEST

sBANK(0-177)7

;READ AN OCTAL NUMBER ONTO THE STACK
:PUT IT IN BANK

MOV (SP)+,BANK

;CHECK FOR BANK TOO HIGH

CMP BANK ,LASTBANK

MOV
ASL

BANK ,R1
R1
R1

IF CPUBIT OFF.IN CONFIG(R1)

002664

TYPE

TYPEIT

.DSABL

MSGO41

,MSGO41

;BANK NOT ACCESSABLE

CRF

END ;OF IF

24:

TYPE

MSGO42

.DSABL

CRF

POP

PATTERN

TYPEIT

RDOCT

012637

oo2112

023727
003367

002112

042466
042472
10813 042474
042474

005737
001004

002112

104401

067533

10814 042500
10815 042502
042502

104413

,MSGO42

IF PATTERN GT #47 THEN GOTO 2%

LA03:;::::::

sPATTERNC0-45)?

:READ AN OCTAL NUMBER ONTO THE STACK

;PUT IT IN PATTERN

TYPE

MSGO43

,MSGO43

.DSABL _ CRF

RDOCT
POP

MOV (SP)+,PATTERN

;+CHECK FOR PATTERN TO HIGH

CMP PATTERN, 047
BGT 2%

IF PATTERN EQ @0

TYPEIT

BIT CPUBIT,CONFIG(R1)
BNE L403

GOTO 1§

067515

TESTADD.-(SP)
PCBUMP, -(SP)
TKVEC, -(SP)
TKVEC+2,-(SP)

BGT 14

ASL

104413

012602

TYPEIT

.DSABL

000754

104401

.DSABL

TYPE

RDOCT
POP

104413

042464
10812 042466

SELECT BANK & PATTERN

BANK,PATTERN, TESTADD,PCBUMP, TKVEC , TKVEC+2

MOV

042370

10809 042450
10010 042452
042452
10811 042456
042456

SELECT BANK & PATTERN>>

MOV PATTERN, -(SP)

10793
353“
10794 042370

042402
10798 042406
042406

SEQ 0302

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

042334
042340
042344

042374

Page 335

.....‘......O“‘...“.“.0.....‘.‘...‘.“........‘..“..“.“.....‘.“..‘.0.00..

10792 042334

10795 042374

Monday 07-Oct-85 16:57

:PATTERN O DATA IS?

TST PATTERN
BNE L404

;READ AN OCTAL NUMBER ONTO THE STACK
:PUT IT IN R2

MOV (SP)..R2

‘N Monday 07-Oct-85 16:57
MACRO Y
CVMJABO MSV11-J MEMORY DIAG.
3
c
s
SELECT BANK & PATTE
END ;OF IF

10816 042504

10818

042504

MAP
MOV
CALL

10819 042504
042504 010346
042506 013703 002102
042512 004737 035604
042516

10820 042520

.DSABL

012603
104511

042526
042532
10823 042534
042534

005737
001404

002124

104401

067667

CRF

CALL

EXBANK

TYPE
T;;:Agl

MSGO49
52,?‘“’

END ;OF IF RRFLAG

10827 042550
10828 042556
042562
1
10830 042566
10831 042572
10832 042576
10833 042602
10834 042604
10835 042610
10836 042616
10837 042624

013737
013702
072227
016203
072327
042703
006303
010337
012737
012737
017700

002152 002154
002102
000002
002664
177770
177760
002152
043154 000060
000340 000062
140014

MOV
MOV
ASH
MOV
ASH
8IC
ASL
MOV
MOV
MOV
MOV

csauo snvcsn
emx
92.R2
CONFIG(R2).,R3
#-10,R3
#tC17,.R3
R3
R3,CSRNO
oCHDSC, rxvec
:2
0340, TKVEC
8$TKB,RO

SET

R
, MUT
HEADE

MOV

BANK,R1

BIC

177776

8IS

igfig 042636 052777 000100 137776
10841

10844 042664
10845 042666
10846 042670
10847 042674
10848 042700
10849 042706
10850 042714

042714

042722

012737
012737
013701

177777
177777
02102

002612
002110

032761

010000

002666

006301
006301
005037 002240
005037 002264
012737 060000 002412
012737 000002 002414
001413

CMDSB:

ASL
ASL
CLR
CLR
MOV
MOV

OBIT7,PSW

08IT6.98TKS

R1
R1
spucsa
PASFLG
oF IRST, TESTADD
+2
OF IRST+2, TESTADD

IF #8IT12 SET.IN CONFIG+2(R1)

002240

INC
MAP

SPLTCSR
BANK

042732 013703 002102
042736 004737 035604

MOV
CALL

BANK ,R3
MAPPER

10851 0427
10852 0427

042730

005237

010346

|
s:
g

LA0S:;::::3

.snve OLD CSR NUMBER
GENERATE INDEX INTO CONFIGURATION TABLE
;:R3 = LOW WORD OF CONFIGURATION TABLE FOR THIS BANK
;POSITION CSR CODE IN BITS 0-3
:CLEAR ALL BUT THE CSR CODE
;ADJUST CSR NUMBER
;

cnsco«s

r;;%‘r_

042644
042652
10843 042660

1ST RRFLAG
BEQ L40S
:BANK REQUIRES RELOCATION

;TO ESCAPE TYPE ANY KEY!

067555

10842 042644

:SET NEW MARGINS

MSGO046

104401

000200

MOV (SP)+,R3

TYPE

042544

042737

3,-(SP)

JMP CMDSC

042544
10825 045544

10838 042630

:MAP SUPERVISOR SPACE (TESY men T0 BANK

BANK
BANK ,R3
MAPPER

IF RRFLAG IS TRUE

10824 042540 000137 043154
10826 042544

SEQ 0303
LA04:;;:::5::

INVALIDATE

10821 042522 004737 037760
10822 042526

Page 335-1

;KILL ANY OLD INTERRUPT

;:LOMER CPU PRIORITY TO 140

;:ENABLE KEYBOARD INTERRUPTS
MOV
MOV

@-1,HEADER
@-1,.MUT

BIT @BIT12,CONFIG+2(R1)
BEQ L406

MOV R3,-(SP)

MACRO Y05.02 Monday 07-Oct-85 16:57
CVMJABO MSV11-J MEMORY DIAG.
& PATTERN
BANK
SELECT
5
D
COMMAN

Page

SEQ 0304

10853 042744
10854 042752

10855 042752
10856 042762
10857 042764
10858 042766

012603
012737

032777
001402

.DSABL

120000

000001

137656

000405
002152

042774
10861 04

012637

002152

C12737
012737
013700
006 300
004770
005037
000712

000002

017376
017432
017526
017642
017756
020026
020110
020144
020206

002112

L406::::333

IF oSWO SET.IN 8SWR

PUSH

CLRCSR
POP

END

043034
002076

CSRNO
CSRNO

MOV CSRNO, -(SP)

;:CLEAR CSRS

MOV (SP)+,CSRNO
L410:5353333

@2 ,NOPAR

;PARITY ACTION
;TRAPS ADD 2 TO PC

CMD5B

;LOOP TILL KEYBOARD INTERRUPT

MOV
MOV
ASL
CALL
CLR

#2,PCBUMP
PATTERN,RO
RO
@F SPAT(RO)
NOPAR

MT0001
MT0002
MT0003
MT0004
MT0005
MT0006
MT0007

;<1
:<1
; 1
; 1
; 1
:<1
;<1

FSPAT:

BR L410

L407:5:3333

;OF IF

MOV

002076
002326

BIT &SWO,8SWR
BEQ LA407

;DISABLE ERROR CORRECTION

ECCDIS
ELSE

013746
104502

MOV (SP)+,.R3

MOV__
2120000, TESTADD+2
END; OF IF #BIT12

002414

104470

042766

10859 042772
10860 042774

CRF

SEC
SEC
SEC
SEC
SEC
SEC
SEC

DATA PATTERN TEST
ADDRESS TEST
COMPLEMENT ADDRESS TEST
3 XOR 9 WORST CASE NOISE TEST
ROTATING ZEROS TEST
ROTATING ONES TEST
INITIAL DATA TEST
ADDRESS BIT TEST
BYTE ADDRESSING TEST
NULL TEST TO KEEP TABLE ORDER
NULL TEST TO KEEP TABLE ORDER
NULL TEST TO KEEP TABLE ORDER
BASIC DOUBLE BIT ERROR TEST

NULL TEST TO KEEP TABLE ORDER
NULL, TEST TO KEEP TABLE ORDER
HOLDING 1'S & 0'S TEST
SYNDROMES 70 CSR ON_SBE TEST
MARCHING 0’'S & 1'S TEST
REFRESH & SHIFTING DIAGONAL TEST
SHIFTING DIAGONAL TEST
FAST GALLOPING PATTERN TEST

NULL TEST TO KEEP TABLE ORDER
RANDOM DATA TEST

10897 043122
10898 043124

10899 043126

UNIQUE BANK TEST
FLUSH OUT DBE'S TEST
S0B-A-LONG TEST
WRITE RECOVERY TEST
BRANCH GOBBLE TEST
SOFT_ERROR TEST
WORST CASE NOISE PARITY TEST

013706

002306
000100

012637
012637
117700

000062
000060

012637
12637

002326
002412

012637
012637

002112
002102

010346
013703
004737

042777

10918
10919
10920

CMDSC:

MOV
BIC

ADDRESS TO CSR ON DOUBLE BIT ERROR TEST

EXTENDED Q-BUS ADDRGSS TEST
WRITE BYTE CLEARS SBE TEST

w
m
(n]

e
e
B8

CORRECTION CWE TEST

SHIFTING 1/0'S THROUGH Tl‘E C"ECK BITS
T
SYNDROMES TO CSR ON DBE

CHECK SINGLE BIT_ERROR UITN ECC DISAOLED TEST
NO CSR UPDATE WITH SBE ON DBE TEST

s<1 SEC
FSSTACK, SP

MOVB
POP

PCBUMP, TESTADD

POP

PATTERN, BANK

MAP

BANK

002102
035604

MOV
CALL

MAPPER

037760
002154

CALL

137442

.DSABL

002152

RETURN

SUBTST

8$TKB,R

(88282 AR

032610

CALL
RETURN

;RECOVER OLD STACK POINTER
MOV (SP)+,TKVEC.2
MOV _(SP)e+,TKVEC

;GET CHARACTER TO GET RID OF FLAG

MOV (SP).,PCBUMWP
MOV (SP)+,TESTADD

;REMAP OLD BANK

MOV (SP)+,PATTERN
MOV (SP)+,BANK

ANK,R3

CRF

MOV (SP)+,.R3

EXBANK
SAVCSR,CSRNO

;RESTORE CSRNO.

<<FS

COMMAND 6

TYPE CONFIGURATION MAP>>

COMMAND 6

TYPE CONFIGURATION MAP

;8842440840000 0004408800804

1 #SUBTEST

SEQ 0305

ECC DISABLE
T
NULL TEST TO KEEP TABLE ORDER

POP

137454

FSCMD6:

004737
000207

Page 335-3

#BIT6,88TKS
TKVEC+2, TKVEC

10922

10923
10924
10925

[SYSYY [STOTSTSTOTS

024022
024052

023626
023662
023712
023772

023&‘6

MT0036
MT0037
MT0999
MT0041
MT10042
MT0043
MT0044
MT0045
MT0046
MT0047

023446

MACRO Y05.02 Monday 07-Oct-85 16:57
CVHJA.O MSV11-J MEMORY DIAG
SELECT BANK & PATTERN
COMMAND S
FS

4888020 0820248858588 08 85840080820 00000 4000000000000

R R LA 2424222222222
82 2520282220250 2 2000008020200 00000000

PCONFIG

—ed

MACRO Y05.02 Monday 07-0Oct-85 16:57
CVMJABO MSV11-J MEMORY DIAG.
TYPE CONFIGURATION MAP
COMMAND 6
FS

10928 043260

FSCMD7: SUBTST

«<«<FS

COMMAND 7

SOB-A-LONG TEST»>>

;#SUBTEST

COMMAND 7

SOB-A-LONG TEST

|‘..‘...‘..“....‘.““‘.‘..‘.“‘..““..‘..“‘.."“‘..‘.‘.‘.“.“‘...‘.‘.“..‘

013746

002102

10930 043304
10931 043310

010637

002306

104401

067741

032777
001402
104470

000001

043264 013746 002112
043270 013746 000060
043274 013746 000062
013746 002076
043

10"33

10933

043314

043314
043322
10934 043324

10935 043326

043

0433

10936 043330

10937 043332
10939

043332

10940 043336

BANK ,PATTERN, TKVEC, TKVEC+2,NOPAR

MOV
TYPE

SP,FSSTACK
MSGOS55

.DSABL

CRF

,MSGOSS

IF @SWO SET.IN aSuWR

137314

ECCDIS

ELSE

000401

END ;0F IF

MSGO46

;sTO ESCAPE TYPE ANY KEY!

é”nssou

067555

10941 043342
043350
1

012737
012737

043466
000340

000060
000062

MOV
MOV

9CMD7C, TKVEC
#340, TKVEC:2

10944 043362
iO"S 043370

042737
052777

000200
000100

177776
137244

BIC
BIS

o8IT7.PSM
#BIT6,84TKS

10948 043376
043376
10949 043404

012737
012737

177777
177777

002612
002110

SET

HEADER ,MUT

10950 043412
043412
043416

005037

002102

004737

037760

005737
001406
005737

002116

18:3% 043416

043422
043422
0434
0434

MOV

043444

10956 043444

OOTKé.RO

sKILL ANY OLD INTERRUPT

;LOWER CPU PRIORITY TO 140
;:ENABLE KEYBOARD INTERRUPTS

FOR BANK := #0 TO LASTBANK
CALL EXBANK

IF ACFLAG IS TRUE AND RRFLAG IS FALSE

002124

oesrie— 004737
1881 022342

10953 04
10954 043440
10955 043444

L812:353:333

TYPE

,MSGOSé6
CRF

104401

CMD78:

;CLEAR CSRS

L811:35:35:3

;BELL = EACH PASS COMPLETE

TIY)'S’%I

1094

BIT #SHO,8SWR
BEQ L411
;DISABLE ERROR CORRECTION

MSGOS6

043336

10943 043356 017700 137262

;SAVE LAST GOOD STACK POINTER
:1SOB-A-LONG TEST

TYPE

TYPEIT
.DSABL

067762

MOV BANK, -(SP)

MOV PATTERN, -(SP)
MOV TKVEC.-(SP)
MOV TKVEC+.2,-(SP)
MOV NOPAR, -(SP)

BR L412

CLRCSR

104502
104401

PUSH

TYPEIT

043332

10938 043332

SEQ 0306

|"..‘.‘..“.“‘....“‘.“.‘....‘.“““..“‘..‘.“‘.‘..““.".“‘.‘.“‘...‘.“

10929 043260
043260

043310

Page 338

INVALIDATE
CALL MTO0031
END ;O0F IF ACFLAG
END ;0F FOR BANK

MOV
MOV

@-1,HEADER
@-1.MUT

CLR BANK
B70:::::33
TST ACFLAG
BEQ L413
TST RRFLAG

PL813:;::::::

CVHJ“O MSvVii-J PEMY DIAG
7
COMMAND

MACRO Y05.02
A-LONG TEST

005237

002102
002102

104401

002653

023737
003757

Monday 07-Oct-85 16:57

g
10964 043

000100

137140

002076
000062
000060
002112
002102
002102

035604

043542
10965 043544
10966 043550

037760

SEQ 0307

002556
TYPE
TYPEIT

GoTo

002306

Page 338-1

137142

CMD7C:

$BELL
. $BELL
CRF
cMD7B

;RING BELL

INC BANK
CMP BANK ,LASTBANK
BLE B70
E70:3333333

BR CMD7B

MOV
8IC

FSSTACK,SP

;RECOVER OLD STACK POINTER

POP

8$TKB,RO

NOPAR, TKVEC+2, TKVEC ,PATTERN, BANK

;READ CHAR TO KILL FLAG

0&11’6.80"(5

MV (SP)+,NOPAR

MOV (SP)e.TKVEC+2
MAP

BANK

MOV
CALL
.DSABL

BANK,R3

CALL
RETURN

EXBANK

MOV (SP)+,TKVEC
MOV (SP)+ ,PATTERN
MOV (SP)+,BANK

;+MAP SUPERVISOR SPACE (TEST AREA) TO BANK
MOV R3,-(SP)

MAPPER

CRF

MOV (SP)+,R3

MACRO Y05.02
CVMJABO MSV11-J MEMORY DIAG
FS
COMMAND 7
SOB-A-LONG TEST
10969 043552

002434

043576
043602

Ol!":g
1

002434

013737
012737

172350
001000

104401

071312

10976 “gg
10977 043624

043624
0436

10978 043632

043632

10979 043636

043636
043642

10980 04
10981 0436
0436
04

10’.3 04

002102
056724

COMMAND 8

ERROR SUMMARY>>

s#SUBTEST

COMMAND 8

ERROR SUMMARY

RO,.R2,R3,BANK

002434

DEC

TEMP

MOV
T;ggzL

TEMP, -(SP)
o

MOV
MOV

TYPDEC

002270
172350

TYPE

MSG125

.DSABL

CRF

TYPEIT

TYPDEC

$ERTTL

104401

070335

T;;Egl

TYPE

MSGO79

005737
001445

002630

002334

005037

002102

0%3703

002102

043700

104401

070300

10987 043704
043704
10988 043712

012737

177777

013746

043716
043720
043721

104403
006
000

10990 043722

116300

002102

; sSAVE SERTTL FOR TYPEOUT
::G0 TYPE--DECIMAL ASCII WITH SIGN

;ERROR(S) DETECTED

énscon

TST $ERTTL
BEQ L414
CLR BANK

B71:53533::

MOV BANK,R3

MUL 04 ,R3

IFB CONFIG+2(R3) NE &0

TSTB CONFIG+2(R3)
BEQ L41S

IF SUCCESS IS FALSE
TYPEIT

.DSABL

002334

TYPE

,MSGO76

:BANK

MSGO76

ERRORS

MOV

.DSABL

TST SUCCESS
BNE L416

CRF

SET SUCCESS

MOV

END ;OF IF SUCCESS

TYPOS
.BYTE
.BYTE

002666

;PASSES CWLETED

SUCCESS
CLR
FOR BANK := 0 TO LASTBANK

043712

s33I.L.C.;REV B
13:1.L.C.;REV B

IF SERTTL NE #0

070327 000004
002334

: ;SAVE TEMP FOR TYPEOUT
:3GO TYPE--DECIMAL ASCII WITH SIGN

,MSG125

$ERTTL, -(SP)
o

005737
001005

10989 043712

TEMP

MOV
TIY)?A’EL

002666

MOV RO, -(SP)
MOV R2,-(SP)
MOV RS, -(SP)
MOV BANK, -(SP)

$PASS, TEMP

MOV

002630

105763
001424

10986 043700

<«<FS

013746
104405

043664
“l‘?‘
043670
10985 O‘“?g
043672
043676
1

FSCMDB: SUBTST

PUSH

005337

10974 04
10975 04

SEQ 0308

188680680880 80888888888000800808800080000000008000000000000000000000000000000000

010046
010246
010
013746
013737

043576

Page 340

19668860000888080800000008088080800000080008800000000080400000000000000000000000

10970 043552
0433552
043;;:
043
043
10971 043
10972 043572
10973

Monday 07-Oct-85 16:57

TYPOCS

BANK,3

L816::3::::

BANK, -(SP)

ngh\IE BANK FOR TYPEOUT

6
O

::GO TYPE--OCTAL ASCII
::TYPE 6 DIGITS
: ;SUPPRESS LEADING ZEROS

CRF

MOvVe

CONFIG+2(R3),R0

@-1,SUCCESS

CVMJABO MSV11-J MEMORY DIAG.

COMMAND &

10991 043726

10992 “g?g
0437
043734

10993 043736
043736

042700

MACRO Y05.02

ERROR SUMMARY

8IC

177400

MOV
TYPDS

010046
104405
104401

.DSABL

TYPEIT

002660

043770
043772
043774

10999 043776

CRF

TYPE

$CRLF

:3SAVE RO FOR TYPEOUT
::G0 TYPE--DECIMAL ASCII WITH SIGN

$CRLF

CRF

AREND ;0OF IF SERTTL

013737

002270

C12637
012603
012602
012600

002102

000207

172350

MOV
POP

RETURN

SEQ 0309

otC377.RO

003737

10996 043

10998 043764
043764

RO, -(SP)

Page 340-1

END ;OF IFB CONFIG(R3)

002102 002556
003237 002102
10995 Oa374s
043746 023737
043
10997 043756

TYPDEC

.DSABL

10994 04374
04374

0437
043

Monday 07-Oct-85 16:57

SAV4 ,KIPAR4

BANK,R3,R2,R0

L81S::33333

INC m.usnm
cHe
BLE 871

E71:35333333

:sI.L.C.;;::REV B

LA814:;::::5

MOV (SP)+,BANK
MOV (SP)+,.R3
MOV (SP).,.R2
MOV (SP)+,RO

pald

MACRO Y05.02
CVMJUABO MSV11-J MEMORY DIAG.
ERROR SUMMARY
Fs
COMMAND 8

FSCMD9: SUBTST

11002 044000
11003 044000
044000

044004

1 #SUBTEST

013746
013746

002102
002112

104401

070230

104470
uggg 044048 104476

11010

044046

11011

11012

11014 m

11015
: ’o’
1{03
76
110
11018 044102
{}
044110
11021 044116
-

044116

044

11
11

044
044
044

044154
1
160

164

044164

COMMAND 9

REFRESH TEST>>

REFRESH TEST

PUSH

RN,
TKVEC, TKVEC+2,NOPAR
BANK,PATTE

MOV

SP,FSSTACK

MSGO73
TYPE
TYPEIT
,MSGO73
.DSABL CRF

IF @SWO SET.IN 8SWR
ECCDIS

END ;OF IF

104401

067762

MSGOS6
TYPE
,MSGOS6
TYPEIT

104401

067555

r;ggz

.DSABL CRF

000060

012737
012737
017700
042737
052777

000100 136524

012737

177777

000
136

000062

000200 177776
002612

012737 177777 002110

005737 002116
001406
737 002124
001003
10633
004737

020714

005237

002102

MOV BANK, -(SP)
;9)
MOV PATT
MOV TKVEC,-(SP)
MOV TKVEC+2, -(SP)

MOV NOPAR, -(SP)
;SAVE LAST GOOD STACK POINTER

;REFRESH TEST

BIT #SWO,aSWR

'aaoadd
;DISABLE ERROR CORRECTION
BR L420

CLRCSR

104502

V44164

11029 044164

ELSE

000401

ugfi 0441
005037 002102
mg
004737 037760
ugg ouuxu
ouica
11

COMMAND 9

SEQ 0310

.‘.‘...‘...“.‘...‘.“..‘...“.“.O‘......O‘.‘.‘.“‘“.‘..“.‘...‘..“....“.‘.‘

uoo"’ 0440
....33 032777 000001 136574

11009

<<FS

Page 342

'....“‘.."......“.“.“...‘.““‘...“..‘..‘..‘..‘.‘.‘..““..‘0..‘......“..

044010 013746 000060
044014 013746 000062
002076
013746
010637 002306
11004

11005 0440
044030
-

Monday 07-Oct-85 16:57

;CLEAR CSRS

L817:5333833

\BELL = EACH PASS COMPLETE
$3s

TYPE

MSGO46

:TO ESCAPE TYPE ANY KEY!

MOV
MOV
MOV
8IC
8IS
SET

, TKVEC
#CMDIC
9340, TKVEC:2
84TKB RO
BIT7.PSW
#BIT6.88TKS
, MUT
HEADER

sKILL ANY OLD INTERRUPT
;LOMER CPU PRIORITY TO 140
;ENABLE KEYBOARD INTERRUPTS

burm

CMD9B: FOR BANK := 80 TO LASTBANK
CALL EXBANK TRUE AND RRFLAG IS FALSE
IF ACFLAG IS

INVALIDATE
CALL MT0022

END ;OF IF ACFLAG
END ;OF FOR BANK

MOV

#-1,HEADER

MOV @-1.MUT
CLR BANK

B72::33333

TST ACFLAG
8EQ
RRFLAG
TST L421
BNE L4&21

L821::3333:
INC BANK

]

vil-J v’cnoav og“m MACRO Y05.02
TEST

044170

023737
003757

002102

Monday 07-0Oct-85 16:57

136422

037760

Pege 342-1

SEQ 0311

002556
TYPE
TYPEIT

; sgmuo

oELL

.DSABL
GOTO

MOV
8IC
MOVB
POP

FSSTACK, SP

JRING BELL

r BANK , LASTBANK
€ 872
E72:3383311

8R CMD98

#8IT6,84TKS

,RECOVER OLD STACK POINTER

2, TKVEC ) nn&g‘gm&
%Ifl'?&m
‘
.

e o MOV (SP)+.NOPAR

B
AP SUPERVISOR SPACE (TESY
AREA)" 7O BAN
M

CRF ¢
EXBANK

;

MOV RS, -(SP)

MOV (SP)+.R3

MACRO Y05.02
FVHJIOO MSV11-J MEMORY DIAG.
REFRESH TEST
9
c
S

11043 044272

11044 0‘6273

11045 044270
044274

Monday 07-Oct-85 16.57

Page 344

SEQ 0312

FCMD10: SUBTST

<«<FS

COMMAND 10

SET FILL COUNT>>

;#SUBTEST

COMMAND 10

SET FILL COUNT

18888880888 80880800800040808880880404080000000004000800880484000008008000000000000
.....‘..;G;;““;;...“.‘.......‘....‘.“..‘.“““.‘..“‘...“‘.‘.‘...““0...‘

010046

104401

110037

MSGO8S

.DSABL

CRF

POP

BIC

#tC17,R

TYPEIT

070361

RDOCT

104413
01;‘00
042700

TYPE

MOVB

177760
002357

POP

012600
000207

sFILL COUNTCOCTAL)?

,MSGO8S

MOV RO, -(SP)

MOV (5P)e,RO

no.oriu.s

MOV (SP)+,RO

RETURN

FCMD11: SUBTST

<<FS

COMMAND 11

ENTER KAMIKAZE MODE>>

1 #SUBTEST

COMMAND 11

ENTER KAMIKAZE MODE

1885820080808 84080800480408840288848888488488808808880480884804540880848008808000400000

11054 044320
044320

11055 044324
044324

0443
11056 044340
11057
11058 044342

(8888088040808 8888048348800080808484448800048800848088880884884884888050808000002

104401

070526

012737
012737
000207

177777
177777

TYPE

MSG101

SET

KAMIKAZE , SKIPKAMI

TYPEIT
.DSABL

002010

,MSG101

;ENTERING KAMIKAZE MODE

MOV
MOV

RETURN

FCMD12: SUBTST

<<FS

COMMAND 12

EXIT KAMIKAZE MODE>>

; #SUBTEST

COMMAND 12

EXIT KAMIKAZE MODE

@-1,KAMIKAZE
@-1,SKIPKAMI

1288883480888 80888088488808848885082882
8808288888808 88088058880888284508808000000
(5008848808080 80080088088808084880884480084800884004488282028828884888088888080804808

11059 044342

342

104401

070556

005037

002006

012737
000207

177777

TYPE
TYPEIT

.DSABL
CLR

002010

SET

RETURN

MSG102
éHSGIOZ

;LEAVING KAMIKAZE MODE

KAMIKAZE

SKIPKAMI

MOV

@-1,SKIPKAMI

DIAG.

nncsa Y05.02

TURN CACHE

Mondey 07-Oct-85 16:57

Page 344-1

FCMD13: SUBTST

<<FS

COMMAND 13

1 #SUBTEST

COMMAND 13

SEQ 0313

TURN CACHE OFF>>

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

TURN CACHE OFF

|“‘....“..‘..“.‘..“...“.‘.“‘O“‘...‘.‘.“.‘.......0..“‘0.‘...‘..‘0.‘.‘0.0

TYPE _

MSG106

.DSABL

CRF

TYPEIT

070704

044376

1CACHE IS OFF

,MSG106

CACHOFF
CACHKN, CACHKN+2
MOV
CACHKN
CLR

:TURN CACHE OFF
1SAVE OLD CACHE ON STATE
{KEEP CACHE OFF

SUBTST

RETURN

FCMD14:

<<FS

COMMAND 14

TURN CACHE ON>>

COMMAND 14

TURN CACHE ON

'.“‘.“‘.....“.....".0.‘..0.‘.‘.‘.““0.‘..‘.....".‘..‘........0...‘0...0...

18SUBTEST

|.‘....‘..‘...‘.‘......“‘......‘“..‘..‘.“‘.‘.‘....‘.".“‘.....‘.‘.“..O...‘.

11072

11073 044410
11074
11075 044420

11076

104401

013737

104423

000207

TYPE

TYPEIT

070722

002546

002544

.DSABL

MOV
CACHON

MSG107

,MSG107

CRF

CACMKN+2 , CACHKN

;CACHE IS ON (EXCEPT DURING ACTUAL PATTERNS)

;RESTORE OLD CACME ON STATE
:TURN CACHE ON

‘

;
'

MACRO Y05.02
CVMJABO MSV11-J MEMORY DIAG.
TURN CACHE ON
COMMAND 14
FS

11089
11090 044422

Monday 07-0Oct-85 16:57

Page 345

SEQ 0314

<<FS
TEST ONLY SELECTED BANKS»>>
FCMD15: SUBTST
COMMAND 15
'.‘..“...‘.‘.‘...‘.‘...‘......“‘..“..““.“........‘....“‘.‘..“““.......
TEST ONLY SELECTED BANKS
FS
COMMAND 15
;#SUBTEST

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

11091

11098
11

104401

070631

004737

044516

11095
096
11097

11098

CRF

;ERASE OLD SELECTIONS

CALL
CMD16A
BEGIN CMD16LOOP

B73:5:3333

REPEAT

11094

;ENTER BANKS IN OCTAL - USE NUMBER OUTSIDE RANGE TO TERMINAT

MRSt
105

TYPE
TYPEIT
.DSABL

104401

TY
TYPEIT
.DSABL

067142

104413

CRF
T

POP R1

012601

020127
003002
005701

MSGO30

;BANK(0-177)?

;READ AN OCTAL NUMBER ONTO THE STACK
;PUT IT IN R1

IF R1 GT 2177 OR R1 LT @0

000177

B74:::5:::

MOV (SP)+,.R1
CHMP R1,0177
BGT L422
TST R1

BGE L423

002001

La22::::353:

LEAVE CMD16LOOP
END

:0F IF R1

ASL
ASL

R1
R1

006301

BIS #BIT14,CONFIG+2(R1)

002666

052761

:OF REPEAT

000760

END CMD16LOOP
104401

070777

012737
000207

177777

TYPE

TYPEIT
DSABL

002002

SET

RETURN

MSG110

,MS5G110
CRF
SELONLY

BR E73
L823:;5::::3
:R1

<- R1 = &4

BR 874
E78:;::::3::
E?3:::3333

sONLY SELECTED BANKS WILL BE TESTED

MOV

@-1,SELONLY

MACRO Y05.02
Monday 07-Oct-85 16:57
MSV11-J MEMORY DIAG.
RESUME TESTING ALL BANKS
C OMMAND 16

<<FS
COMMAND 16
RESUME TESTING ALL BANKS>>
SUBTST
3 288808880 20004028848888882888888088888882088008084888004000004880800808000000080000080000
RESUME TESTING ALL BANKS
FS
COMMAND 16
1 #SUBTES T
3 2888288888088 88008882000288888880048888848880084888880400408808888088000000000000000

s et gt

DNOVEWUN

et et et o

s et

s 1

s ot b
b

e 18 e

[y,
[

104401

071043

005037

002002

013702

002556

006302
006302

042761
062701
020102
003771

11121

SEQ 0315

FCMD16:

11110 044506

11111

Page 345-1

000207

TYPE

TYPEIT

.DSABL
CLR

MSG111
.MSG111

;ALL BANKS WILL BE TESTED

CRF
SELONLY

;ENTRY P OINT FROM CMD15

CMD16A: MOV

LASTBANK ,R2

R2
R2

80 TO R2 BY @4

#81T14 ,CONFIG+2(R1)
BIC
END ;OF FOR R1

CLR R1
B7S:s:::333

ADD 04 .R1
CMP R1,R2

BLE B7S

RETURN

E7S::::3333

C Vi MJABO MSV11-J MEMORY DIAG.
RESUME
FS
c OMMAND 16

MACRO Y05.02
TESTING ALL

Monday

gans

044550

07-Oct-85 16:57

Page

347

SEQ 0316

FCMD17: SUBTST

«<<FS

COMMAND 17

ENABLE TRACE>>

; #SUBTEST

COMMAND 17

ENABLE TRACE

'“‘.‘...‘.‘.‘....““...‘...““‘.‘.“‘.‘.“..‘.‘.“‘.“‘.‘..“.“.‘..‘..‘....‘
]."..‘.‘.“‘.“..‘.....‘..“‘..“‘.‘.‘..‘...."..‘..‘....“‘...‘.‘.‘...‘....“‘

044550

104401

071401

044554
044562

012737
000207

177777

044564

TYPE
TYPEIT

006304

MSG127
,MSG127

CRF

FCMD18: SUBTST

<<FS

COMMAND 18

DISABLE TRACE>>

s #SUBTEST

COMMAND 18

DISABLE TRACE

1888884888804 00000RRER0RR0RRRARRERRARARRRRRRRRRRRRAEAESRERASS0E0S00000000000000

044564
044564

104401

071420

044570
044574

005037
000207

006304

;“.‘...‘....“.““..“‘.‘.‘““““‘.“““0‘.‘...““..‘.‘..0‘.0‘..‘.‘.....‘.
TYPE
MSG128
TYPEIT
,MSG128

.DSABL

CLR

RETURN

CRF

TRACE

MACRO Y05.02
CVMJABO MSV11-J MEMORY DIAG.
DISABLE TRACE
COMMAND 18
FS

Monday 07-Oct-85 16:57

WHICHCSR:SUBTST <<SUBR

11136 044576

;#SUBTEST

11137 044576
11138 044602
11139 044606
11140 044610
%ii.:l 044614

111‘3 044616
044616

11144 044622
11145 044624
044624
11146 0‘4‘;8
11147 0446

013700
022700
001003
005037
000207
104401

11148 044634
11149 044636

044644
11151
1115§ 044650
11153 044654
11154 044656

162700
162700
006300
010037

11155 044662

002152
066775

103002

1$:

000207

000106
000101
000007
000060
002152

SUBR

SEQ 0317

DETERMINE CORRECT CSR>>

DETERMINE CORRECT CSR

T T

L LR L

(8888888884888 048888040880 088880008408000R000 004000000008 000000000000000000000

104412

012600
011000
020027
101370
(€22700

11150 044642

002224
100000

Peage 351

MOV
cHP
BNE
CLR
RETURN

TOTCSRS,RO
@8IT15,R0
18
CSRNO

;+GET CSR'S FLAG
:CSR 0?
iNO - SKIP
:YES - SET IT UP

ngfigl

TYPE

MSGO022

é=§6022

+WHICH CSR(0-F)

ROLIN
POP

:GET CHARACTER
:PUT IN RO

MOV
CMP
BHI
CMP

(RO),RO
RO, 2106
1
¢'A,RO

suB
suB
ASL
MOV

#7,RO
#60,RO
RO
RO, CSRNO

BHIS

24:

RETURN

MOV (SP)+.RO
;PUT CHAR IN RO
;CHECK LIMIT
:IF BAD LOOP TILL HE TYPES IT RIGHT

CVMJABO MSV1il-J MEMORY DIAG

MACRO Y05.02

ERROR DATA (SUPERVISOR) SETUP STUFF
11621
11622 044664
044664

11623 044676
11624 044704

11625 044712

11626 044720
11627 044722
11628 044722

11629 044730
11630 044734
11631 044736
11632 044742

$PER2S:

010137
162737

002034
000002

005737
001007

002144

053737

002552

177776

016137

177776

002052

104417

Monday 07-Oct-85 16:57

002034

.SBTTL

Page 365

ERROR DATA (SUPERVISOR) SETUP STUFF

LET ADDRESS

:= R1 - @2

177654

€10237

002044

000137

050120

;ENTER TEST MODE

KERNEL

;ENTER KERNEL MODE

;GO TO SYSTEM TEST MODE
MOV -2(R1),BAD
L424:;;:::::

IF 177654 EG @0

TST 177654
BNE L425

LET GOOD := R2

MOV R2,G00D

ELSE

BR L4426
L42S:;::5333

LET GOOD := R3

MOV R3,GO0OD

END ;OF IF

JMP

SS
SS

TST ABORTFLAG
BNE L424

TESTAREA

TESTMODE ,PSW
BIS
_CRF
.DSABL
LET BAD := -2(R1)

000402

010337

MOV R1,
suUB e2,

IF ABORTFLAG IS FALSE

END ;OF IF ABORTFLAG

005737
001003

SEQ 0318

La26:;::::::

PERRAMW

<<DATA WAS 3 WORDS>>
SUBTST
1088888000 RASERRAARARERAEARA4LRRRRRAEREERASE042488088888408844888888880008

PERRA3:

:#SUBTEST

(ASERERRARRE AR

DATA WAS 3 WORDS

ARERRARREARREA40R

2004 RAERREEER220445842542488888888888800040

IF BADPC EQ #0 THEN $CALL BADSTACK

002022
034040

PUSH

11637 044760

BI%

0v2150

2
3
o

177776

005711

33333313
3.
o

002552

010137
005037

002044

053737

002552

TESTAREA

BIS

002034

MOV

CSR,RO

CLR

GOoD

177776

BIS

TESTMODE ,PSW

TESTAREA

MOV RO, -(SP)

sMAKE SURE CSR BIT HOLDER IS CLEAR
:DISABLE ECC & WRITE CHECKBITS FROM 1 SELECTED CSR
;GO TO SYSTEM TEST MODE

TESTMODE ,PSHW

CRF
.DS ABL
TST
(R1)
KERNEL
READCSR

CLR1CSR
ASH
#-5,R0
#tC177.RO
BIC
LET ADDRESS := R1

177773
177600

LA27:;::3:33

CSR
CLR
CHK1DIS

002150
053737

TST BADPC

BNE L427
JSR PC,BADSTACK

;READ LOCATION TO READ CHECKBITS INTO CSR
:GET _CSR _CONTENTS
:SAVE CSR CONTENTS IN RO
;RETURN CSR TO NORMAL MODE
xHOVE CHECK BITS TO BOTTOM OF WORD
1CLEAR OFF EXTRANEOUS GARBAGE
;SAVE VIRTUAL ADDRESS FOR PRINTOUT
MOV R1,ADDRESS

;FIRST TEST WORD WRITTEN SHOULD ALWAYS BE ZERO
;ENTER TEST MODE

;GO TO SYSTEM TEST MODE

CVMJABO MSV11-J MEMORY DIAG.
DATA WAS 3 WORDS
11651 045040
045044
11652
045050
11653
5052
11655 045056
56

11664 045110

Monday 07-Oct-85 16:57

CRF
(R1),BAD
(R4),BAD2

002052
002054

RO,BAD3
BAD3.1
PERBNK
+33
RO

002057
050354

000001

045110

MACRO Y05.02

135536

Page 365-1

SEQ 0319

;GET BAD DATA FROM MUT - FIRST WORD
:AND_SECOND WORD

sENTER KERNEL MODE

VE BAD CHECKBITS FOR PRINTOUT

aCLEAR OFF THE OTHER UNUSED BITS

;MARK BANK AS BAD IN CONFIG TABLE
;RESTORE RO

MOV (SP)+,RO

IF @SWO SET.IN @SWR
ENASBE
ELSE

;TRAP ON SINGLE BIT ERRORS

ECCINIT
END; OF IF &SWO

;:TRAP ON UNCORRECTABLE ERRORS

RTI

BIT @SWO,8SHR
BEQ LA4A30

BR L431
La30::::333
La31:;:5::::

CVMJABO MSV11-J MEMORY DIAG.
DATA WAS 3 WORDS
11667 045112
045112
11668
11669

11670 045136
04

11671
1167
1167

11674
11675
11676

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 367

SEQ 0320

$PER30: LET GOOD := R1

010137

MOV R1,GOOD

LET ADDRESS := (SP) - 16

011637
163737

002034
000016

005737
001007

002144

053737

002552

177776

017737
104417

134664

002052

000137

050120

002034

MOV (SP),ADDRESS

SUB 16,ADDRESS

IF ABORTFLAG IS FALSE
TESTAREA

8IS

TESTMODE ,PSW

CRF
.DSABL_
LET BAD := SADDRESS
KERNEL

END ;OF IF ABORTFLAG

TST ABORTFLAG

;ENTER TEST MODE

BNE L432

;GO TO SYSTEM TEST MODE

;ENTER KERNEL MODE

MOV SADDRESS,.BAD

L832:3:3:33

JMP PERRAW
GETDATA:SUBTST

<<GET DATA FROM ABORTED AREA IF POSSIBLE>>

1 #SUBTEST

GET DATA FROM ABORTED AREA IF POSSIBLE

1688488888848 0 85482808008 00080888808088488844085004884284884888482084804888808000800
1288848488454 8 4040808400000 448404840482808088004404088048840408888488880808804000

PUSH

RO.4,114

045256

MOV

SP,GETDA1

013700

045236
002034

MOV

, RO
ADDRESS

053737

002552

011037

002052

8IS
.DSABL

TESTMODE , PSW
CRF

005037
013706

002144

012637
012637
012600
000207
000000

000114
000004

000004
000114

10‘4%7

11689 “ggg:
11688 04

045256

TESTAREA

177776

MOV

KERNEL

14:

CLR

MOV
POP

RETURN
GETDAL1: O

114,-(5P)

;GO TO SYSTEM TEST MODE

(RO),BAD

ABORTFLAG

GETDA1,SP
114,4,R0

;RESTORE KNOWN GOOD STACK POINTER
MOV (SP).,114
MOV (SP)..4
MOV (SP)+,.RO

MS
CVMJABO

POMER FAIL

1-J F!MY DIAG.

MACRO Y05.02

Monday 07-Oct-85 16:57

.SBTTL
.SBTTL

11692

11693
11694
11695
11696 045260
11704

005737
001403

012737
012737

046206
000340

013746

002152

012700
012701

177700

1044;3

000021

045362
11723 045364
11724 04
04

11725

Mg 72
045374
045400

1173’ 045400
11727
11728
11729

045404
045410
045414

04
11730
11731 045422
11732 045424

014046
077102

012701

000020

0%7102
005737
001402
004737

*SAVE CACHE STATUS
CACHKN
ST

BEQ

S¢

CACHON
MOV

: TURN CACHE ON
#$ILLUP,PWRVEC nSET FOR FAST UP

PUSH

RO,R1,R2,R3,R4,RS,CSRNO

PUSH

177746

045342
11119 g
o g“ 005737 002456
{Ht 04
11753
172300
0453

11720
11721 0453
11722 045362

POWER FAIL AUTO RESTART
ROUTINE POWER DOWN AND UP

sPOWER DOWN ROUTINE

$PWRDN:

i
1170 g‘lgg: 013746

11713 045330
11714 045334
11715 045340

SEQ 0321

196088884608808008480888808008080000000000000000000000004000000000000000000000000

002544

1178: 043272
045274
11709
11710 04
11711 045310
045310
045312
045314
045316
045320
045322
045324
1171;

Page 369

000024
000026

MOV

CONTRL

0340,PWRVEC+2

3 ;PRIO: 7

; SAVE USER_PAR'S & PDR7

1%:

MOV
MOV

PUSH

*save suaefivxson PAR’'S
s08

24:

NOSUPER

PUSH

-(RO)

BNE
MOV
MOV

S08

R1,2%

MOV -(RO),-(SP)
TST RLFLAG

BEQ LA33
JSR PC,WOOPS

046214

172200
000040

MOV -(RO),-(SP)

IF RLFLAG IS TRUE THEN $CALL WOOPS

002126

172300
177600

MOV CONTPL,-(SP)

PD1:

; COPY KERNEL HAPNT,O USER & SUPERVISOR

MOV
MOV

OKIPDRO
SUIPDRO,R1

MOV

#32. .R3

MOV
34:

MOV

S08

9SIPDRO,.R2
(RO),(R1).

(RO)+, (R2)+

R3,3$

L833:;::3::3

§ SEEEEELS &S &S

292222982 2%
PRPPPOAR P

3z 78

33 gog

o ég

[

~N~

-J MEMORY DIAG.
DOWN AND UP

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 370

&gexi USER & SUPERVISOR STACK POINTERS
052737

140000

KERNEL

104417

010046
005737
001006

002456

052737

005037

PUSH

TST

NOSUPER

177776

78:

002224

;ENTER SUPERVISOR MODE

KERNEL

;ENTER KERNEL MODE

MOV

SSP.RO

PUSH

; SAVE ECC REGISTERS
MOV
TOTCSRS,R1

ON.ERROR
READCSR

PUSH

002150

CSR

IF R1 EQ €0 THEN LEAVE LCSRSAVE

000002
002152

END ;OF FOR CSRNO

002152
000036

22 2RRRRRR

et334
e b et ::5
=89
N~~~

oo i
Pepepe
s

177572
177574
177576
002456
172516
172400
000020

PUSH

MMRO.MMR1.MMR2

TST

NOSUPER

PUSH

MMRS

BNE

84:
4%:

CLR CSRNO
B77:35333:

MOV CSR, -(SP)
La34:;:::::
TST R1
BEQ E76

ADD #2,CSRNO
cHpP CSRNO, 936
BLE 877
E?7:333353383
E76:::333:
MOV
MOV
MOV

" P 9)
.~(SP)

;SAVE KERNEL PAR’S

MOV
MOV

s08

R1.48

PUSH

B76::333:3

8ccC LA34

SAVE MMRO,1.2.3

014046
077102

:GET CSR'S

END LCSRSAVE

012700
012701

MOV RO, -(SP)

END ;OF ON.ERROR

005701
001407
737

;GO TO SUPERVISOR MODE

:= @0 TO @36 BY &2

ASL

103003
104426

023727
003762

LCSRSAVE

BEGIN

006301

013746

MOV RO, -(SP)

SUPERVISOR
#BIT14,PSW
8IS
.DSABL CRF

FOR CSRNO

002152

;:ENTER KERNEL MODE

BNE

010600
104417

013701

USP,RO

MOV

010600

:GO TO USER MODE

08IT15!81T14,PSW
CRF

8IS
.DSABL

177776

010046

11766 045570

SEQ 0322

-(RO)

MOV

-(RO), -(SP)

MSV1l-J MEMORY DIAG.

INE POWER DOWN AND UP

MACRO Y05.02

017746

170202
170200

135020

010637 046212
012737 045634 000024

000776

#5,.PROTYP

PUSH

MAPHO
, MAPLO

BNE

001004

013746

Page 370-1

SAVE Q-BUS MAP REGISTERS

022737 000005 0GO04064

O}g?“

Monday 07-Oct-85 16:57

9¢:

;IS THIS AN 11/83 ?

s1BRANCH IF NOT

MOV m.-}g;

hs,gxi POSSIBLE SOFTWARE SWITCH REGISTER
8SHR

3 SAVE S'I'RCK POINTER

SDOWN:

SEQ 0323

MOV
ui mu. VECT
yNOW SET#$PURUP,PURVEC
MOV
HALT

B8R

$DOWN

MOV MAPLO,-

MOV 8SWR, -(SP)

1 1SAVE SP
::SET UP VECTOR

: sHANG UP

MACRO Y05.02

&x.m.

Monday 07-Oct-85 16:57

Pege 372

SEQ 0324

Ve
S

auag

geis
&

’ 0086088888888 88888080888888008880088880882808088088880828848088080884800000000000000

1¢:

104:

114:

ngu
177574
177872

s ‘

11818 ¢

”

114
M43

POP

MMR2 ,MMR1 , MMRO

000036 002152

MOV (SP)+,(RO).

ON.ERROR

POP

002150

1GET CSR'S

FOR CSRNO := 036 DOWNTO #0 BY @2

ASR

R1
CSR

LOADCSR
END 0F ON.ERROR

IF R1 EQ #0 THEN LEAVE LCSRRESTORE

11816
s

11817

11018

MOV (SP)+,B8SWR

#172340,R0
OKIPDRO,R2
016, .R1
(RO
#77406,(R2)+

MoV
MOV
MOV
POP
MOV

;RESTORE_ECC REGISTERS
nOv"

11812 ¢
11013
ol

‘gsvm“msms sonuduéSWITCH REGISTER

’u‘tg 2.1.0
u:sroat'v‘oNOSUPER

172516

11806

@$ILLUP,PURVEC ;;SET FOR FAST DOWN
MOV
JRESTORE STACK POINTER
+ 1GET_SP
$SAVRG , SP
MOV
1 IMAIT LOOP FOR THE TTY
$SAVR6
CLR
..mr FOR THE INC
$SAVR6
INC
A WORD
1
BNE

002456

11805

UP ROUTINE

000152 003000
¢

END ;0F FOR CSRNO

B8100:;:::313

MOV #36,.CSRND

B101::::::3

B8CC LA3S
MOV (SP)..CSR
LASS:33533:

€100
él
CSRND
OGE 8101

END LCSRRESTORE

€E101:3:33013

E100::33:33

.“

ABO
POUEAMSVL1-JDot ANDY DIAG.
SSUVIRG

11819
11820 046010
11821 046014
11‘2; 046020
1182 O‘“i:
11824 0460
11825 046032
11826 046034

012700

012701

012702
012703
011021
g
07730

172300
177600
172200
000040

MACRO Y05.02

Mondey

" 07-Oct-85

16:57

;

Page

372-

othoe iy

aCNY KERNEL MAP TO USER & SUPERVISOR
OKIPDRO,RO
QUIPDRO,R1
nov
#SIPDRO,R2
MOV
032..R3
MOV
(RO).(R1)+
MOV
(RO)O (R2)+
MOV
R3,3$
S08

SEQ 0325

CVMJABO MSV1l-J MEMORY DIAG.

ROUTINE POWER DOWN AND UP

11828
11829

046036

005737

11830 046042 001006
11831 046044
046044 012600
11832 046246
046046

(52737

046054 010006
11833
11834 046056 104417
11835 046060

046060

012600

046062

052737

11836 046062

046070 010006
11837
11838 046072 104417

11839

MACRO Y05.02

012620

046120

012620

077102
012700 177636
012701 000021

11847

046120

mig
012637 002152
046144 012605

OV - RO, SSP

;ENTER KERNEL MODE

KERNEL
POP

lgs

g:g"”“
RO

;G0 TO SUPERVISOR MODE

cog'x_ussaxuc.vsu

;GO TO USER MODE

;ENTER KERNEL MODE

;RESTORE SUPERVISOR PAR'S

78:

8s:

0172240,R0
MOV
016, .R1
MOV
(RO):
POP
R1,7$
S08
;RESTORE USER PAR'S & PDR?
0177636 .R0O
MOV
017. .R1
MOV
POP

(RO)-

R1,88
S08
;RESTORE POSSIBLE SOF TWARE DISPLAY REGISTER
MAR
, 8DISPLAY
$PAT
MOV
SPATMAR .DI
MOV

Co90.

012604
012603
012602
012601
012600

5. 084.83.02.01..%0

11853 046160 012737 045260 000024
046166 104401 067722

OSPURDN,PURVEC :;SET UP THE POWER DOWN VECTOR
MOV
;REPORT THE POWER FAILURE
MSGOS1
TYPE
TYPEIT égam

11855

ST
BEQ
POP

11854 046166

.DSABL

012637

11860 046206

000000

11859 046204

000002

11861 046210 000776
{{ag 046212 000000

1/7746

MOV (SP)+.(RO)+

MOV (SP)+,(RO)+

MOV
(SP)+,CSRNO
MOV (SP)+.RS
.,

MOV (SP)+.R4
MOV (SP)+.R3
MOV (SP)+.R2
MOV (SP)+.R1
MOV (SP)+.RO

%atstoas CACHE STATUS

uogc 046172 005737 002544
11857 046176 001402
11858 046200
046200

MOV (SP)+.RO

RO, USP
nov!
KERNEL

11848 046122 077102
11849
013777 002012 134506
11850 046
013737 002012 000174
11851 046132
046146
046150
046152
046154
046156

NOSUPER

,ENTER SUPERVISOR MODE

USER

177776

012700 172240
C12701 000020

11540 046074
11641 046100
11842 046104
046104
11843 046106
11844
11845 046110
11846 046114

SEQ 0326

138
BNE
RO
POP
SUPERVISOR
oss

177776
13s:

140000

Page 373

;RESTORE SUPERVISOR £ USER STACK POINTERS

isT

002456

040000

Mondey 07-Oct-85 16:57

RTI

$ILLUP: MALT

8R
$SAVR6 : oem‘

CACHKN
9
CONTRL
SILLUP

MOV (SP)+,CONTRL
;3 THE POMER UP SEQUENCE WAS STARTED

:: BEFORE THE POWER DOMN WAS COMPLETE
:1PUT THE SP MERE

CVMJABO MSV11-J MEMORY

ROUTINE POMER

DIAG.

DOWN AND UP

MACRO Y05.02

WOOPS:

11875 046214
11876 046214

046214

11877 046220

11878 046224

s eSUBTEST

013746

005037

002102

<<POWER FAIL WHILE RELOCATED>>

POMER FAIL WHILE RELOCATED

052737

040000

046262

CO4537

046616

wu 000105

PUSH

BANK

CLR

BANK

MOV BANK, -(SP)

;MAP SUPERVISOR SPACE (TEST AREA) TO BANK

BANK

MAP

MOV
CALL

.DSABL

I ——

BANK,R3
MAPPER
CRF

SUPERVISOR
'{,2..._

177776

MOV

11880 w 013737 060024 046612
013737 060026 046614
11881
11882 046262

g'x_nt.rsu

;ENTER SUPERVISOR MODE

C
, WOOPSAV
FIRST +PURVE
-WOOPUP /2412

11885 046310

BMOV

MOV

10 004537 040732
046314 000071

11886 046322
11887 046
11888 046332
11889 046336
046
11890
11891 046342
ng 046346
11693 046350
11894 046354
11895 046360
11896 046364
11897 046370
11898 046372
046372

11899 046376

172340
126562
000010

012700
012701
012702
012021
0 ;oz
005737
oogooz
013721
013721
013721
013721
104417

002456

012637

002102

000207

172516
177576
177574
177572

‘
‘

WOOPSAV
+4

012737 000340 060026
126400
046400

;G0 TO SUPERVISOR MODE

JSR RS,BLOCK3

040732

o OMOOPUP , FIRST +PURVEC
MOV

046316
046320

MOV (SP)+,R3

FIRST «PURVEC +2, WOOPSAV+2
FIRST +WOOPUP , WOOPSAV +4 , WOOPEND -WOOPUP /2+12.

MOV

PRSI - S—
11883 oug; 012737 046400 060024
11884 046

SEQ 0327

}“‘......“‘...“....‘..‘...“.....‘...‘...0...."........‘.“...........‘..“‘

; m 012603
046240

SUBTST

Page 374

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

7 8%8333 002102
ouafi 004737 035604

11879

Monday 07-Oct-85 16:57

,
FIRST +PURVEC+2
9340

IRST +WOOPUP , WOOPEND -WOOPUP /2

WOOPUP,F

JSR RS,BLOCK3
WOOPEND -WOOPUP /2
FIRST +WOOPUP
WOOPUP

.DSABL

18:

2s:

MOV
MOV
MOV
MOV
S08
ST
BNE
MOV
MOV
MOV
MOV
KERNEL
POP

RETURN

CRF

RO
OKIPARO,
, R1
oF IRST +WOOPEND
8. ,R2
(ROYs,(R1)+
R2,1$
NOSUPER
2
MMR3, (R1)
MMR2, (R1)+
MMR1.(R1).
MMRO, (R1)+
;ENTER KERNEL MODE
BANK

MOV (SP)+,BANK

CVMJABO MSV11-J MEMORY DIAG.

vouza FAIL WMILE RELOCATED

MACRO Y05.02

Monday 07-Oct-85 16:57

WOOPUP: SUBTST

11902 046400

11903 046400 012700
ogng
012703
012702
;
O
012723

046562
172340
172300
000010
077406

ligie seate eamisy coaee
uns 046436 012037 172516
11913 046442 012037 177576
11914 046446 012037 177574
11915 ocug 012037 177572

<<POMER UP FROM BANK O TO RELOCATION>>

;s #SUBTEST

18:

MOV
MOV
MOV
MOV
MOV
MOV
S08

POWER UP FROM BANK O TO RELOCATION

oKIPARO,R1
oKIPDRO.R3
e8. ,R2
(RO)+,(R1)e
077406,(R3).
R2,1$

MOV
MOV
MOV
MOV

. MMR2
(RO)+
. MMR1
(RO)+
, MMRO
(RO)+

|‘...‘....‘.........‘..‘...‘.‘.‘..‘.‘...‘...“..‘...“.‘..0.0.‘“0......0‘.‘..‘.

PUSH

T e
SR
046462 C13746 002102

002102

CLR

046474 013703 002102

MOV

11918 046466

046472

010346

046500

004737

046504

012603

046

052737 040000 177776

11920 ougg:

035604

, RO
OWOOPEND

e
mn..mns
BANK1T

MOV BANK, -(SP)

BANK

MAP

BANK

CALL

MAPPER

.DSABL

;MAP SUPERVISOR SPACE (TEST AREA) TO BANK
MOV R3,-(SP)

BANK,R3
CRF

SUPERVISOR

olx’gm c‘,'.}-"""s“

;ENTER suveavxsou MODE

MOV
MOV

WOOPSAV, FIRST +PHRVEC
+2,FIRST +PWRVEC+2
WOOPSAV

MOV
MOV
MOV
MOV
S08

ouoovsuv.
ubonp/z.zz R1
orxast.uoom'
(RO)s,(R2)+
R1,2$

R:g; ggcsso 104417

g&mn. e

11938 046556 000137 045634

JHP

$PWRUP

11921 046514 013737 046612 060024
uozg 046522 013737 046614 060026

1192
u:g

046530
11925
046534
uug
11927 046540
11928 oug::
ii’

012700 046616
000105
012701
012702 126400
o%aoza
077102

.,“333 012637 002102
000014
000107

MOV (SP)+,.R3

GO TO SUPERVISOR MODE

;SIMULATE THE FOLLOWING BLOCK MOV BUT WITH NO sucx ACCESSES
WOOPSAV+4, =xasr.uoom' WOOPEND- WOOPUP/2+12
:BMOV

2s:

11934 046562
11937 046612

SEQ 0328

3..‘.‘..0“..‘..‘..0“‘...‘.0.....‘.‘.“.“‘...‘..0“.‘.0.0‘.“0‘..0......‘0.0..

11904 046304
11905 046410
11906 046414
11907 046420
11908 046422
11909

11919 046472

Peage 376

WOOPEND: .REPT
WOOPSAV: .REPT

;ENTER KERNEL MODE

12.
WOOPEND-WOOPUP/2+12.+2

MOV (SP)+,BANK

CVMJABO MSV11-J MEMORY DIAG.

I0 SUBROUTINES

MACRO Y05.02

Monday 07-0Oct-85 16:57

11942
11943

11944

11945
11946

2048408080480 8800808000000000000000

$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.

;*NOTES:
L ®

:
;#CALL

:#1) USING A TRAP INSTRUCTION

MESADR

$TYPE:

TSTB
BMI

$TPFLG
64

MOV

82(SP).RO

S$:
6$:

MOV
ADD

(SP)+,R0O
#2,(SP)

7%:

CMPB
BNE
MOVB

OHT,(SP)
114
@' ,(SP)

TST

(SP)e

.DSABL
$CRLF

047342

8s:
94:

010146
116601
005737
001402

$CHARCNT
44
$TYPEC
$FILLC,(SP).
4%

XOCHAR:

DECB
BR

$CHARCNT
10$

.WORD O

$TYPEC: PUSH
MOvB
TST
BEQ

$TYPEC

Rl
4(SP),R1
CACHKN
24

BE
WO

1(SP)

BLT

DECB
CALL

047156
047342

002544

CRF

104:
105337
000770
000000

<CR><LF> EQUIV
::POP
:sTYPE A CR AND LF

002356

CLRB
B8R
CALL
CMPB
BNE

;REPLACE TAB WITH SPACE
; iBRANCH IF NOT <CRLF>

LEAR CHARACTER COUNT
T_NEXT_CHARACTER
TYPE_THIS CHARACTER
T TIME FOR FILLER CHARS.?
GET NEXT CHAR.
FILLER CHARS.

NEEDED

NULL CHAR.
NEED TO BE TYPED?
--GO POP THE NULL OFF OF STACK

TYPE
TYPEIT

OCRLF ,(SP)
84

RETURN

IBRANCH IF NOT <HT>

mz Moo

CMPB
BNE

: sADJUST RETURN PC

RTI

;B8R IF IT ISN'T THE TERMINATOR
:3IF_TERMINATOR POP IT OFF THE STACK
: sRESTORE RO

11%:

047156
002652

(SP)+

38BITRALER
%Ofl
Zin
- zm

TST

(RO)+,-(SP)
74

(o]

MOVB
BNE

SAVE RO
GET ADDRESS OF ASCIZ STRING
PUSH CHARACTER TO BE TYPED ONTO STACK

RO, -(SP)

MOV

IS THERE A TERMINAL?

R IF NO

002360

: {MESADR IS FIRST ADDRESS OF AN ASCIZ STRING

TYPE

s
1

105737
100407
010046

MESADR

i *

TYPE

;#0R

~one “in R

- o9

ROUTINE TYPE

:#NOTEL:
;#NOTE2:

N=OVE~NOUV
"

.SBTTL

;#ROUTINE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERMINATE WITH A O BYTE.
;#THE ROUTINE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED.

Ov L]

nnr-no-nnnno-o-wo-:n
O

383 33838233828283

b bt

IO SUBROUTINES

SEQ 0329

] $88888880840 8804240000488 288 205080000 ER

~N~N~N~ ~N~ -~

32$LEELEL2LTIIFITATIE

fl::»pfihpwflnwo-fl»nnnnflno—o-o-.222

[
'

e o
e

s
et
L
e pet ot B -

e et s
e et e e e
et et e Pt P
P
et (e

.SBTTL

Page 378

A NULL

COUNT AS A COUNT

-J MEMORY DIAG.

MSV11
TYP&

047172

013746

MACRO Y05.02

177746

010046

104424

105777
100375

005037

133440

105777

047154
133422

11773
042737
023727

133416
177600
047154

117737

108777
1057
100375
117737
042737

ca3727
001002
000402

PUSH

CONTRL

PUSH

38:

CACHOFF
@$TPS
1STB

BPL

CLR

TSTB

047154
047154
000023

133370
133364
177600

047154
047154

047154

000021

BIC

@tC177, XOCHAR

93 TKB , XOCHAR

, 8023
XOCHAR
NC
@$TKS
CONTS3

®$TKB,XOCHAR
MOVEB
9tC177,.X0OCHAR
BIC
IF XOCHAR EQ 021
BR
ELSE

Page 378-1

133336
000015

000002

NC:

s TURN_CACHE OFF
: sWAIT UNTIL PRINTER IS READY

000012

000002

CMPB

14:

CMPB

BEQ

INCB
$CHARCNT: .WORD
$TYPEX: POP
002544
177746

1s
$CHARCNT

$TYPEX

OLF,2(SP)

$TYPEX

(PC)+
O
RO

1ST
BEQ

CACHKN
23

POP

2s:

@CR,2(SP)

RET URN

SUPLIMIT:

CONTRL

MOV RO, -(SP)

: ;CHECK _FOR XOFF
:3SKIP IF NO CHARACTER
+ ;SAVE THE CHARACTER
11STRIP _OFF ASCII
A CONTROL S?
:1WAS IT
: iBRANCH IF NOT
: sWAIT FOR CHARACTER

: sGET CHARACTER
:sSTRIP OFF ASCII
:3 IF IT IS A tQ

CMP XOCHAR,#21
BNE LA436

MOVE R1,8$TPB

BNE
CLRB

SEQ 0330

MOV CONTRL,-(SP)

BR L4437
L436:;:::::

BR
CONTS3
END ;OF IF XOCHAR

047342

12038
12059

XOCHAR

84TKS

CHP
BNE
CONTS3: TSTB
BPL

000760

12057

BPL

Move

000401

110177

Monday 07-Oct-85 16:57

La37::;::3:3;

;:LOAD CHAR TO BE TYPED INTO DATA REG.
:31IS CHARACTER A CARRIAGE RETURN?
: sBRANCH IF NO
nE’E&;-CLEM CHARACTER COUNT
i

::IS CHARACTER A LINE FEED?
nBRANCH IF YES
sCOUNT THE CHARACTER
uCHARACTER COUNT STORAGE
;IS THERE A CACHE?
:BRANCH IF NOT
:POP CACHE STATUS

MOV (SP)+,RO

MOV (SP)+,CONTRL
MOV (SP).,.R1

000800200 tsTHIS IS THE LIMNIT ON SUPERVISOR MAPPED TO MUT SPACE

12737
1

MEMORY DIAG.

MACRO Y05.02

Monday 07-Oct-85 16:57
.SBTTL

USE THIS
PERRO1

Page 393

SEQ 0331

ERROR DATA SETUP

IF THIS CONDITION DISCRIBES THE ERROR
BAO DATA IN RO UNLESS ABORTED
HEN BAD DATA IS POINTED TO BY -(R4)

GOoD DATA IN RS
PERRO2

BAD DATA_IN R1 UNLESS ABORTED

THEN BAD DATA IS POINTED TO BY -(R4)

GOOD DATA IN R2
PERRO3

OAD DATA IS POINTED TO BY -(R1)
GOOD DATA

PERRO4

PERROS

TRAP

BAD DATA_IN R4 UNLESS ABORTED
THEN BAD DATA IS POINTED TO BY -2(RO)
GOOD DATA IN R2

JSR
PC
BAD DATA IS POINTED TO BY -(RO)
GOOD DATA
IN R2

RETURN AFTER SETTING UP GOOD,BAD,ADDRESS

PERRO6

JSR

BAD DATA IS POINTED TO 8Y -(RO)

GOOD DATA IS ZERO
RETURN AFTER SETTING UP GOOD,BAD,ADDRESS
PERRO7

TRAP

BAD DATA_IN R2 UNLESS ABORTED

THEN BAD DATA IS POINTED TO BY (R1)
GOOD DATA IN DATBUF

PERR10

PERR11

TRAP

BAD DATA_IN 32 UNLESS ABORTEC
THEN
BAD DATA IS POINTED TO BY 2(R1)
GOOD DATA IN DA‘l’O\F +2
TRAP

BYTE TEST
BAD DATA IN RIGHT BYTE OF RO UNLESS ABORTED
THEN BAD DATA IS POINTED TO BY (R1)
GOOD DATA IS A ZERO BYTE

PERR12

TRAP
BYTE TEST

BAD DATA_IN RIGHT BYTE OF RO UNLESS ABORTED
THEN BAD DATA IS POINTED TO BY (R1)
GOOD DATA IS A BYTE OF ONES

PERR13

TRAP

BAD DATA IN RO UNLESS ABORTED

CVMJABO MSV
ERROR DATA

CVMJABO MSV11-J MEMORY DIAG.

ERROR DATA SETUP

MACRO YOS .02

Monday 07-Oct-85 16:57

Page 393-1

THEN BAD DATA IS POINTED TO BY (R1)

12794

GOOD DATA IS ZERO
PERR14

TRAP

BAD DATA_IN RO UNLESS ABORTED
THEN BAD DATA IS POINTED TO BY (R1)
GOOD DATA IS ONES

PERR1S

PERR16

PERR17

TRAP

BAD DATA_IN RO UNLESS ABORTED
THEN BAD DATA IS POINTED TO BY (R1)
GOOD DATA IN TSTDAT
TRAP

BAD DATA._IN RO UNLESS ABORTED
THEN BAD DATA IS POINTED TO BY (R1)
GOOD DATA IN TSTDAT.2
TRAP

BAD DATA_IN RO UNLESS ABORTED
THEN BAD DATA IS POINTED TO BY (R1)
GOOD DATA IN R2

PERR20

PERR21

TRAP

BAD DATA_IN RO UNLESS ABORTED
THEN BAD DATA IS POINTED TO BY (R1)
GOOD DATA IN R3
TRAP
7 BIT BYTE TEST

BAD DATA IN RIGHT BYTE OF RO UNLESS ABORTED
THEN BAD DATA IS POINTED TO BY (R1)
GOOD DATA IS A 7 BIT BYTE ON ONES
PERR22

TRAP

BAD DATA_IN R2 UNLESS ABORTED

THEN BAD DATA IS POINTED TO B8Y (R1)

GOOD DATA IN RO
PERR23

TRAP

BAD DATA_IN RO UNLESS ABORTED

THEN BAD DATA IS POINIED TO BY (R1)

GOOD DATA IN R4
PERR24

TRAP

BAD DATA_IN RO UNLESS ABORTED

THEN BAD DATA IS POINTED TO BY (R2)
GOOD DATA IN R3

PERR25

TRAP

BAD DATA POINTED TO BY -(R1)
GOOD DATA IN R2 UNLESS LOC V177654 IS SET
THEN GOOD DATA IS IN R3

PERR26

TRAP

BAD DATA IS DOUBLE WORD POINTED TO BY R1 AND IN LOW 7 BITS OF RO
GOOD DATA IS 000000, ,100000,,100

SEQ 0332

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Monday 07-Oct-85 16:57

PERR27

PERR30

Page 393-2

TRAP

BAD DATA IS DOUBLE WORD POINTED TO BY R1 AND IN LOW 7 BITS OF RO
GOOD DATA IS 000000, ,000000,,077

G0 W

G0 S8

ERROR DATA SETUP

TRAP

BAD DATA IS POINTED TO BY -16(SP)

PERR31

TRAP

PERR32

TRAP

PERR33

TRAP

PERR34

TRAP

BE G0 Ge G4
S6
T
e BE
Be Be Be Be
B
e Be B8 T

GOOD DATA IS IN R1

PERR35

SPECIAL ECC FAILURE HANDLER
SPECIAL ECC FAILURE HANDLER

SPECIAL ECC FAILURE HANDLER
SPECIAL ECC FAILURE HANDLER
TRAP

SPECIAL BRANCH GOBBLE FAILURE HANDLER

CALLING SEQUENCE FOR TRAP TYPES
:NO - ERROR,BRANCH FOR CARD
2s
BEQ
;TRAP TO ERROR ROUTINE
PERRXX
INSTRUCTION
;CONTINUE TESTING
NEXT

"
SEQ 0%’

CVMJABO MSV1 -J MEMORY DIAG.
TUP
ERROR DATA

12881 047364
047370
12
12883 047376

010437

12884 047402
12885 047406

002034

MACRO Y05.02

002034

$PEROL: MOV

suB
MOV
MOV

Page 395

SEQ 0334

R4, ADDRESS

02.ADDRESS
RO.BAD
RS,

JMP PERRAW

050120

12886

Monday 07-Oct-85 16:57

002034

$PERO2: MOV

suB
MOV
MOV

R4, ADDRESS

02, ADDRESS
R1.BAD
R2.GOOD

JMP PERRAW

002052

002034

SuB

e, ADORESS

JMP

$PERO4: MOV

SuB
MOV
MOV
JHP

ADD

CALL

034040

R1,ADDRESS

-z(anBAD
MOV PERRAW
MOV

" MOV

002034

12929
12930 047644

$PERO3: MOV

RETURN

RO, ADDRESS

@2, ADDRESS
R4 ,BAD
R2,GOOD
kma

Aoéuess

z ‘RO

BADSTACK

005037
000764

002044

PERRO6: CLR

GO0D

010137
010237
013737
000137

002034

$PERO7: MOV

R1,ADDRESS

010137
062737

002034
000002

010237

002052

013737
000137

002244
050120

010137

002034

010037

002052

005037
000137

002044
050172

MOV
MOV
JMP

002242

050120

PERAOS

2.8AD
DATBUF
, GOOD
PERRAW

$PER10: LET ADDRESS := R1 + #2
002034

002044

LET BAD := R2
LET GOOD := DATBUF+2

JMP

PERRAW

$PER11: LET ADDRESS := R1
LET BAD := RO

LET GOOD := @0

JMP

;RESTORE RO

PERRAB

$PER12: LET ADDRESS := R1

§ &4

00203-.

R1,ADDRESS
#2,ADDRESS

R2.8BAD

MOV DATBUF +2,G00D

MOV R1,ADDRESS

MOV RO,.BAD
CLR GO0D

CVMJABO MSV11-J MEMORY DIAG.

ERROR DATA SETUP

047644

010137

0476

010037

12931 0476;8
12932 047654
047654
12933 047662

002034
002052

MACRO Y05.02

000377 002044

T 050172

Monday 07-Oct-85 16:57
LET BAD := RO

JMP

vie il

PERRAB

Page 395-1

MOV R1.ADDRESS
MOV RO.BAD

MOV #377,G00D
!

SEQ 0335

CVMJABO MSV11-J MEMORY DIAG.

ERROR DATA

SETUWP

12936 047666
12957 04
04767
12938 047676
047676

{53 o
12941

047706

12942 0477

12943 0477
7

010137

002034

010037

002052

005037
000137

088120

010137

002034

010037

002052

013737

002614

010137

002034

10037

002052

013737
000137

002246
050120

010137

002034

000137 050120

MACRO Y05.02

$PER13:

LET GOOD
JHP

:= R1

LET GOOD := ONES

002044

JHP
$PER1S:

PERRAW

LET ADDRESS := R1

LET BAD := RO
LET GOOD := TSTDAT
JHP

PERRAW

$PER16: LET ADDRESS := R1
LET BAD := RO

LET GOOD := TSTDAT.2
BR

PERRAW

$PER17: LET ADDRESS

:= R1

LET BAD := RO

010037

LET GOOD := R2

PERRAW

$PER20: LET ADDRESS := R1

010137

LET BAD := RO

010037

LET GOOD := R3

010337
000435

159 9 9004u
1guosoo

PERRAMW

LET BAD := RO

010137

B8R

000177

PERRAMW

$PER21: LET ADDRESS := R1

002034

LET BAD := RO

010037
012737
000477

:= #0

SPER14: LET ADDRESS

013737
000453

12967

LEY ADDRESS := R1
LET BAD := RO

010037

010137

Mondey 07-Oct-85 16:57

002044

LET GOOD := @177

B8R

PERRA7

$PER22: LET ADDRESS := R1

Page 397

SEQ 0336

MOV R1,ADORESS
MOV RO,BAD

CLR GOOD

MOV R1,ADDRESS
MOV RO,BAD

MOV ONES ,GOO0D

MOV R1.ADDRESS
MOV RO.BAD
MOV TSTDAT,GOOD

MOV R1,ADDRESS

MOV RO,.BAD
MOV TSTDAT.2,G00D

MOV R1,.ADDRESS
MOV RO,.BAD
MOV R2,G00D

MOV R1,.ADODRESS
MOV RO,BAD
MOV R3,G000D

MOV R1,ADDRESS
MOV RO.BAD

MOV #177,.G00D

CVMUABO

MSV11-J MEMORY DIAG.

ERROR OATA SETUP
12972
12973
76

12977

ifi:

4
4

100

12982

12963

12984

002034

010237

002052

gg‘on

002044

010137

002034

010037

002052

Ogfll'l

002044

010237

002034

010037

002052

010337

002044

12978

010137

116

MACRO YO0S.02

Mondsy 07-Oct-85 16:57

’

LET BAD := R2
LET GOOD := RO

PERRAM

$PER23: LET ADDRESS := R1

LET BAD := RO

LET GOOD := R4

PERRAW

S$PER24: LET ADDRESS := R2

LET BAD := RO

LET GOOD := R3

PERRAM

Page

- 397-1

SEQ 0337

MOV R1,ADDRESS
MOV R2,BAD
MOV RO,GOOD

MOV R1,ADDRESS

MOV RO,.BAD
MOV R4 ,GO0D
MOV R2,ADDRESS
MOV RO,BAD
MOV R3,GOOD

VMJABO

MSV11-J MEMORY DIAG.

Emoa Dlfi Séfl’

MACRO Y05.02

Monday 07-Oct-85 16:57

PERRAW:

12986 050120

SUBTST

12989

004737
001

050354
002144

132
136

004737

045160

1
142

005737
001

002022

%{“

004737

034040

004737

050330

005737
001002
104011

002144

1
160
162
164

000401

132 i
1299

164

12994

{2 104012

12996

170

12997
12998 050172

1
1

13001

050172

050176
176
10

DATA WAS A WORD

1008800880008 0840000888880088880004800000048000008408040000000080000000000000000

PERBNK
CALL
IF ABORTFLAG IS TRUE THEN $CALL GETDATA

IF BADPC EQ @0 THEN $CALL BADSTACK

PERXOR
CALL
IF ABORTFLAG IS FALSE

TST ABORTFLAG
BEQ L440
JSR PC,GETDATA
L840:;33433

TST BADPC
BNE L44)
JSR PC,BADSTACK

La41:;555:33

TST ABORTFLAG
BNE L4442

ERROR +11

Lote

ERROR

000002

BR L443
$s88833

END ;OF IF MTFLAG
RTI

PERRAB: SUBTST

<<DATA WAS A BYTE>>

i sSUBTEST

DATA WAS A BYTE

004737

050354

005737

002144

001
004737

004737

050330
002144

13004
13005

34
36

005737
0010¢C2

104015
113007 m
050242
000002

IF ABORTFLAG IS TRUE THEN $CALL GETDATA

IF BADPC EQ @0 THEN $SCALL BADSTACK

lmg
1300

000401

PERBNK

045160

034040

104014

188800800 8040808008080888488800888088888888880880880480220808280004088000080000

CALL

!
|

BNE L44S

JSR PC,BADSTACK

tis8s3s

Y.S‘Y LDNYFLAG
|

ERROR .14

ELSE

RTI

TST BADPC

PERXOR

END :;:0F IF ABORTFLAG

LA44:;; ;:::

IF ABORTFLAG IS FALSE

ERROR +15

]

TST ABORTFLAG
BEQ LA44A
JSR PC.GETDATA

Lees
CALL

LOAS:;;:::::

180808 8 0004808080080888888800800082880288880888888848848488888080280800880080000000

005737
001002
004737

050242
13008 050242

<<DATA WAS A WORD>>

ELSE

10
i4
16

050236

SEQ 0338

1088840800808 8000008080088088084008808080400000000004088800080000000000000000000

1#SUBTEST

{2907 050{22

Page 398

BR L4477

R R

LO&T: ;55353

‘
|

‘

Smsflivtgii MEMORY DIAG.

MACRO Y05.02

13011 050244

13012 050244
050244

13013
13014
13015
{"8}?

13018
13019

gggsoo
306

{soa

050316

ggggg:

mmI 050330

PERRA7: SUBTST

<<DATA WAS A 7 BIT BYTE>>

1 oSUBTEST

DATA WAS A 7 BIT BYTE

SEQ 0339

].““...‘....“.‘....‘.‘........“....‘.‘.“...“...0‘...‘.‘..........O‘.‘..‘.‘

005737

002022

004737

034040

001002

IF BADPC EQ 90 THEN $CALL BADSTACK

CALL
CALL
ERROR

000002

RTI

012737

100000

002046

012737

000100

002050

000137

044746

012737

000137

000077

044746

1ST BADPC

BNE
L450
JSR PC,BADSTACK

004737 050330
004737 050354
104022

$PER26: LET GOOD2 := 9100000
LET GOOD3 := @100
JMP PERRAS

$PER27: CLR
002050

PERXOR
PERBNK
+22

LaSO:;:5:33:

MOV @100000,G00D2

MOV ©100,G00D3

G00D2

LET GOOD3 := 9077
JMP PERRAS

MOV 9077,G00D3

PERXOR: SUBTST <<DETERMINE XOR OF GOOD & BAD>>

;...‘.........0.............‘.‘.‘....“.‘..‘.......‘..0..‘..‘OO“.......O..“‘..

1 8SUBTEST

DETERMINE XOR OF GOOD & BAD

|...‘.“.“....“.‘.."..‘.‘..‘..‘..‘....“....‘...‘....‘...‘............“.....

050330
330

010046

350
13032 050352

012600
000207

13027

Page 400

|“...“‘.‘......‘.‘......‘....“......“....“‘...0‘.‘..‘.‘.......“‘......‘..‘

uozg 050312 005037 002046

13023

Monday 07-Oct-85 16:57

050332 013700 002044
13028
336 013737 002052 002060
1
130 gggm 074037 002060
13031

PUSH

MOV
MOV
XOR
POP

RETURN

GOOD, RO
BAD ,BADXOR
RO,BADXOR
RO

MOV RO, -(SP)

MOV (SP)+,RO

CVMJABO MSV11-J MEMORY DIAG.

DETERMINE XOR OF G000 € BAD

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 402

SEQ 0340

PERBNK: SUBTST<<LOG ERROR ON BAD BANK>>

13035 050354

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

;#SUBTEST

LOG ERROR ON BAD BANK

13053
13054

B R

1
1
1
1

s WHILE %nslneas LET'S MARK THE BAD BANK IN THE CONFIGURATION TABLE

13055

13038
13057
13638
13059
13060
13061
1’“3
1306
13064

002102

MOV

000001
002666

8IS

002554
177777

002406

12%:

11%:

BANK ,R1

ASL
ASL

R1
R1

INCB
BNE
DECB
CcMPB
BLOS

CONFIG+2(R1)
124
CONFIG+2(R1)
CONFIG+2(R1),ERRMAX
11s

SET

POP

010037

002052

023737

002034

013737

002246

00&004

#8170,CONFIG(R1)

TOOMANY

:SET _BACK TO 255.
: 1S IYS:AST MAX?

iNO
;YES

R1,.RO

002412

MOV TSTDAT,GOOD
ELSE

013737

002250

MOV __ TSTDAT.2,G00D
END ;OF IF (R1)

004737

050330

012737
000207

177777

CALL
SET

023727

002300

001001

002612

PERXOR
HEADER

RETURN
$PER31:

IF REALPAT EQ @41
ERROR +23
END

IF BADPC EQ 00 THEN $CALL BADSTACK

002022
034040

o—g:
§~l cvg
ilfi

;:BUMP BANK COUNTER
:NO OVERFLOMW - SKIP

PERECC: MOV
RO,BAD
IF ADDRESS EQ TESTADD

000403

MOV RO, -(SP)
MOV R1,-(SP)

RETURN

e et (o ek bt

et o Dt

§ F EREREREESE X

1060088000000000080000000008000080000840000048000000008000000000000000000000000000

CALL

050434

002300

000011

PERECC

IF REALPAT EQ #11

ERROR +37
END ;0F IF REALPAT

CMP ADDRESS,TESTADD
BNE LAS1
BR L4S2

LAS1:::33533

L8S2::3:3::

MOV

@&-1,HEADER

CMP REALPAT, 041
BNE LA4S3
LA53::::::3

TST BADPC

BNE LASA
JSR PC,BADSTACK
LASE:;:;:::::
CMP REALPAT, 011

BNE LA4SS

MACRO Y05.02

050544

10w 555
13070 3§

13071

13072

13073

13074

13075
13076

023727
001001

002300

000016

001001

012737
000002

IF REALPAT EQ @16
ERROR +44

104044

END ;OF IF REALPAT

IF REALPAT EQ 015
ERROR +43
END ;OF IF REALPAT

104043

5 023727
0

000015

Monday 07-Oct-85 16:57

177777

002612

SET HEADER
RTI

Page 402-1

SEQ 0341

LASS::53343

CMP REALPAT, 015
BNE LA4S6
LAS6::5333:

CMP REALPAT, 016
BNE LAS7
LAST:3333:3

MOV

@-1,.HEADER

CVMJABO MSV11-J MEMORY DIAG.
LOG ERROR ON BAD BANK
005737

001002
004737

012737
104040

177777

002612

012737
000002

177777

002612

N~ -~

eE Y- X)) »

EE - g o-ogo-gwn

010137

002044

012737
104041

177777

002612

012737
000002

177777

002612

005737
001002
004737

002022

032737

100020

SEQ 0342

MOV
MOV
MOV
SET

R1,ADDRESS
RO,.BAD
R2,G00D
HEADER

ERROR

+40

SET

002150

RTI

MOV
MOV

R1,ADDRESS
RO,BAD

MOV

#377,G00D

CLRB
CALL
SET

ERROR
SET

PERXOR
HEADER

+41

HEADER

IF 0BIT1S5!BIT4 OFF.IN CSR

ELSE

ERROR +1

END ;OF IF #BIT15!BIT4
RTI

002052

002044

MOV

ERROR
ADD
RETURN

MOV

@-1,HEADER

&-1,HEADER

MOV

@-1,.HEADER

BIT #BIT1S5!BIT4,.CSR
BNE L463

:NO SBE OR DBE

BR L4664
L863:3::3::

;:EXPECTED SBE SO DBE MUST HAVE GOTTEN SET
LA64:;:;:::::

PERBNK

BADSTACK
BADPSHW,BAD

012,G00D
+47
04 ,5P

MOV

TST BADPC
BNE L462
JSR PC,BADSTACK
L462:;::::3:

;DURING BRANCH GOBBLE THE CONDITION CODES WERE WRONG

CALL
MOV

@-1,HEADER

TST BADPC
BNE L461
JSR PC,BADSTACK
L461:;:::5::3

RTI

$PER35: CALL

MOV

BADs1

ERROR +16

000002

TST BADPC
BNE L4660
JSR PC,BADSTACK
L460:;::3:3

HEADER

034040

104001

062706
000207

404

$PER34:IF BADPC EQ #0 THEN $CALL BADSTACK

000401

104047

$PER33: IF BADPC EQ @0 THEN $CALL BADSTACK

005737
001002
004737

004737
004737
013737
012737

Page

034040

002034
002052
002044

001002
104016

Monday 07- Oct-85 16:57

$PCR32: IF BADPC EQ #0 THEN $CALL BADSTACK

002022

010137

ngn gr- og»gr-

13079 050600
050600

MACRO Y05.02

;FIX STACK FROM TRAP
;:ABORTING TEST

HSVll J MEMORY DIAG.

CVHJ

0G
ERROR ON BAD BANK
13115

ii
N

000

33 38 3§§§
2 335
35

et
e bt
s

e g

SRNEae=
Ba

13118 051

MACRO Y05.02

Monday 07-0Oct-85 16:57

$PER36:

010037
010137

002044
002052

012737
104023

177777

002612

012737
000002

177777

002612

RO,GOOD
R1,BAD

ERROR
SET

+23
HEADER

SEQ 0343

HEADER

RTI

104053
000002

$PER37:

104054

$PER40O:

000002

MOV
MOV
SET

Page 404-1

ERROR

sILC; ;REV
;ILC; ;REV

ERROR
RTI

+54

:ILC; ;REV
:ILC; ;REV

RTI

MOV

@-1,HEADER

MOV

@-1,HEADER

CVMJABO MSV11- J FEMY DIAG.

MACRO Y05.02

Monday 07-Oct-85 16:57

.SBTTL

Page 406

SEQ 0344

ROUTINE SCOPE HANDLER

|‘“..‘.‘..‘..““.‘.‘.“‘.“‘.‘.‘..‘.““.‘.“.‘.‘..“.....‘..0‘...‘....‘..“‘.

nTHIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT
#AND LOAD THE DISPLAY DATA INTO THE DISPLAY REGISTER

IOTO'E SWITCH OPTIONS PROVIDED B8Y THIS ROUTINE ARE:
;#SW14=1

LOOP ON TEST

SCOPE
i
$SCOPE: INC

$DEVCT

;#SW9=1 LOOP ON ERROR
;#CALL

8 1

Pt ot e o (et

s Pt

833883838383§38388888388
RERSLENEN 38

e e e e e

8 e e et e e

CHHWEHWEHWEEHWHEWEE

e e e

HEHW

e et b e e et e e e

GHEHEEEHE
R EWk%

r-no-nnu:o-no-nn gy : L dalatotiaisleteatadedLaR2g o3358 & TM 31 ettt 8

ROUTINE SCOPE HANDL

051166

056726

IF RESULT IS LT

CKSWR

TST
BEQ

006304

055222

:
NOTRCE

052364
000001

CALL
TST

BEQ
MOV

052362
052362

BIT
BEQ

SKJ:

002420

000400

BGE L465

$DEVCT
CLR
S$UNIT
INCB
END ;OF IF RESULT

056726
056730

177766

: :SCOPE=IOT
;TELL APT WE ARE ALIVE

TRACE
NOTRCE

::TEST

L“S“suu

FOR CHANGE IN SOFT-S

CONTT

1 TRACE

CPERRF

;IS TD'ERE A CPU ERROR REGISTER?

:IS THE POWER FAIL MONITOR BIT SET?
;sBRANCH IF NOT
ERROR
;:REPORT IF SO
IF STOPOK IS TRUE AND OSUG SET.IN 8SWR

TST
BEQ
BIT
BEQ

STOPOK
CLR
EXIT
JMP
END ;OF IF STOPOK

END ;OF IF NOSCOPE
040000

131436

14:

IF oSuWl4 SET.IN 8SWR THEN GOTO $OVER

L867:3:::33:

; #0000START OF cooe FOR THE XOR TESTERO"“

iXTSTR: BR
0V0004
051230
177060

000005

177766

1s:

BIT #SW14,8SWR
BNE $OVER

{IF_RUNNING ON THE “XOR” TESTER CHANGE

MOV
MOV

ERRVEC,-(SP)
@1%,ERRVEC

A “NOP* (NOP=240)
11TMIS INSTRUCTION TO
:iSAVE THE CONTENTS OF THE ERROR VECTOR
SET FOR TIMEOUT

MOV
BR

(SP)e,ERRVEC
$SVLAD

1iRESTORE THE ERROR VECTOR
}GO TO THE NEXT TEST

004064

STOPOK
L466
#SW8,8SWR
L466

TST NOSCOPE
BEQ L467

RTI

13168 051170
}172
13169

ADD
CMP
BNE

CLR

iR-C
;R-C
:R-C
sR-C

L466:;::::3

IF NOSCOPE IS TRUE

002440

;iR-C
sR-C

#81IT0,CPSAVE
SK

131466

002420
040512

iR-C

SKJ
;BRANCH
IF NOT
89177766 ,CPSAVE aGE'l CONTENTS OF ERROR REGISTER

13060 "Corime oUtON XOR?

o4,5P
#5,PROTYP
64

CPUERR

IX _STACK FROM TRAP
?
:IS THIS AN 11/83

:BRANCH IF NOT

sRESET CPU ERROR REGISTER

O MSV11-J MEMORY DIAG.

CVMJAB
SC& HANDLER
ROUTINE

13183 051250

012637

MACRO Y05.02

(SP)+ ,ERRVEC
443

000004

13184 031534 Goddor 002014

i g3ised o7

001000

ggl”‘ 1.050%7 002014
131’3
1319 831310 011637
004737 051336
13196 831333
013716 002622
0513
13197
13198 051334

Monday 07-Oct-85 16:57

Page 406-1

SEQ 0345

+ sRESTORE THE ERROR VECTOR

33l O0P ON THE PRESENT TEST

CODE FOR THE XOR' TESTER0®00®

131344
002622

$ERFLG
$SVLAD
gsw . 3SWR
$
SLPERR, $LPADR
$OVER
$ERFLG

(SP), $LPADR
(SP), $LPERR
$ESCAPE

GETDIS
$LPADR, (SP)-

;sHAS AN ERROR OCCURRED?
13BR IF NO
;:LOOP ON ERROR?
:3BR IF NO

:3SET LOOP ADDRESS TO LAST SCOPE
: sZERO THE ERROR FLAG
: 1SAVE SCOPE LOOP ADDRESS
: ;SAVE ERROR LOOP ADDRESS
: sCLEAR THE ESCAPE FROM ERROR ADDRESS
: isFUDGE RETURN ADDRESS
3+ sFIXES PS

SR—

CVMJABO MSV1l-J MEMORY DIAG.
HANDLER
INE

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 407

GETDIS: SUBTST

<<SUBR

DISPLAY>>

30$UOYE$T

SUBR

DISPLAY

SEQ 0346

0
400000000000000000
0400000000000800808R8
1588848888880 884000088088888088080004

F Y

o R
TM
-

1o s e et et et s

268
&

Pt
Pt

002102
300

002013
002012

] .....‘.‘...‘.““‘..‘.“.0..."....“.“.‘...‘...““..““.....“““.0..““.
MOVB
aANx

MOVB
PUSH

002126

370 013777
70

376

013737

404

012600

051406

000207

100000

002012

002012
002012

131242
000174

1%:

$PATMAR
énr

;ARE WE RELOCATED?

MOV RO, -(SP)

TST
BEQ

RLFLAG
14

#8IT15, SPATMAR

- SKIP
iNO
lYES - SET MSB

MOV
MOV

AR
, BDISPLAY
$PATM
R
. DISPREG
$PATMA

:SOFTWARE DISPLAY REGISTER

8IS

POP

RETURN

MOV (SP)+,.RO

CVMJABO MSV1l1- J 'EMY DIAG.
ROUTINE ERROR MANDL

MACRO Y05.02

Monday 07-Oct-85 16:57

"......‘.“.‘.....“..“.‘...“....‘.““..".“‘..‘.“...“....“..‘...‘...“.

INHIBIT ERROR TYPEOUTS
BELL ON ERROR

1eSW13=1
14SW10=1

1
1

132

14SW9=1 LOOP ON ERROR

iu 8

;«CALL

1322

051410
1414
1416
031420

13242

005737 002430
031836
1434 001027

13243

031434

KAL:

052360

051436 104410

051440
13244
051440
13245
1444
1
051446
13247
13248 051452
13249 051460
051466
1
13251 051470
051470
13252 051474

051474

13253 051

105037

031

051336
002012
002000

104401

002653

104401

066130

005237

002630

BACK:
18:

002014

105237
001775
004737
013737
032777
001404

056722
131150

13255 031306 019797 077777 002630
13256 ”}3{2
13257 081314

002020 002020
011637
1338
1
000002
162737
1
3
0
13339
031326 010637 002024
13260

13261 051 016637 000002 002030
13262 051540 117737 130254 002015
13264 031346 122737 000177 002015
13265 031554 001431
13266 051556

105737

052360

13267 051562 001024
13268 031364 005737 052364
13269 051570 001423

ERROR

LENABL

LSB

$ERROR: TST
B8EQ
CLR
JSR

005737 003762
001403
005000
004737 052220

13237
1
113240
13241

SEQ 0347

.SBTTL ROUTINE ERROR MANDLER
14THIS ROUTINE WILL INCREMENT THE ERROR FLAG AND THE ERROR COUNT,
sSAVE THE ERROR TTEM NUMBER AND THE ADDRESS OF THE ERROR CALL
1#AND GO TO SERRTYP ON ERROR
14THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE:
HALT ON ERROR
1eSW1S=1

13217
1321.
13219
13220
13221
1322
13223

Pege 409

CLR8

UFDFLG
KAL
RO
PC,ABORT
IBSAVE

WR
CKSWR

INCB $ERFLG
1§
8EQ
CALL GETDIS
$PATMAR,STESTN
MOV
#SW10,B8SWR
BIT
29
8EQ
TYPE $BELL
TYPEIT |, $BELL

.DSABL

CRF

13K ARE WE IN UFD MODE
11K IF NOT DO NOT TRY ABORT
ELSE CLEAR CNTRL Z AND C AND
11K
i 1K CHECK FOR UFD ABORT
JR-C

:sSET THE ERROR FLAG
1iDON'T LET THE FLAG GO TO ZERO
:SETUP DISPLAY STUFF
:FOR APT
1 sBELL ON ERROR?
1iNO- SKIP
1 1RING BELL

MSGO14

;CONTROL Z

INC

SERTTL

: sCOUNT THE NUMBER OF ERRORS

RSGO14

IF RESULT IS MI

MOV 877777, $ERTTL
END ;OF IF RESUL
END ;OF IF NOERROR

MOV
SuB
MOV
MOV
MOV
CMPB
B8EQ
1ST8
BNE
ST
B8EQ

(SP).E
eé»c
8.

H
zcénERRPS
RRPC.$ITEMB
#177,$ITEMB
10014
IBSAVE

1000$
CPERRF
10014

TST NOERROR

BNE L470

;s TEST FOR CHANGE 1IN SOFT-SWR

TYPE

TYPEIT

28:

: sERROR=EMT AND N=ERROR ITEM NUMBER

sR-C

soL Lar

LA71

GET ADDRESS OF ERROR INSTRULHEOH'

;:STRIP AND SAVE THE ERROR ITEM CODE
;IS THIS IFTHESOPOMER FAIL CALL?
:BRANCH
12N0 ERROR CALL?

1BRANCH T
1O MTRERE A cru ERROR REGISTER?
:BRANCH IF NO

iR-C
iR-C

iR-C

R-C
iR-C
iR-C

CVMJABO MSV11- J ttnoav DIACG.

RWTI'C ERROR HANDL
13270 051572 013737

177766

MACRO Y05.02

BIT

BEQ
BIC

3 1606 001414 000001 177766
1327 051610 042737 002015
052360
1‘3; 112737 000177 002015

13275

13276

051634
13277
13278 031“0
1 3280

13281

lgsg

1
13286

€3

SERREREEE

13279 83

105037

052360

005737
001043

002430

005737
oog;o

002022

13737

002022

1000¢:
1001$:

002020

162737 000002 002020

1704
051710

013737
004737

002020
050354

056720

032777 020000 130706
”i;ug 001401
831

051732
13290
13291 ggl?!‘
1734
13292 051734
ggl"“

1742

000420

032777
001404

000040

13294

13295

1329
1
1
13

051
1
051754
1754

1754

1760
1760

051764
8317
1772
051774
051774

iR-C

O$ITEMB,IBSAVE

;MAKE IBSAVE NON-ZERO FOR DUAL CALL

iR-C

0177, 41TEM8

CLRB

IBSAVE

10014

NO
umcu IF .I
ACLEM THE

:SET $ITEMB TO POWER FAIL POINTER

130674

005737
001403
013706
000207

002276
002274

iR-C

TST BADPC
BEQ L473

nov novc ERRPC

ERRPC

ERRSP
nov nésr
BADPSW,ERRPSW
MOV

CLR BADPC
END ;IF

MOV ERRPC, $FATAL
CALL PERBNK

W TUR N A S

;FOR APT
::L0G ERROR ON BANK

BR 3¢
END ;OF IF OSW13

IF @SWS SET.IN 8SWR AND TOOMANY IS TRUE

L873:533333

#SWH13,aSWR
BIT
BEQ L4774
L&78:;;:;5:::
BIT #SWS,aSWR
BEQ L4TS

ot Lars

GOTO 34

BR 3

L&7S::::333

END ;0F IF NOERROR

052366

iR-C

TST NOERROR
BNE L472

END ;OF IF @SuUS

004737

iR-C
iR-C

IF NOERROR IS FALSE

031780 0ote0L oi0¢

13293 gl%
1752 000410

;SAVE CONTENTS

MOV

iR-C

s POMER MITN BIT SET?

IF BADPC NE @0

002024
013737 oozogg
0020
002030
1676 013737
CO0S037 002022

1710
13287 051710
13288 81716

000402

SEQ 0348

OOITO CPSAVE

O.ITO 177766

MOV

112737

Pege 409-1

177766,CPSAVE

MOV

052362

13271 051600 032737 000001 052362
13274 051616

Monday 07-Oct-85 16:57

CALL

SERRTYP

MOV
RTS
END

SP
SAVMON,
PC

IF MONFLG IS TRUE

L&72::::333

::G0 TO USER ERROR ROUTINE

::SHOULD WE RETURN TO XXDP noummn
T MONFLG
;s :GET MONITOR ADDRESS
::G0 TO MONITOR
i

fifi L476

LAT76:::3:::

CVMJABO MSV11-J MEMORY DIAG.

ROUTINE ERROR HANDLER
13302 0351774

MACRO Y05.02

002430

774

SHALT:

74:

Page 410

SEQ 0349

IF NOERROR IS FALSE

TST

13063¢C

006
032777
N&‘O&
013716

Monday 07-Oct-85 16:57

@SHR

HALT

BNE a7 o

1 sHALT ON ERROR

:3SKIP IF CONTINUE

BPL

1 tHALT ON

)

;TEST FOR CHANGE IN SOFT-SWR

CKSWR

IF NOSCOPE IS FALSE AND OSW9 SET.IN SSWR

ST ugggon
BNE L

BIT #SW9,aSWR

130606
MOV SLPERR,(SP)

END ;OF IF NOSCOPE

TST

005737

$ESCAPE
94

BEQ

o1871e

004064

$ESCAPE,(SP)

MOV

8E€Q LS00

; sFUDGE RETURN FOR LOOPING

IF DETFLAG IS FALSE

1 1CHECK FOR AN ESCAPE ADGRESS
11BR IF NONE

. I EERER

1 sFUDGE RETURN ADDRESS FOR ESCAPE

CMP #5,PROTYP

BNE 114
CLR CPUERR

1ST DETFLAG

BNE LSO01

;IS THIS AN 11/83 ?

118: IF ACTFLAG IS TRUE OR APTFLAG IS TRUE OR FATALS IS mz

T ACTFLAG

u LS02

1ST APTFLAG

BNE LS02

000001
040512

005737

052142

13322 052144
052144
13323

1
1R

13327
13328

13329

13330

i
gt
m

052164
164
166
052166
1

174

101410

MOV

056716

JMP

104401

070121

013700
005037
000137

000042
000042
013710

EXIT

IF XXDPCHAIN IS TRUE AND SERTTL HI €20

000020

TYPE
MSGO66
,MSGO66
.DSABL CRF
42,R0
MOV
CLR
42
JHP
$ZAP42

TYPEIT

END ;OF IF XXDPCHAIN

ELSE

177777

002612

LS03:;::::333

TST XXDPCHAIN

BEQ LS04

END ;OF IF DETFLAG

012737

sFOR APT

END ;OF IF ACTFLAG

002354

002630

o1, $MSGTY

TST FATALS
BEQ LS03
LS02::::5333

SET

HEADER

END ;OF IF NOERROR

ov onm. 020
:ERROR COUNT EXCEEDED zo noamn FOR XXDP CHAIN

LSO8:;::::::

LaT?

R R

R ERER
R

MOV @-1,HEADER

MACRO Y05.02

104:

%"’" 003430
i s
7

052360
2134:

£52%
&
%

e
-

e
3

:
ABORT

003762
000032

000003
003764

ABORTC:

100¢:

177777
o

omun-‘rnomegz

A A

A S

}

A A

AP AT A

NN NN

737
001443

LSOS:ss534

1STB

IBSAVE

;POMER FAIL ERROR CALL? iR-C

BACK

iJUMP IF SO

JHP

RTI

2134

1 sRETURN

iRiR-

$ABORT

.S8TTL

0067;}

SEQ 0350

CLEAR

8EQ

051440

Page 410-1

TOOMANY,NOERROR

ABORTE:

ABORTZ:

ABORT ROUTINE FOR LCP/ORION UFD MODE

ST
8EQ
o
8EQ
cHP
8EQ
ST
BEQ
B8R

UFDFLG
NOABRT
RO, #32
ABORTZ
RO, #3
ABORTC
UQUIET
NOABRT
ABORTE

;TEST FOR USER FRIENDLY MODE
11E7NOT UFD THEN CONTINUE NORMAL OPERATION
At Z?
IsIT
.xs
BACK TO CMAIN IF IT IS (NO ERROR)
.xs IS A #C ?
B8R TO LOAD *C ON XXDP+ STACK (MO ERROR)
oTEST FOR USER-QUIET
MHODE
IF FIELD-SERVICE MODE, CONTINUE NORMAL OPERATION
dmmsmmvum
: BECAUSE FIELD-SERV
1SET DRSERR THEN LEAVE

MoV
MOV
ENT

SAV30, 30
SAV32.32
+43

;RESTORE EMT LOCATION (30)
;RESTORE EMT PRIORITY LOCATION (32)
sGET XXDP STACK LOC. INTO RO FROM MONITOR

m"‘

0-/ -1(R0)

OVER ZERO

MOVE
an

#'C.C(RO)s
g‘gvz

oY
:

*ao 10 STACK

ISTe

MOV
MOV

ROV

CLR
P
RTS

(RO).

o r.(

v30.30

SAV32.

oo1.42(R0)
-

.a 0
x
0

FIND END OF STACK
sl

.fir

ent
ENT

'm“ R oEOILI
'

TION

(30)

LOCATION (sa)

n-g
mru

MONITOR
+IF NOTUFD RETURN TO MAINLINE

RETURN TO MONITOR-DO m PUSH STACK MERE
iR-C
sR-C

Monday 07-Oct-85 16:57

DIAG.

CVMJABO

MSV11-J MEMORY DIAG.

EARD MESSAGE TYPEOUT

ROUTINE E

MACRO Y05.02

Monday 07-Oct-85 16:57

.SBTTL

Page 412

SEQ 0351

ROUTINE ERROR MESSAGE TYPEOUT

13344
13345
13346

188800888400 80808080804808808808880088000008400000400040808000808088800000000000000

{’34’

;#AND REPORTS THE APPROPRIATE INFORMATION

;#THIS ROUTINE USES THE “ITEM CONTROL BYTE” ($ITEMB) TO DETERMINE WHICH
:#ERROR IS TO BE REPORTED. IT THEN QTAINS6 FROM THE “ERROR TABLE" (S$ERRTB),

13347
13 8

052366
llggg
13352 032370

13353

104415

052370

104401

374

005000
153700
001204

1335%
1

13357 0352404
052404

002660

$ERRTYP: SAVREG
TYPE
TYPEIT

1
1
1
i

13365

{

o
Hig
]
13;377;4
13
xgns
13376

34
057344
052502

002612
0020€4

2
74

070170

1 g:o 23514

1
1

032332

052332

1108:

002430

13366

18:
1008:

012037

052534

12¢:

737

104401

1 sPICKUP THE ITEM INDEX

+3IF ITEM NUMBER IS ZERO, JUST
TYPE THE PC OF THE ERROR

ERRPC.-(SP)

TYPOC
_DSABL
CRF
118
BR
CHPE
8177.RO
BNE
1008
MOV

#PPECUS.RO

DEC

ASL
ASL

RO
RO

ASL

ADD
MOV

@SERRTB.RO
CRO)e,3%
43

: 1SAVE ERRPC FOR TYPEOUT
{ IERROR ADDRESS

1160 TYPE--OCTAL ASCIICALL DIGITS)
: J6ET_out
iPOMER MONITOR CALL?
i{BRANCH IF NOT

MOV ADDRESS OF PFE BIT ERROR TO RO

‘R-C

NOERROR

TST

12+

gPL
TST
BEG

HEADER

i1S THIS REALLY AN ERROR?
iYES - SKIP

TYPE
TYPEIT

4$
FATALS
2%

MSGO67
,MSGO67

iND - SKIP
'WAS IT A FATAL ERROR?
iNO - SKIP

s TYPE THE "ERROR MESSAGE"

i TYPE WEADER?

IFATAL

YPE

CRF

‘WORD

.DSABL

CRF

TYPE
TYPEIT

SCRLF
,SCRLF

i i “CARRIAGE RETURN" & "LINE FEED"

as:

DSABL
MOV~

138:

CRF
(RO)..S$

+1 "ERROR MESSAGE” POINTER GOES MERE

;1PICKUP “DATA HEADER" POINTER

ST
BNE

NOERROR
134

i 1SKIP TYPEOUT IF O

8PL
TYPE

INO - SKIP
1.TYPE THE "DATA MEADER"

BEQ
TST

002612

TYPEIT

.DSABL

HEADER

CRF

; sFORM TABLE POINTER
i IPICKUP "ERROR MESSAGE" POINTER
i 1SKIP TYPEOUT IF NO POINTER

WORK FOR THE ERROR TABLE

i
BNE

TYPEIT

i8-C

iR-C

BEQ

.DSABL

‘R-C

R-C

: 1ADJUST THE INDEX SO THAT IT WILL

002430
100004

$ITEMB.RO

MOV~

052676

000177

8IS

13 "CARRIAGE RETURN” & “LINE FEED"

TYPOCT ERRPC.<ERROR ADDRESS>

002020

12
14

CRF

BNE

052410

13
1

.$CRLF

.DSABL

&R~

002015

$CRLF

ONCERNING THE ERROR.

i13 THIS REALLY AN ERROR?
iYES - SKIP
i TYPE MEADER?

012001

001427
012002

Mondey 07-Oct-85 16:57

LMORD

TYPE

TYPEIT

002660

68:

.DSABL

MOV
BEQ
MOV

SCRLF

,SCRLF

CRF

(RO)+.R1
108
(RO)+,R2

Page 412-1

SEQ 0352

::"DATA HEADER" POINTER GOES HERE
:: "CARRIAGE RETURN" €& "“LINE FEED"
1:PICKUP "DATA TABLE" PCINTER
;:BR IF NO DATA TO BE TYPED
1 :PICKUP “DATA FORMAT" POINTER

———————————————————
—, -~ .

Ss:

000000
104401

MACRO Y05.02

MSV11-J MEMORY DIAG.
ERROR MESSAGE TYPEOUT

J MEMORY DIAG.

&SM TYPEOUT

MACRO Y05.02

Mondsy 07-Oct-85 16:57

Page 414

(R2)+,.R3
RE

78:

;MAKE IT A WORD ADDRESS

883(R3)

052562

SEQ 0353

#2,.R1
wua

1333

s et et B

s s it i

s i e et Pt Pt it
-

§§ 28388388

CVMJABO MSV1
WT!'C E

;UPDATE DATA TABLE POINTER

i3IS TI-ERE ANOTHER NUMBER?

(R1)

::BR IF NO

104

MSGO18

|TYP€ 2 SPACES

,MSGO018

066157

CRF
7

002612

;IS THERE A MEMORY UNDER TEST

MUT

108:

002110

; :LOOP

:NO - SKIP

118

HEADER

11¢:

:YES - BUMP HEADER FLAG

SET.IN @SWR AND DETFLAG IS FALSE AND NOERROR IS FALSE

BIT oSW7,8SWR
BEQ LS06

127770

TST DETFLAG

002220

BNE L506

TST NOERROR
BNE LS506

002430
CALL
DETAIL
END ;OF IF eSw7

053336

TYPE

HSG"ség‘“

. DSABL
RETURN

CRF

TYPELT

070627

EVEN

LS06:::5333

;:CONTROL Z

iR-C

052772

PFECWS:

.WORD

PFECEM.PFECDH,PFECDT ,PFECDF

127

PFECEM:

.ASCIZ

“POMER MONITOR BIT FOUND SET"

;R-C

PFECOH:

.ASCIZ

“TESTNO

iR-C

040

ERR PC

CPUERR"

;R-C

CVMJABO MSV11-J MEMORY DIAG.

ROUTINE E

MESSAGE TYPEOUT
103
103

MACRO Y05.02

Monday 07-Oct-85 16:57

414-1

SEQ 0354

040
120

052756
052761

120
040

052767

122

000

056722

002020

052362

.EVEN
PFECDT: .WORD

A
$TESTN,ERRPC,CPSAVE,O

iR-C
iR-C

000

PFECDF: .BYTE

0,0,0,0

iR-C

052764

13431
13432 833172
13433 OS%
13434 05

125

000

105

122

MSV11- J MEMORY DIAG.
ERROR MESSAGE TYPEOUT

MACRO Y05.02

£ g8

333

Monday 07-Oct-85 16:57

Page 416

SEQ 0355

|..0“...“.‘.....‘“......‘...‘..‘.““...‘“‘..‘.‘..‘..“..‘.‘.‘.‘“....‘....‘

CVMJ
ROUT

iess OCTAL ass

|0.‘..‘..‘.‘.‘.‘.““....‘.".....".“‘...“..“‘.‘......“.‘..‘..‘.‘.“.0..“.

TAG70¢: TYPOCT
MOV
TYPOC

017146
104402

.DSABL
RETURN

000207

@&(R1)
8(R1),-(SP)
CRF

:sTYPE AN OCTAL NUMBER
:3SAVE 8(R1) FOR TYPEOUT
:3GO TYPE--OCTAL ASCII(ALL DIGITS)

3"..“‘.‘.“..“..““““.“‘.‘..“‘.““.‘.".....‘...‘.‘.‘...“.‘....‘“..‘.

isss DECIMAL =2

*.‘.‘...‘.“.‘.0.‘..“.‘.‘..“...‘t“‘.‘““‘......“‘.....“.‘.‘...‘......““.

AG71$: TYPDEC

104405

MOV
TYPDS

000207

RETURN

DSABL

¢ G

g EEp

13460

8(R1),-(SP)

CRF

+sTYPE A DECIMAL NUMBER

: :SAVE 8(R1) FOR TYPEOUT
::G0 TYPE--DECIMAL ASCII WITH SIGN

;28 INTERLEAVE #a+

%oocoooo.coooacao.o-‘o..o-.too..-o‘ooooooatooo.ooocooao.-ooo.oo.ooo.o..ooooooooo

AG72%:

010146

13457
13458
13459

@&(R1)

1888882888888 8 8088008000044 04 8800800888482 88040888408808484844888488808888880000000

£o85

333333

017146

010546

013701
070127

002102
000004

012737

177777

104401

066130

004737
005037

033272
002372

002372

R1.RS

MOV
MUL

BANK,R1
#4 ,R1

TYPE
TYPEIT

MSGO14
,MSGO14

POP

R5,R1

SET
.DSABL
CALL
CLR

012605
012601

104401

PUSH

TYPE
TYPEIT
.DSABL
RETURN

066130

000207

NOTAB

MOV R1,-(SP)
MOV RS, -(SP)

;INDICATE NO TABLE TO BE PRINTED - NOW

CRF
TCFIG1
NOTAB

MSGO14
,MSGO14
CRF

;4488448004004

;1 SPACE

MOV (SP)+,.R5
MOV (SP)+,.R1

000888482820448280 0000080820804 0880088480888088888880008800

;#5% CSR #2a»
$8280584848840 4002000004045 002 8800440080200 2080088808800888880028888808808

fAG73s: PUSH

010146

010546
013701
070127

002102
0V0004

012737
004737
005037

177777
033466
002372

012605
012601
000207

MOV
002372

R1.RS

BANK,R1

MUL
SET

04 ,R1
NOTAB

CALL
CLR

TCFIG3
NOTAB

POP

RETURN

MOV R1,-(SP)

R5,R1

MOV

@-1,NOTAB

MOV (SP)+.RS
MOV (SP)+,.R1

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 416-1

SEQ 0356

(8888828488882 80800000080 4008 0084880048855 00080800000 RRRRRLRARARARRAERR000
;jes4 PATTERN ss2

013746

002300

886888880480 88808080888888880888888084800088888000080800888080000480000000000000
REALPAT, <TYPE (0-77)>,2,2
TYPOCS
REALPAT,-(SP)
;;SAVE REALPAT FOR TYPEOUT
MOV

tac7as:

TYPOS

104403

.BYTE
.BYTE
.DSABL
RETURN

002
001

000207

2
éRF

13 TYPE (0-77)
:3G0_TYPE--OCTAL ASCII
+sJYPE 2 DIGIT(S)

1:TYPE LEADING ZEROS

;“.‘..‘..‘...‘.““‘..““..‘.““‘.‘.“.“‘.“‘.....‘.....“‘.....“..........
;2 BANK 222
..‘..“..‘.“‘““““‘“.“...."“.‘““.‘..““.‘...‘.....“‘..‘.‘..‘..‘.‘.‘

013746

13485 053160

002102

1AG7S$: TYPOCS BANK,<TYPE (0-176)>,3
MOV

104403

TYPOS

000207

RETURN

.BYTE
.BYTE
.DSABL

BANK, -(SP)

: s SAVE BANK FOR TYPEOUT

3
0

+sTYPE 3 DIGIT(S)
: 1 SUPPRESS LEADING ZEROS

CRF

13 TYPE (0-176)
:3G0_TYPE--OCTAL ASCII

—

MSV11-J MEMORY DIAG.
MESSAGE TYPEOUT
QOUTINE E

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 417

SEQ 0357

1608888888848 848888888840088488 8008880888880 0 0084880004000 000080000400000000000
je2s MTYPE sas
00000080000000000
88888
RRRRARSAA00000
80880
008440000
(8888488008088 8808888888

13487

TAG76%:

010146

010846

13495 053210
3214
1349‘

013701
070127

002102
000004

012737

177777

104401

066162

004737
005037

033332
002372

002372

PUSH

R1.R5

MOV
MUL
SET

BANK,R1
04 ,R1
NOTAB

TYPE
TYPEIT

MSGO19
,MSGO19

POP

R5,R1

.DSABL
CALL
CLR

012605
012601
000207

MOV

KRR

;#2s UNKNOWN DATA =as
L

TAG77¢:

070037

000207

TYPE
TYPEIT
.DSABL
RETURN

1888848588000

@-1,NOTAB

CRF
TCFIG2
NOTAB

MOV (SP)+,.RS
(SP)+,R1

RETURN
;8522442444

104401

MOV R1,-(SP)
MOV RS, -(SP)

AR AR

RLERRES 2452285848088 88250858848888808084000000

MSGO061
,MSGO61
CRF

P P R P

A P

P R

RAAARRRRR AR AR RE LS4 R 4420 ARRAAEL L2222 4224205554088 00500000000

s#es PHYSICAL ADDRESS ssx

3222333
23

002040
002040
002042

100000
002040
056576
000002

002040

(SRR AREEAEEESSAR0R0RRRASREERAREAARARRARRAERERERREEARR420484288800880080880004

TAG78%: MOV

SUB
MOV
ASR
BCC

18:

BIS

MOV
CALL
ADD

TYPE

TYPEIT

056704

.DSABL

RETURN

19 053312

ADDRESS,PHYADD

OFIRST,PHYADD
BANK , PHYADD
+2
A60.2

nxus PHYADD

@PHYADD, -(SP)
$DB20
02,5P

;POINTER TO DOUBLE WORD ON STACK
;CALL DOUBLE PRECISION CONVERSION ROUTINE
:FIX STACK

$0CT8

,$0CT8

CRF

Ol G

O O

et o ot

013737

002034
060000
002102
002042

1823822828880 4 820 RRRRAREEARARLERELRRR 2R ARRR0 220400005022 0220282888 0004080000000

;#28 OCTAL BYTE 2%2

*‘fi..tt..“.‘t“.“.“t.t.“t‘.t.“‘..‘.““.“‘.‘0.0.‘.O‘..O.‘.‘.‘.‘.“..t“.“

053314
053314

13525 053320
053

TYPE

MSGO18

.DSABL

CRF

017146

MOV

8(R1),-(SP)

104403
003

TYPOS

104401

001

066157

AG79¢:

TYPEIT

TYPOCS

.BYTE
.BYTE

MSGO18

:2 SPACES

@&(R1),<TYPE BYTE>,3,2Z

3
1

AVE 8(R1) FOR TYPEOUT
i3S
::sTYPE BYTE

:3:G0 TYPE--OCTAL ASCII

:1sTYPE 3 DIGIT(S)
:1: TYPE LEADING ZEROS

CVMJABO MSV1l-J MEMORY DIAG.
MESSAGE TYPEOUT
ROUTINE E

MACRO Y05.02

Monday 07-Oct-85 16:57
.DSABL

13526 053330
053530

104401

13527 053334

000207

066130

TYPE
TYPEIT

.DSABL

RETURN

CRF

MSGO14
MSGO14

CRF

Page 417-1

1 SPACE

SEQ 0358

CVMJABO MSVil-J MEMORY DIAG.

ROUTINE ERROR MESSAGE TYPEOUT

MACRO Y05.02

Monday 07-Oct-85 16:57

DETAIL: SUBTST

13571 053336

<<SUBR

838

13578

13579
-}

005237
022737
101473
022737
001435

002220

013746

002612
002110

012737

177777
002110
002200
002202

366
7;

013746

053400

005037
010037

DETAILED ERROR REPORT

108888888088 88088808808888088488080880840000800000800008000000000000000000000000

000003

002220

000002

002220

INC
CHP
BLOS
CHP
BEQ

PUSH

13590

1
1

13594 0334“
13595
13596

13597
13338
13599

!lg‘
053472
053476

a‘ (RO)«
(RO)+

eaésr (RO)+

ERRPSW, (RO)+

DETRO, RO

177777

013746
013746

002612
002110

012737
005037

177777
002110

002612

177777

002430

osggg
0s

177766

012637
012637

002110
002612

1;:843 053532 004737
053536 000207
1

053336

MOV HE y(S')
MOV MUT

R2.(RO)+

012737

00;802
005037

HEADER ,MUT

R3.(RO)+

NOERROR

002430

MOV

+13
1%
HEADER , MUT

104081
033504
033306 022737 000005 004064

053514
053516
13600
13601 053522

g% .DETFLAG

oerno

002200

8 00042

#3,.DETFLAG
44

ooérax
R1, <aoSo

013700

104013

DETFLAG

HEADER

002612

13383 033418 010120
10850
13384 033430
3422 010420
1
10520
1
137 013720
002030
013720 002024

DETAILED ERROR REPORT>>

SET

HEADER

CLR
SET

MUT
NOERROR

ERROR

1¢:

cHP
BNE
CLR

POP

05 PfiOYVP
CP\EM
MUT ,HEADER

WARNING RECURSIVE
ALL
DETAIL
RETURN

©-1,NOERROR

MOV HEADER, -(SP)
MOV
@-1,HEADER
MOV

©-1,NOERROR

;IS THIS AN 11/83 ?

13577 05 gg

SEQ 0359

1068588888880 4 0580048840088 080088080888080000008400848000008000000000000000000000

1#SUBTEST

1337; 053336
13573 053342
053350
13574
352
13575
g!“
13576

Page 420

+ . HEADER

J MEMORY DIAG.

DETAILEO ERROR REPORT

MACRO Y05.02

4%:

055222

Monday 07-Oct-85 16:57

Page 422

s SIMULATE CONTROL *T"

;DISPLAY “DISPLAY" INFO

CONTT

CALL

SEQ 0360

&w COCCESNES OoF :&L CSR'S

13616 §

104401

070015

104401

002660

013701

002224

005037

MOV CSR, -(SP)
MOV CSRNO, -(SP)

TYPE

MSGOS8

.DSABL

CRF

TYPEIT

053612

104401

$CRLF
OCRLF

DSADL

TOTCSRS R1

GEGIN DUMPCSRLOOP

B102::::::3

FOR CSRNO := #0 TO @36 BY @2

002152

ASL
ON.ERROR

103006
104426
104402

,MSGOS8

TYPE
TYPEIT

006301

013746

OV R1,-(5P)

READCSR

TYPOCT

MOV

002150

TYPOC

.DSABL

TYPEIT
.DSABL

066157

BCC LSO7

CSR

CSR, -(SP)
CRF

TYPE

,MSGO18

CLR CSRNO
B103:;::::::

MSGO18

; sSAVE CSR FOR TYPEOU

::G0 TYPE--OCTAL ASCII(ALL DIGITS)

;2 SPACES

END ;OF ON.ERROR

IF R1 EQ #0 THEN LEAVE DUMPCSRLOOP

000002
002152

002152
000036

TST R1

BEQ E102

END ;OF FOR CSRNO

ADD #2,CSRNO
CMP CSRNO, 936
BLE B103

E103:;:::3333

END DUMPCSRLOOP

POP

LSO07:;:::333

E102::::3:3

R1,CSRNO,CSR

MOV (SP)..R1
MOV (SP)+,CSRNO
MOV (SP).,.CSR

002152
002150
TYPE STACKS

104401

070406

013701
162701

002574

000002

&USN

RO,R1

TYPE
TYPEIT

MSGO8S
,MSGOSS

MOV
suB

KSTACK,R1
#2.R1

.DSABL

CRF

sKERNEL STACK

§“
1“15s 033

002150
002152

13613 g’gg

013746
013746
010146

CVMJABO MSV11-J MEMORY DIAG.

SUBR

DETAILED ERROR REPORT

13633 053672
053672
053674

MACRO Y05.02

010600

13634 053674
053674

104401

053704

104401

13635 053700
053700 010046
053702 104402
13636 053704

002660

Monday 07-Oct-85 16:57

FOR

RO := SP TO R1 BY @2

TYPE
TYPEIT

S$CRLF
,$CRLF

.DSABL

MOV SP.RO

CRF

RO
TYPOCT
:1SAVE RO FOR TYPEOUT
RO, -(SP)
MOV
1160 TYPE--OCTAL ASCIICALL DIGITS)
tgrocm oad
12 SPACES
MSGO18
TYPE
TYPEIT

066157

,MSGO18

.DSABL

CRF

.DSABL

CRF

(RO)
TYPOCT
(RO), -(SP)
MOV
TYPOC

13638 053714

END ;0OF FOR RO

062700
¢©

SEQ 0361
B1O04:;::::

13637 053710
3710 011046
3712 1
3714
3720

Page 422-1

000002

; 1SAVE (RO) FOR TYPEOUT
+1GO TYPE--OCTAL ASCIICALL DIGITS)
ADD #2.RO
CHP RO.R1

053722 003764
13639

BLE 8104

053724

*ser PREVIOUS MODE TO SUPERVISOR

005737 002456
13240 osng
001036
053730

13641

uug

732 042737 030000 177776

13644

053746

740 052737

1364

13645

13646 053754
053754
13647

13648

053760
760
764
053766
766

13649

suc

13650

'na

006506

010000

012601
012600
104401

020027
002016
104401

070424

000740

104402

776

104401

13651 gggru
13652

002660

os‘ou
054016

062700
020027
003763

NOSUPER

BIS

eB8IT12,PSW

DET1

eBIT13:8IT12,PSW

BIC

SSP

MFPI

R1,.RO

POP

TYPE

TYPEIT

DSABL

s SUPERVISOR STACK

MSGO89
,MSGO89

TYPE

066157

.DSABL CRF
TYPOCT

RO, -(SP)
e

MSGO18

TYPOCT

(RO)

e”nscou

(RO), -(SP)

END ;OF FOR RO

CHP RO, #SUPSTK
8GE LS510
B105::::::3

;sSAVE RO FOR TYPEOUT

TYPE

r;re T

MOV
TYPOC
000002
000736

$CRLF

,4CRLF

TYPEIT

tzrocm

MOV (SP)+.R1
MOV (SP)+.RO

CRF

IF RO LT @SUPSTK

MOV

011046
104402

uos;

177776

BNE

FOR RO := RO TO #SUPSTK-2 BY @2

112 010046
3774

E104:;:;:55:33

160 TYPE--OCTAL ASCIICALL DIGITS)

:2 SPACES

:sSAVE (RO) FOR TYPEQUT
1160 TYPE--OCTAL ASCIICALL DIGITS)
ADD #2.RO
CMP RO, #SUPSTK-2
BLE B10S

CVMUABO MSV11-J MEMORY DIAG.

SUBh _ DETAILELD ERROR REPORT
13654

104401

13661

y104401

020027 000700

070446

€02016

13664

104401

002660

BB o100

TOER it
s
3668

0‘

13669

13670

700 000002
fibfi? 000676

E105:;:53353

.DSABL

:IS EMPTY

MSGO91
,MSGO91
CRF

177776

DET1:

BIT13'8IT12,PSW

8IS

WPI

USP

TYPE

MSGO90

POP

TYPEIT

JUSER STACK

,MSGO90

005037

002220

MOV (SP)+,.RO

.osm CRF

IF RO LT SUSESTK

TYPE

CMP RO, SUSESTK

TYPEIT

.DSABL

$CRLF

,$CRLF

TYPOCT
RO
RO, -(SP)

TYPOC
.DSABL

TYPE

TYPEIT

.DSABL

BGE LS512
B106::::35:5

CRF

CRF
,MSGO18

MSGO18

: ;SAVE RO FOR_TYPEOUT
+3G0 TYPE--OCTAL ASCIICALL DIGITS)
:2 SPACES

CRF

TYPOCT
(RO)
MOV
(RO), -(SP)
TYPOC

'%.wm:m RO

1 1SAVE (RO) FOR TYPEOUT
1160 TYPE-- OCTAL ASCIICALL DIGITS)

u.e ués

N.BESTK 2

E106::::3333

TYPE

r;rsxr

MSGO91

END ;OF IF RO

104401 002660

BR LS11
LS10:353333

LS13:3533333

SET PREVIOUS MODE 10 USER

ELSE

13671

13675 030124

SEQ 0362

763

tg 104401 070462

1“73
1“7‘

- 422-2

END sOF IF RO

MOV

w 104401 066157

Page

FOR RO := RO TO QUSESTK-2 BY #2

104402

13666

v 07-Oct-85 16:57

TYPE
TYPEIT

070462

17 gige
052737 030000
{
006506
%

13663

Mondey

ELSE

000402

13655

13665

MACRO Y0S.02

TYPE
TYPEIT

.DSABL

CLR
POP

RETURN

$CRLF
,$CRLF

;IS EMPTY

BR LS13
LS12:333333

LS13:::3333

CRF

DETFLAG
RO

MOV (SP)+.RO

ROUTIRE BINARY T

Y0S.02

AND TYPE
CRSEIT) MACRO

MSV11-J MEMORY DIAG,

CVMUABO

0 OCTAL

pns

Mondey 07-Oct-85 16:57

_SBTTL

Page

SEQ 0363

- 425

ROUTINE BINARY TO OCTAL (ASCII) AND TYPE

“.“..‘..‘.......
' ‘..“.“.“..‘.“‘.“‘..“...“....“.‘...“‘.“.‘.....“..‘.
NUMBER TO A 6-DIGIT

{;7{’

13716
13717
ii; s

VeTHIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY
i+4TYPOS.--"ENTER HERE TO SETUP SUPPRESS ZEROS AND MUMBER OF DIGITS T0 TYPE

137
137

1372¢

"
"
-9

137

180CTAL (ASCII) NUMBER AND TYPE IT.

L)
1o

137
1372

TYPOS
BYTE
.BYTE

NUM,-(SP)

L INUMBER TO BE TYPED

1iN=1 TO 6 FOR NUMBER OF DIGITS TO TYPE

| {CALL FOR TYPEOUT

s3sM=1 OR O
+11=TYPE LEADING ZEROS

| 10=SUPPRESS LEADING ZEROS

HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST
e STYPON----ENTER
$TYPOC

1373
1373
7

MOV

1a4TYPOS OR

soCALL:

;

MOV

TYPON

NUM,-(SP)

+ sNUMBER TO BE TYPED

1 CALL FOR TYPEOUT

::entoc---eurea HERE FOR TYPEOUT OF A 16 BIT NUMBER

1
1
1

NUM, -(SP)
ar MOV
TYPOC

;

D.y

e
)34
54,
Y34,

)34

542
,:}

y
%4
34,

gi“l14 m

MOV
054351 $TYPOS: MOVB

ADD

000002

B8R

S$TYFON: fi
350 P
i113737 Ww‘ gfii
Y

8 0446

MOV

:a'

054353

ADC

000012

18:
2s:

34,
Y54,
342
)S42.
,-Q
P

054352

MODE
1HL&'M
1PICKUP THEFILL
SWITCH
OF DIGITS TO TYPE
i
1 sADJUST RETURN ADDRESS

.
.
06 IOMOBE.1
2.0”'

i
L.SET rOm
I TION4 COUNT
THE """s%ufi“dia“#"“
s3SET

$TYPON

RS, -(SP)

R4,
RS,
'o“

177770

-(SP)
-(SP)
*1.Re

6 . R4

+1SUBTRACT IT FOR MAX. ALLOMED

MOV

gtsn.ns

1:PT

CLR
ROL
B85
u.&

ROL

SOFILL ,R4

RS
1]

A3
$QMO0E

:%71770.!3
Ré

as:

1 sSAVE RS

1 1SAVE R4
1 1SAVE RS
11GET THE NUMBER OF DIGITS TO TYPE

R4, $0MODE

(1]

‘,:“

234,

(sP)

OFILL

ROL

3s:

s INUMBER TO BE TYPED

1 1CALL FOR TYPEOUT

b§

1 1GET THE

USE

FILL SMITCM

INPUT NUMBER

i
THE OUTPUT WORD
;
{ROTATE
MSB INTO “C*
..go 00THIS
nS8 DIGIT

;

sFORM

31 TYPE

u?" LS8

OF TMIS DIGIT

wo JUNK

u='xr

[B ]
i

100N’

DIGIT?

TTMIS 07

T SUPPRESS ANYMORE O'S

MACRO Y05.02

(ASCII) MQ TYPE

104401

054346

13774 054312
13775 054316

105337
003347

054350

13779

012605

034332
13779
13778 054324 000744

012604

8IS
BIS
MOVB

TYPE
TYPEIT

DSABL
ce

64:

78:

012603

§§§§§~

$OCNT
:
SOFILL:
$OMODE:

SEQ 0364

) COUN

1) BR

IF HWE T0 CO

::BR IF DONE
;s sINSURE LAST DIGIT ISN'T A BLANK

SP)
).
+,(SP)

016666
012616
00000

Page 425-1

+ sMAKE THIS DIGIT ASCII
1 sMAKE ASCII IF NOT ALREADY
: s SAVE FOR_TYPING
+3G0 TYPE THIS DIGIT

#'0,R3

a'x'a'n

054306

Ss:

~awn

000060
000040
054346

A
9%

052703
052703
110337

~N
n ANV
bLe
“no
u‘vvu

13770 054272
13771 054276
13772 83:302
306
13773

Monday 07-Oct-85 16:57

00000

-J I‘E?Y

CVMJABO
IIN“Y
ROUTINE

::G0 DO THE LAST DIGIT
1)
T

%) RESTORE
33 SET

THE STACK FOR RETURNING

; sRETURN
: 1STORAGE FOR ASCII DIGIT
: ;sTERMINATOR FOR TYPE ROUTINE
; sOCTAL DIGIT COUNTER
;:ZERO FILL SWITCH
: iNUMBER OF DIGITS TO TYPE

07-Oct-85 16:57 Page 426
ROUTTNE CONVERT STNARY 3% econ"RR 1i8e%e Mondwy
.SBTTL

13791

;#THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 5-DIGIT
1#SIGNED 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

13793
794

13795
13796

: sBEFORE THE FIRST DIGIT OF THE NUMBER. LEADING ZEROS WILL ALWAYS BE
;#REPLACED WITH SPACES.
soCALL:

010046
010146

1%:

2%:
3s:

4%:

N
e

177777

9s:

), -2(R3)

177776

054532
054534
054536

::SET THE FIRST CHARACTER TO A BLANX
:sCLEAR THE BCD NUMBER
:sGET THE CONSTANT
; :FORM THIS BCD DIGIT
;:BR IF DONE

: ;ADD BACK THE CONSTANT
: sCHECK IF BCD DIGIT=0
;sFALL THROUGH IF O

R1.RS
R2

FL
§2§223
tug
- am;
S ank

: ; INCREASE THE BCD DIGIT BY 1

R2
34

~Door

74
76

13836
13837

2
$DTBL(RO),R1
R1,R5

177777

MOV R3,-(SP)
MOV RS, -(SP)

S$
(SP)

S
i
gl i
70

i
i

MOV RO, -(SP)
MOV R1,-(SP)

F _INPUT IS

e gt

::G0 TO THE ROUTINE

SET BLANK SWITCH AND SIGN

g
s

13825
13826
im"

RO,R1,.R2,R3,R5

1 O

i
13810
13811
1!.83

TYPDS
PUSH

GET_THE INPUT

seggness

$TYPDS:

::PUT_THE BINARY NUMBER ON THE STACK

MOV

3.R2.R1,RO

:3STILL DOING LEADING 0'S?
;:BR IF YES
; :MSD?
::BR IF NO
:3:YES--SET THE SIGN
:sMAKE THE BCD DIGIT ASCII
;sMAKE IT A SPACE IF NOT ALREADY A DIGIY
:;PUT THIS CHARACTER IN THE OUTPUT BUFFER
: s JUST INCREMENTING
:;CHECK THE TABLE INDEX
::GC DO THE NEXT DIGIT
::6G0 TO EXIT
::GET THE LSD

::G0 CHANGE TO ASCII
:sWAS THE LSD THE FIRST NON-ZERO?
1:BR IF NO

;3YES--SET THE SIGN FOR TYPING
:sSET THE TERMINATOR

33333

»g

1
1
1

ROUTINE CONVERT BINARY TO DECIMAL AND TYPE

10888000880008088080000088000480000000000008000000000408000800000000000000000000000

13792

1
1

SEQ 0365

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

ROUTINE CONVERT BINARY TO DECIMAL AND TYPE
13838 054542

054542

13839 054546

104401

054570

016666

000002

13840 054554

012616

13842 054360
13843 034362
034364
13844

023420
001730
000144
000012
000000

13841 0545

13845 034366
13846 054570
054576

000000

TYPE _ $DBLK

000004

000000

TYPELT

,$DBLK

MOV

2(SP).4(SP)

MOV

SDTBL:
000000

Mondey 07-Oct-85 16:57

$DBLK:

RTI

10000.
1000.
100.
10.
.WORD

(SP)+.(SP)

0,0.0,0

Page 426-1

1iNOW TYPE THE NUMBER
: 1ADJUST THE STACK
: sRETURN TO USER

SEQ 0366

CVMJABO MSV11-J MEMORY DIAG.

ROUTINE TTY INPUT

13848
lm’
13850
13851
13852
13853
13854

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 427

.SBTTL ROUTINE TTY INPUT
;#SOFTWARE SWITCH REGISTER CHANGE ROUTINE.
1sROUTINE IS ENTERED FROM THE TRAP HANDLER, AND WILL
1SERVICE THE TEST FOR CHANGE IN SOFTWARE SWITCH REGISTER TRAP CALL
;4WHEN OPERATING IN TTY FLAG MODE.
.ENABLE LSB

3...‘.‘.‘...‘.‘..“"..‘.‘..‘.‘....“.“““.““....C‘..‘0..“........‘..‘.‘..‘

13855 054600

13856 054600
13857 054604
13858 054606
13859 054612
13860 054616
13861 054622
13862

005737 047154
001406
013746 047154
005037 047154
000137 054640
105777 126014
100136

117746 126010
13863 osug 042716
177600

13864 054634

000006
13865 054640 022716
001

13866 054644
13867 054646
13868 054652
13869 054656
13870 054660
13871 gg::u
70
1387
13873 054672
13874 054676
13875 054700
13876 054704
13877 054710
13878 054712
054712

13879 054716
13880 054722
1% osng;
054732
1
13883 054734
13884 054740
13885 054742
13886 054746
13887 054750

CO4737

022716
001
004737
022716
001454
022716
001002
004737
022716
001005
104401
013706
000207
022737
001075
022716
001072
005737
001067

040762

000024

054760

054764

13890 034766

NOCH:

18:

000003
000023

168:
2:

055276

17¢:

000013

055214
002146
000176 002636 64:
000007
002062

13891 054772

005046

13893 054776

105777

13892 054774 005046

.DSABL

TYPOCT

oe.(sPS
18

is 1T CONTROL F?

-(SP)
8$TKB,
#+C177,(SP)

FIELDSERVICE

$CNTLG

CRF

;IS IT CONTROL T?
iND- SKIP
{YES - CALL CONTROL T ROUTINE
IS IT CONTROL C?
{YES EXIT ssessNOTEsssss STACK IS SCREWED UP!
+15 1T CONTROL 7
iNO- SKIP
IYES - CALL CONTROL S ROUTINE
;IS IT CONTROL K?
iND- SKIP

ITYPE A K

;RESET KSP TO AFTER PATTERN EXEC ROUTINE
:RETURN TO PATTERN EXEC ROUTINE
1:IS THE SOFT-SWR SELECTED?
: :BRANCH IF NO
1:IS IT A CONTROL G?
:3NO, RETURN TO USER
WE RUNNING IN AUTO-MODE?
iBRANCH IF YES
:;ECHO THE CONTROL-G (1G)

: s TYPE CURRENT CONTENTS

SMNEW

:1:G0 TYPE--OCTAL ASCIICALL DIGITS)
: ;PROMPT FOR NEM SWR

-(SP)

; sCLEAR COUNTER

@$TKS

; ;CHAR THERE?

38:

CLR

as:

TSTE

-(5P)

CLR

i SAVE THE CHAR

i 1STRIP-OFF THE ASCII

TYPE

T;:%I

::IF NO, DON'T WAIT AROUND

:30F THE SWR

8SWR, -(SP)

T;Pocm

$ ICHAR THERE?

@SWR

MOV

056036

125640

CALL

: ;SOMETHING THERE?
i GO ON IF NOT
33 USE IT

024,(SP)
CMP
164
BNE
CONTT
CALL
#3,(SP)
CMP
S$
8EQ
223.(5P)
CHP
178
BNE
CONTS
CALL
#13,(SP)
CMP
64
BNE
$CNTLK
TYPE
TYPELT é&fi""-"
CTLKVEC, SP
v
RETURN
SSUREG, SUR
cHP
CKEND
BNE
@7,(5P)
CHP
CKEND
BNE
SAUTO
ST
CKEND
BNE
TYPE

104402
104401

MOVE
BIC

XOCHAR
NOCH
XOCHAR, -(SP)
XOCHAR
CONTS1
@#TKS
SWREND

T;;E‘R é;gmc
$MSWR
$GTSWR: TYPE
TYPEIT , $HSWR

017746 125652

S4766

ST
8EQ
MOV
CLR
JHP
TSTB
BPL

CMP
CONTS1: BNE

055222

104401 056020
054
13888 oso;g:
104401 056025
054
13889 054760

$CKSMR:

$PNEW

: ;SAVE @SWR FOR TYPEOUT

::THE NEW SWR

SEQ 0367

ROUTINE TTY Dn
13894 055002
13895 055004

13'96 055010
13897 055014
13898 05
13.99 8555022

MEMORY DIAG.
T

100375
117746

042716
021627
001006

MACRO Y05.02

BPL

125634
177600
000003

104401

056006

062706

000006
040442
000025

S$:
7%:

002566

B4TKB.-(SP)

cHP
BNE
TYPE

(SP),03
7%
$CNTLC

TYPEIT
.DSABL

9:
125536

108 :

13915 055114
13916 055120

000010

055120

13917 055120

055120

13918 055124

—

002660

Page 427-1

SEQ 0368

PICK UP CHAR

CNTR& c?

,$CNTLC

#6,SP
Quit
(SP),025
9

B8R
CHP
BNE
TST
BEQ
MOV

34
(SP),015
133
4(SP)
104
2(SP),8SWR

$CNTLU
,$CNTLU
CRF

IF SWRFLG IS TRUE

ADD
ELSE
14

#+C177,(SP)

ADD
JMP
cHP
BNE

TYPE
TYPEIT
.DSABL

000015

MOVE

8IC

056013

000002

Monday 07-Oct-85 16:57

96,SP

; s IGNORE_PREVIOUS INPUT
TRY IT AGAIN
;3LET'S
A <CR>1
:3IS IT
: ;BRANCH

F_NO

s3YES, IS IT THE FIRST CHAR?
; sBRANCH _IF YES
: :SAVE NEW SWR
TST SWRFLG

::CLEAR UP STACK

BR L515

ADD

:sCLEAR UP STACK

TYPE
TYPEIT

$CRLF
,S$CRLF

;sECHO <CR> AND <LF>

.DSABL

SWREND: RTI

BEQ LS514

CRF

: sRETURN

LS14:;;:::::

LS1S:5333:3

SEQ 0369

1FIX STACK

#2,SP
$TYPEC

(SP), 060
$

000

015

TYPE

TYPEIT
.DSABL
BR
$CNTLK: .ASCIZ

.EVEN
.DSABL

tK/<¢15>¢12>

:sSTRIP-OFF ASCII

::IS THIS THE FIRST CHAR
: sBRANCH IF YES
:sNO, SHIFT PRESENT

| =

CHAR OVER TO MAKE
ROOM FOR NEW ONE.
KEEP COUNT OF CHAR
-

).(SP)

llBRANCM IF YES

GET THE NEXT ONE
TYPE ?<CR><LF>

-V
: s SIMULATE CONTROL
;CONTROL K ASCII STRING

LSe

033214
13957 0552
17

15%:

177776

113

14%:

000002

002657

i NAAARN

w
v

JSew
-

(SP).067

002420

055206

13938
13939

CALL

Page 427-2

.l--m--—

835204

13%:

021627

ADD

RTI

382

v-'-I'

B2 1t 1t s et et i b Pt b ot s s

PREnERs &s%ss

gg;zao

CKEND:

062706
000002
004737

Monday 07-Oct-85 16:57

13919 055126
13920 055132
13’21 055134

MACRO Y05.02

%wangu 7]
"358"R4He

J MEMORY DIAG.
MSV11-J

CVMJABO

ROUTINE
T Y INPUT

CVMJABO MSV11-J MEMORY DIAG.

ROUTINE TTY INPUT

MACRO Y05.02

CONTT:

13942 05S222

Monday 07-Oct-85 16:57

SUBTST

010046

055224

104401

002660

055230
055234

005737
001402

002126

0S!

104401

070474

13955

CONTROL T

13958 055246
055246

055252
055254
055255

13959 055256
055256

13964 055272

055272
%g::z 055274

TYPE

$CRLF

.DSABL

CRF

TYPEIT

MOV RO, -(SP)

,$CRLF

IF RLFLAG IS TRUE

TYPE

TYPEIT

,MSGO92

CRF

MSG093
MSGO093
BANK, -(SP)

070510

013746

002102

MOV

104403
003

000

104401

104403

002
000

012600
000207

.DSABL CRF
TYPOCS

TYPOS
.BYTE
BYTE

DSABL

070516

TYPE

TYPEIT

.DSABL

;BANK=

3
0
CRF
MSGO9S

TYPOCS

,MSGO9S

CRF

REALPAT, -(SP)

.BYTE
.BYTE

2
O©

POP

TYPOS
.DSABL

RETURN

CRF

LS16::::333

sTYPE 3 DIGITS

s 3sSAVE BANK FOR TYPEOUT

:3G0 TYPE--OCTAL ASCII
:3TYPE 3 DIGIT(S)
: sSUPPRESS LEADING ZEROS
;PAT=

REALPAT, ,2

MOV

TST RLFLAG
BEQ LS16

sRELOCATED

MSG092

.DSABL

104401

055262 013746 002300
055266

TYPE
TYPEIT

13960 055262

055270
055271

PUSH

END ;OF IF RLFLAG

13956 0S5

05!
13957 gg:?
2

<<CONTROL T>>

1008888800808 8880400880000000000084008040000000000000000000000000ttRttttttttttee

13943 055222
055222

13954 055230

SEQ 0370

8
ttitttitttttese
00808
0R0RRRtttRttttt
80008
0400000000000
1888888888888 0880880080

:1#SUBTEST

13944 055224

Page 429

TYPE 2 DIGITS

fiéILPAY FOR TYPEOUT

GO TYPE--OCTAL ASCII

E 2 DIGIT(S)
;: : SUPPRESS LEADING ZEROS
MOV (SP)+.RO

DIAG.

CONTS:

13967 055276

1 #SUBTEST

POP

13968 0532;:

03
13974 05
13975 05
03!
05;332
13976 055332
13977 053334
055334

SUBTST

Page 429-1

SEQ 0371

<<CONTROL S & CONTROL Q>>

CONTROL S & CONTROL Q

|““.‘.“‘.‘““..‘.““...‘..".“..‘.“‘.‘.“‘.“..‘““...“‘.‘..‘......‘.‘.

055
13969
13970 83 304
306
13971
13972 055312
1397 05531:

Monday 07-Oct-85 16:57

;8888888804888 088888888888808000888888880000080800880088444888800808880048000000

MACRO Y05.02

125336
125332
177600
000021
054640

CONTS2: TSTB
BPL

iGET RID OF RETURN ADDRESS FROM STACK

@4TKS

JMAIT FOR CHARACTER

CONTS2

MOVB
8$TKB,(SP)
BIC ___ @tC177,(SP)
IF (SP) EQ 21

JMP
ELSE

CONTS1

CONTS2
BR
END ;OF IF (SP)

MOV (SP)+,RO

sREPLACE OVER OLD CHARACTER ON STACK
1STRIP ALL BUT ASCII
:IF IT IS A CONTROL Q

CHP (SP), 021
BNE L517
BR L520

LS17:533333

LS20:;5:35:5:3

CVMJABO MSV11-J MEMORY DIAG.

CONTROL S & CONTROL Q

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 430

SEQ 0372

1088888808888 88088880888088000880080408000880040000088088008808080880084000000000

1#THIS ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY
soCALL:

P
e

ROCHR

RETURN HERE

s INPUT A SINGLE CHARACTER FROM THE TTY

; sCHARACTER IS ON THE STACK
1 iWITH PARITY BIT STRIPPED OFF

SRDCHR: MOV
000004 000002
MOV
125272
14:
TSTB
BPL
MOVE
125266 000004
BIC
177600 000004
000004 000023
cHP
BNE
125240
2¢:
TST8
BPL
125234
MOVBE
177600
BIC
000021
cHP
BNE
B8R
000004 000021 3$:
cHP
8EQ
000004 000140
CHP
BLT
cHP
000004 000175
8GT
000040 000004
BIC
as:

RTI

(SP),-(SP)
4(SP),2(sP)
@8$TKS
14
@4TKB,4(SP)
0tC<177>,4(SP)
4(sP), 023
38
@$TKS
24
@$7KB,-(SP)
9tC177.(SP)
(SP)+, 021
23
1
4(sP),e21
14
4(SP), 0140
4%
4(SP), 0175
as
040,4(SP)

i
DOWN THE PC
1 1SAVE THE PS
1 1WAIT FOR
1 1A CHARACTER
s tIREAD THE TTY
;iGET RID OF JUNK IF ANY

33IS IT A CONTROL-S?

3 1BRANCH IF NO
+1WAIT FOR A CHARACTER
:3LOOP UNTIL ITS THERE
: 1GET CHARACTER

1 iMAKE IT 7-BIT ASCII
::IS IT A CONTROL-Q?7

313IF NOT DISCARD IT
11 YES, RESUME
11IS IT A RANDOM CONTROL-Q?
: 1BRANCH BACK IF SO
:+:IS IT UPPER CASE?
: sBRANCH IF YES
:31IS IT A SPECIAL CHAR?
: 1BRANCH IF YES

sR-C
:R-C

1 sMAKE IT UPPER CASE
:1G0 BACK TO USER

1088888088048 88888800808848284848088885888488888884082888888888284888888888848888808

;#THIS ROUTINE WILL INPUT A STRING FROM THE TTY
:sCALL:

;e
;e

14015

$ROLIN: MOV
CLR
MOV
16:
cHP
2%:
BLOS
RDCHR
MOVB

1‘01’ 055464 010346
1401 8354“ 005046
70 012703 055762
14018
74 022703 056006
14019
101477
S
1:830
104411
14021
112613
g
1‘023

1402

14024
14025

055512
S14

055514

cMPB

122713 000003

BNE
TYPE

001016
104401

005726
14026 0S
14027 055522 012603
14028 05 gg; 032777
1
0SS
001404
055534 005037
14030
14031 055540 000137
14032 055544 000137
14033 055550 122713

056006

000400
002420
040512
040442
000177

ROLIN
RETURN HERE

125104
118:
3%:

R3,-(SP)
-(SP)
O$TTYIN,R3
#8TTYIN+20. ,R3
8s

(SP)+,(R3)
@3, (R3)
34
S$CNTLC

7;;5&

é'O'FCNTLC

ST
MOV
BIT
BEQ
CLR
JMP
JMP
cMPB

(SP)e.
(SP)+,R3
#BIT8,8SWR
11¢
STOPOK
EXIT
QuUIT
€177,(R3)

:sINPUT A STRING FROM THE TTY
: sADDRESS OF FIRST CHARACTER WILL BE ON THE STACK

; sTERMINATOR WILL BE A BYTE OF ALL 0'S

: sSAVE R3
;sCLEAR THE RUBOUT KEY
1 :GET ADDRESS
;;BUFFER FULL?
::BR IF YES
::G0 READ ONE CHARACTER FROM THE TTY
TER
::GET

:31S IT A CONTROL-C?

IF NO
::BR
;3 TYPE A CONTROL-C (tC)
: sCLEAN RUBOUT KEY OFF OF THE STACK
1 ;RESTORE R3
:3:IS THERE A HALT FLAG SET IN THE SWR?
::BRANCH IF NOT TO MALT ROUTINE
::GET READY TO HALT PROGRAM
::G0 HALT PROGRAM
::GOTO CONTROL -C HALT
::IS IT A RUBOUT

L
ESNTROL S ¢ CONTRO@'
14034 055554
14035 055556

DIAG.

MACRO Y05.02

BNE
ST
BNE
MOVE

001022

14036 05;5‘0

000134

14037 055562
14038 055570

055760

TYPE
TYPEIT

055760

055570

Monday 07-Oct-85 16:57

DSABL

MOV
DEC

14039 055574

012716

177777

uou 03!

020327
103434
111337

055762
055760

104401

055760

TYPE
TYPEIT

000134

B8R
ST
BEQ
MOVE

14040 05

i
§§“

14045
1‘“’

l‘“

003303

000725
005716
001406
112737

“76

000676

i§

000671
111337

055760

104401

055760

14063

5716

122723

000015

14067
14068

i
5730

105063

177777

104401

002661

14072 055742

TYPE
TYPEIT

055762

002657

§S700
10071

74:

002660

104401

1 4066

.DSABL

B8R
CMPB
BNE
CLRB

104401

712

CLR
CMPB
BNE

TYPE
TYPEIT

000022

t
=055672

(RS) 104

.DSABL

056013

MOVB

TYPE
TYPEIT

68:

1038 eeas

l‘“l

055760

001264

005726
012603
011646
016666

8s:
9s:

CRF

e-1.(SP)
R3

RS OS$TTYIN

DSABL

S$:

108
104

cHP
BLO

055760

%
14059

as:

€y
(sP)
4t
#'\.10%

10$
,104

CRF

(SP)
74

925.(R3)
$CNTLU
,$CNTLU

CRF

:13sBR IF NO

:1:TYPE A BACK SLASH

; sCLEAR THE RUBOUT KEY
:3IS CHARACTER A CIRL V?
::BR IF NO
;s TYPE A CONTROL “uU*

14
9

;:G0 START OVER
i3IS CHMACTER A "tR"?
: sBRANCH IF

$CRLF
,4CRLF

ssTYPE A "CR"
& "LF"

922,(R3)

(R3)

.DSABL

CRF

STTYIN
,$TTYIN
car
,$QUES

Y
um 104

.DSABL énr
015,(R3).
BNE
24
CMPB
CLRB

-1(R3)

.DSABL

CRF

MOV
MOV
MOV

(SP)+.R3
(SP),-(SP)
4(SP),2(sP)

TYPEIT 'SLF

000002

’élSCTW TO TYPEOUT THE DELETED CHAR.

::G0 READ ANOTHER CHAR.
: sRUBOUT KEY SET?

oouss

33SET THE MWT KEY
3+ sBACKUP BY ONE
13STACK EMPTY?
1:BR IF YES

24
(sP)
68
@ \,10%

CRF

TYPE

B8R
MOVB

TYPE A .M:K SLASH

1360 TY

CRF

TYPEIT

IS THE FIRST RUBOUT?
I

109
,104

.DSABL

TYPE
TYPEIT
.D
8R

SEQ 0373

(SP)+

1 sCLEAR THE CHARlCTER

ssTYPE THE INPUT STRING

:3G0 PICKUP ANOTHER CHACTER
ssTYPE A ' 2
:1:CLEAR THE BUFFER AND LOOP
: sECHO THE CHARACTER

; sCHECK FOR RETURN
::L00P IF NOT RETURN
:;CLEAR RETURN (THE 15)
:3sTYPE A LINE FEED

; ;CLEAN RUBOUT KEY FROM THE STACK
TORE R3

:sADJUST THE STACK AND PUT ADDRESS OF THE
ON IT
FIRST ASCII CHARACTER
¥

CVHMJABO flSVlé-J MEMORY DIAG.

CONTROL Q

CONTROL S &

14073 055750
055756
14074

055760
14075
378
14076
14077 0557
14080

14081

14082

14083
14084
14085

36
1
056044

012766
000002

055762

é s

103

MACRO Y05.02
000004

1‘6

125

000

01;

012

040
105
075

040
127
040

%12

107

o40

MOV
RTI

.BYTE
.BYTE
$TTYIN: .REPT_

10%:

000
000

Monday 07-Oct-85 16:57

Pege 430-2

OS$TTYIN,4(SP)

/tC/<15><12>

/tG/<15><12>

: sCONTROL *“G*

015

$CNTLC: .ASCIZ

015

$CNTLG: .ASCIZ

123

$MSWR:

.ASCIZ

<15><12>/SWR = /

$MNEW:

.ASCIZ

015 SCNTLU: .ASCIZ /tU/<15>¢<12>
040

000

116
040
000

.EVEN

1 sRETURN

1 sSTORAGE FOR ASCII CHAR. TO TYPE
3 s TERMINATOR
: sRESERVE SIZE BYTES FOR TTY INPUT
: sCONTROL "C*

O
O
20.

NEW = /

1 sCONTROL *"U”

SEQ 0374

MEMORY DIAG.

MACRO Y05.02

OCTAL NUMBER FROM THE TTY

Monday 07-Oct-85 16:57
.SBTTL

Page

SEQ 0375

431

ROUTINE READ AN OCTAL NUMBER FROM THE TTY

] 0608888880002 088008288888008880028888808880280088808088888888888808088888880080000000

1oTHIS ROUTINE WILL READ AN OCTAL (ASCII) NUMBER FROM THE TTY AND
;#CHANGE IT TO

BINARY.

ACTERS WILL BE CHECKED TO INSURED THEY ARE LEGAL
160CTAL DIGITS. IF AN ILLEGAL CHARACTER IS READ A "7* WILL BE TYPED
FEED. THE COMPLETE NUMBER MUST
1eFOLLOWED BY A CARRIAGE RETURN-LINE
BY TYPING A CARRIAGE RETURN.
TERMINATED
IS
INPUT
THE
RETYPED.
14THEN BE
JoTHE INPUT
38

e
011646

016666 000004 000002

010146
oio%u

o8
L.

RDOCT

RETURN HERE

$RDOCT: MOV

MOV

PUSH

%ouzz
12600
010037 056176

1¢:

(SP),-(SP)

4(sP).2(sP)
RO,R1.R2

MOVE
BEQ
CHP8

(RO)e+,-(SP)
3
'0.(SP)

+ sPICKUP THIS CHARACTER
ZERO GET OUT
:1IF
1 sMAKE SURE THIS CHARACTER

:é

as
@'7.(SP)

162

RR1R2

0
0

26
105010

as:

104401
000000
104401

104401

S$:
070046

070066

ASL
ROL
ASL
ROL
8IC
ADD
aa
TST
MOV
MOV
POP

012602

: sPROVIDE SPACE FCR THE

1 s INPUT NUMBER

RO,5$

8GT
CHPB

38:

::LOM ORDER BITS ARE ON TOP OF THE STACK
: sHIGH ORDER BITS ARE IN $HIOCT

:+ sREAD AN ASCIZ LINE
:1GET ADDRESS OF 1ST CHARACTER
1:AND SAVE IT

(SP)+,RO

&gz%o 000067

1
006102
006301
006102
16 177770
1
7
oxoxgg 000012
056216
010237

+ 1READ AN OCTAL NUMBER

ROLIN
MOV
MOV
&:

o%uao
m 000060

RTI

TYPE

R2
@1C7.(SP)
(SP)s+.R1
24
(SP)e
R1.12(SP)
R2. $HIOCT
R2.R1.RO

(SP)+
(RO)

TYPEIT
‘WORD O
TYPE

TYPEIT

.DSABL

TYPE

TYPEIT

MSGO62

,MSGO62

CRF

MSGO63

,MSGO63

oV
R2.-(SP)
MOV RY.-(5P)

1 sCLEAR DATA WORD

1:1IS AN OCTAL DIGIT
338

;104
1308

+sSTRIP THE ASCII JUNK
:3ADD IN THIS DIGIT
: sLOOP
: 1CLEAN TERMINATOR FROM STACK
: 1SAVE THE RESULT
MOV (SP)s.R2

s sSRETURN

1 sCLEAN PARTIAL FROM STACK
:1SET A TERMINATOR
13 TYPE UP THRU THE BAD CHAR.
;INPUT MUST BE A
:N OCTAL

MOV (SP)+.R1
MOV CSP)e+.RO

i m a

1“‘: mv& nm }rg.oa

14133 338{3

Mondey 07-Oct-85 16:57
.DSABL

104401

070077

000724
000000

TYPEIT

,MSGO64
|MSGOS

.MORD

TYPEIT

.DSABL

$HIOCT:

CRF

Page 431-1

SEQ 0376

_——

+3TRY AGAIN

HIGH ORDER BITS GO HERE

"SBTTL ROUTINE READ A DECIMAL NUMBER FROM THE TTY

18 8 8 8 08 0884884248800848886880808088880008048888848008800080888008008088080805804000

ntugnnmmnvno
ANY

1oTHIS ROUTINE MWILL READ A DECIMAL
T00 MANY
:

3’2, g 190,
S
e
%ovm
1 B
INPUT
RETYPED.
BE
MUST
Wi
TE
-:fi
xmum.ma&wmiwwmxs
18USER TYPINGA
.mrm 32767 T0 NEGATIVE 32768.
i

“ym

RDDEC

RETURN MERE

1 1READ A DECIMAL NUMBER

:JNUMBER IS ON TOP OF THE STACK

’

SRDDEC: MOV

MOV

PUSH

18:

ROLIN

BNE

#0.R1
S¢

m
ho

u‘o
867

11SEE

SET

W ml

IF A

SIGN WAS TYPED

SIGN

i
sSAVE F'
USE
ng?w THIS CHARACTER
w'

3111S
sMAKEA angm
CHARACTER
DIGIT BETMEEN
O € 9

8IT
BNE
ASL
MOV
ASL

#TCT777,(SP)
Ss
gsn
SP),-(SP)
(SP)

::DON'T LET MMBER GET 1O BIG
:1:BR IF NUMBER WOULD
Otd
1182
: 1SAVE FOR LATER
104

8vs

£3

ADD

as:

¢ -.(RO)

g'.’.ll

SUR

000012

..a&

-(5P)

oF xg CHAR.

anr

ASL
ADD

38:

i 14D

1¥ ]

Suo)o.az
Jo)o.n

MOV RO, -(SP)
MOV R1.-(SP)
MOV R2.-(SP)

1 1READ AN ASCIZ LINE

CLR

170000

11 THE INPUT NUMBER

53'23‘"

CLR

000071

RO,R1.R2

1 1PROVIDE SPACE FOR

MOV

2¢:

(SP),-(SP)

4(sP),2(sP)

BYS
g
T

POP

(SP)
(SP)..(SP)

®0,.R1

1308,
131010,

ISN'T

ALLOMED

11S

AMAY

<8
R2

i
i
s

ISN'T ALLOMED
IF MMBER IS NEG

(SP)e,12(SP)
R2,.R1.RO

: 1 SAVE

R1,(SP)
g

(SP)

1 1YESs

II JUNK

-NEGATE THE MUMBER

RESWLT

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

ROUTINE READ A DECIMAL NUMBER FROM THE TTY

{:%s

056350
056352
354
356

012602
012601 012600
005726
105010

056364

104401

14189 056366
14190 056370

000000

056370

14191 056374
056374

14192 056400

056400

S$:

TST
CLRB
TYPE

(SP)«
(RO)

.DSABL

CRF

TYPEIT

68:

.WORD
TYPE

Page 431-2

1 sRETURN

RTI

000002

360
14186
362
14187
14188 056364

Monday 07-Oct-85 16:57

O
MSG062

MSGO062

: sPOINTER GOES HERE
;sINPUT MUSST BE A

070046

TYPEIT

104401

070107

TBIS’EAH.

EREGOGS

MSGO65

;DECIMAL

104401

070077

TYPE

MSGO64

;sNUMBER

DSABL

CRF

;s TRY AGAIN

14193 056404 000714

TYPE

TYPEIT

B8R

CRF

,MSGO64

MOV (SP)+,R2
MOV (SP)+,R1
MOV (SP)+,RO

; sCLEAN PARTIAL NUMBER FROM STACK
:iSET A TERMINATOR
;s TYPE THE INPUT UP TO BAD CHAR.

104401

.DSABL

SEQ 0377

CVMJABO MSV1l -J MEMORY DIAG.

ROUTINE SAVE AND RESTORE RO-RS

MACRO Y05.02

Monday 07-Oct-85 16:57

.SBTTL

Page 432

SEQ 0378

ROUTINE SAVE AND RESTORE RO-RS

] 20888080800 888888008080828888888880288880880080 8888280888888 RARRRRRRRRRRRRRRGRS

;#SAVE RO-RS
:
;oCALL

SAVREG

;#UPON RETURN FROM $SAVREG THE STACK WILL LOOK LIKE:
FL

;8TOP---(+16)
i® «2---(+18)
;¢

+4---RS

;¢ +6---R4
;® +8---R3

000022

000022
000022

MOV
MOV
MOV

22(SP),-(SP)
22(SP), -(SP)

:;SAVE PS OF MAIN FLOW
::SAVE PC OF MAIN FLOW

22(SP), -(SP)

::SAVE PC OF CALL

MOV

RTI

22(SP), -(SP)

RO,R1,R2,R3,R4,RS

332822

PUSI

433888

$SAVREG:

;#+10---R2
;8¢12---R1
;#+14---RO

::SAVE PS OF CALL

;#*RESTORE RO-RS
RESREG
MOV
MOV
MOV
MOV
POP

056466

056470
056472
056474
056476
14229 056500

RTI

(SP)+,22(SP)
(SP)+,22(SP)
(SP)+,22(SP)
(SP)+,22(SP)

; ;RESTORE PC OF
: ;RESTORE PS OF
: sRESTORE PC OF
; sRESTORE PS OF

R5,R4,R3,R2,R1.RO

CALL
CALL
MAIN FLOW
MAIN FLOW
MOV
MOV
MOV
MOV
MOV
MOV

323535

$RESREG:

§egees

:
;#CALL

CVMJABO MSV11-J MEMORY DIAG.

ROUTINE RANDCM NUMBER GENERATOR

MACRO Y05.02

Monday 07-Oct-85 16:57

.SBTTL

}:335

Page 433

SEQ 0379

ROUTINE RANDOM NUMBER GENERATOR

1‘2,3

;...........“‘.."....".....O....‘......“..‘.“‘..‘.....‘...‘.O.‘O‘...O...0.0

14235

;oMITH A RANGE OF O TO 2es(+33)-1.

;#THIS ROUTINE IS A DOUBLE PRECISION PSEUDO RANDOM NUMBER GENERATOR

14234

;oCALL:

14236

14237
14238

ie
ie

$RAND
CALL
RETURN

SRAND:

PUSH

;e
e

14239
{:g:g
14242 056502

056502

056
gg

056510
14243
14244 gg 14
gzo
14245
4246 056524
14247 056
14248 056
14249 056532
14250 056
14251 gg:m
uzs;
14253 056550
4254 gzg
56
14255
14256 056562
14257 056
056

010046

010146
010246

013700
013701
012702
006300
€06101
077203
063700
005501
063701
062700
005501
062701
010037
010137
i,
260

sesre o)

14258 056574 000207

002604
002602

000007

002604
002602
001057
047401
002604
002602

18:

MOV
MOV
MOV
ASL
ROL
S08
ADD
ADC
ADD
ADD
ADC
ADD
MOV
MOV
POP

RETURN

: sCALL THE ROUTINE
: iRETURN HERE THE RANDOM

: iINUMBER WILL BE IN
s 3 SHINUM, $LONUM

RO,.R1,R2

SEEDLO.RO
SEEDHI.R1
o7.R2
RO
R1
R2,1$
SEEDLO,RO
R1
SEEDHI,R1
#1057, R0
R1
047401,R1
RO, SEEDLO
R1.SEEDHI
R2.R1,RO

MOV RO, -(SP)

;SET RO WITH LOW
:SET R1 WITH HIGH
:SET SHIFT COUNT
:3SHIFT RO LEFT AND
: sROTATE CARRY INTO R1 AND
;ADD NUMBER TO MAKE X 129
: sPROPOGATE CARRY
:ADD NUMBER TO MAKE X 129
::ADD LOW CONSTANT
: ;sPROPOGATE CARRY
::ADD HIGH CONSTANT
:SAVE RO
;SAVE R1

MOV
R1.-(SP)
MOV R2.-(SP)

e
v

+.R2

o (53R
'

MACRO YOS.?ZC Monday 07-0Oct-85 16:57
CVMJABO MSV11-J MEMORY DIAG.
ONVERT
ASCI
OCTAL
TO
BINARY
LENGTH
DOUBLE
ROUTINE

.SBTTL

14261
14262

SEQ 0380

ROUTINE DOUBLE LENGTH BINARY TO OCTAL ASCII CONVERT

1888880028880 88088808888008888808888004880888008000880000484040880000000000000000

;#THIS ROUTINE WILL CONVERT A 32-BIT UNSIGNED BINARY NUMBER TO AN

14263
14264
14265
14266
14267
14268
4269

:sUNSIGNED OCTAL ASCIZ NUMBER.

MOV

RETURN

000002
056715
000014
177770

$D820:

1%:

CALL

SAVREG

2(SP),R1
#40CTVL+13. ,R5
012..R4
@tC7,.R3
(R1)+,RO
(R1)+,R1

MOVB
MOV

R2,-(R5)
RO,R2

CLR

BGT

BEQ

INC
MOV

RESREG
RETURN

ASR
ROR
ROR
ROR

ROR
ROR
ROR
8IC

$OCTVL:

$0B20

MOV
MOV
MOV
MOV
MOV
MOV

DEC

24:
34:

OPNTR, -(SP)

ADD
BR

.REPT

$0CT8=$0CTVL +4

R4
34

RS
R5,2(SP)

R3
R1

RO
R1

; tPOINTER TO LOW WORD OF BINARY NUMBER
:3CALL THE ROUTINE

;s THE ADDRESS OF THE FIRST ASCIZ CHAR. IS ON THE STACK
ALL REGISTERS
THE POINTER TO LOW WORD
' POINTER TO DATA TABLE
i DO ELEVEN CHARACTERS

i SAVE

[ PICKUP

552

;#CALL

4270

14271 056576

Page 435

WORD
'
s TERMINATOR
' PUT

CHARACTER IN DATA TABLE

;
i

IF NOT_THE LAST DIGIT
IF IT IS THE LAST DIGIT
i ALL DIGITS DONE-ADJUST POINTER FOR FIRST
&€ PUT IT ON THE STACK
; ASCIZ CHAR.

[ BR
; BR

: sRESTORE _ALL REGISTERS
1 sRETURN TO USER
;;POSITION THE MASK FOR THE LAST DIGIT
; sPOSITION THE BINARY NUMBER FOR
THE NEXT OCTAL DIGIT
i

R1
RO
R3,R2

:sMASK OUT ALL JUNK

14,

::G0 PUT IT IN THE DATA TABLE
: sRESERVE DATA TABLE

@'0,R2
1%

; sMAKE THIS CHAR.

ASCII

;:POINTER TO 11 DIGIT NUMBER

CVMJABO MSV11-J MEMORY DIAG.

MACRO Y05.02

Monday 07-0Oct-85 16:57

Page 436

SEQ 0381

TABLES

716
716

14310 056724
14311 056726
056730
14312
14313 056732
14314 056734
14315 056736
14316 056736
14317

14320 056737
14322 056740
14323 056742
14324 056744

TABLES

.SBTTL

APT MAILBOX-ETABLE

.WORD

14306
14307

.SBTTL

.WORD
.WORD

.WMORD
.WORD
.MORD
.MORD
.WORD

O
O

O
O
O
O
©

+ sMESSAGE TYPE CODE

: sFATAL_ERROR NUMBER (ERROR PC)
: s TEST PATTERN NUMBER
+ 1PASS COUNT
1 sDEVICE COUNT
:3:1/70 UNIT NUMBER
: tMESSAGE ADDRESS
1 sMESSAGE LENGTH

3 s APT_ENVIRONMENT TABLE

;SET TO A 1 FOR APT AUTO MODE
+ sENVIRONMENT BYTE
IF BIT @7 IS SET IN $ENVM THE TABLE BELOW (BEGTNMING AT $MAMS1 AND
ENDING AT $MADR4) MUST BE FILLED IN TO INDICAYE THE PROPER AMOUNT OF
.BYTE_
8

EACH TYPE OF MEMORY.

.BYTE

:ENVIRONMENT MODE

.WORD
WORD
.WORD

101
O
O

+ sAPT SWITCH REGISTER
;USED TO LIMIT THE NUMBER OF PASSES
é:CPU TYPE,OPTIONS

18IT7(200)=USE APT SIZE INFO ;BITS(40)=NO CONSOLE
ITS 15-11=CPU TYPE

11/04=01,11/05=02,11/20=03,11/40=04,11/45=05
11/70=06,PDQ=07,Q=10

$MAMS1
:

BYTE
.BYTE

1
&

BIT 10=REAL TIME CLOCK
BIT 9=FLOATING POINT PROCESSOR
BIT_8=MEMORY MANAGEMENT

: sHIGH ADDRESS.M.S. BYTE ;DEFAULT = 64K
: sMEM. TYPE,BLKO1

MEM.TYPE BYTE

(MIGH BYTE)

900 NSEC CORE=001
300 NSEC BIPOLAR=002

PARITY MOS=003

LMORD

177776

;:HIGH ADDRESS,BLK®1

i Hillssinln

14352 056774
14353
14354 056776
14355 057000
14356 057002

ERROR CORRECTING MOS=004

177776

.BYTE
.BYTE
.
BYTE
BYTE
:
BYTE
BYTE
'MORD
'MORD

: sHIGH ADDRESS.M.S. BYTE
: sMEM.
TYPE ,BLK®2
;s sMEM.LAST ADDRESS.BLK®2
: sHIGH ADDRESS,M.S.BYTE
TYPE , BLK®3
3 sMEM.
: tMEM.LAST ADDRESS.BLK®3
: sHIGH ADDRESS,M.S.BYTE
.
TYPE ,BLK®4
; sMEM
; sMEM.LAST ADDRESS,BLK®4
: s INTERRUPT VECTOR®1,BUS PRIORITY&1

'MORD
'MORD

; 1BASE ADDRESS OF EQUIPMENT UNDER TEST
: :DEVICE MAP

MORD

LMORD
'WORD

'WORD

MEM.LAST ADDR.=3 BYTES.THIS WORD AND LOW OF “TYPE” ABOVE

: s INTERRUPT VECTOR#2BUS PRIORITY&2

;UFD MODE FLAG 1=UFD MODE

CVMJABO MSV11-J MEMORY DIAG.

APT MAILBOX-ETABLE

14358
14359
14360
14361
14362
14363
14364
14365
14366
14367 057004
14368 057006

MACRO Y05.02

Monday 07-0Oct-85 16:57

Page 437

SEQ 0382

;THE FOLLOWING LOCATIONS SPECIFY WHICH PATTERNS
{ARE TO BE RUN FOR PARTICULAR MEMORIES

{REFERENCE THE TABLE LISTED BELOW TO RELATE BITS TO PATTERNS.
BITO SET
:IN THE SECOND WORD WILL RUN THE 17TH ENTRY IN THE TABLE ...
INOTEss NULL TESTS DO NOT TAKE ANY TIME
;BITO SET WILL RUN THE FIRST ENTRY IN THE TABLE,

177777
177777
177777
177777
177777
177777

;

$DDWO:

.WORD

177777

$DDW4:

.WORD

177777

$DDW1:
$DDM2:
$DDW3:
:%

.WORD
.WORD
.WORD

"MORD

177777
177777
177777
177777

ECC CSR TESTS
ECC PATTERNS
;ECC PATTERNS

sFIELD SERVICE VALUE
177777
177777
103777
177777

;PARITY PATTERNS

177778

;ECC CSR TESTS

;PARITY PATTERNS

003777

TABLE = MKCSRT:

TABLE = MKCSRT:
TABLE = MKPAT:
TABLE = MKPAT:

TABLE == MJPAT:
MJPAT:
TABLE

1SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC
; INTERFACE SPEC.

14384 057026
14385 057030
14386 057032

000000
056716
000043
001274

$APTHD:

$HIBTS: .WORD
$MBADR: .WORD
.WORD
$TSTM:
$PASTM: .WORD
$UNITM:

.WORD

O
$MAIL
35.
700.
O.

$ETEND-$MAIL/2

::TWO HIGH BITS OF 18 BIT MAILBOX ADDR.
; sADDRESS OF APT MAILBOX (BITS 0-15)
:iRUN TIM OF LONGEST TEST
:iRUN TIME IN SECS. OF 1ST PASS ON 128K (QUICK VERIFY)
;sEXTRA RUN TIME OF A PASS FOR EACH ADDITIONAL 128K (QV)
;;LENGTH MAILBOX-ETABLE(WORDS)

CVMJABO MSV1l-J MEMORY DIAG.

ROUTINE TRAP DECODER

MACRO Y05.02

.SBTTL

14388
14389
14390
14391
14392

14397 057036
057042
14398

057044
14399
14400 057046

14401 057050
057054
1
1440
14404

14405
14406
14407 057056
14408 057060
14409 057066
14410
14411 057070
057070

14412 057074

Page 438

SEQ 0383

ROUTINE TRAP DECODER

1888888448008 80408440408808808808080800848404000080884484888800080088008800000000

;#THIS ROUTINE WILL PICKUP THE LOWER BYTE OF THE “TRAP* INSTRUCTION

;#AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS
;#0F THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED IT WILL

14393
14394

16395
14396 057034

Monday 07-Oct-85 16:57

1#G0 TO THAT ROUTINE.
010046
016600

005740
111000
006300
016200
000200

$TRAP:

000002

MOV

1 sSAVE_RO

2(SP),RO

13GET TRAP ADDRESS

MOV8

(RO),.RO

1 sGET RIGHT BYTE OF TRAP

ASL
MOV
RTS

057076

RO, -(SP)

MOV

-(RO)

RO
$TRi AD(RO),RO
RO

: s$BACKUP BY 2

3 sPOSITION FOR INDEXING
;;INDEX TO TABLE
+:GO0 TO ROUTINE

:3sTHIS IS USE TO HANDLE THE “GETPRI” MACRO
C11646
016666
000002
104401

000002

065557

$TRAP2: MOV
MOV
RTI

(SP),-(SP)
4(SP),2(5P)

: sMOVE THE PC DOWN
: sMOVE THE PSW DOWN
: sRESTORE THE PSW

$NOTRAP: TYPE

MSGO06

sUNDEFINED TRAP INSTRUCTION

$HALT2:

TYPEIT
.DSABL
HALT

,MSGOO6
CRF

CVMJABO HEVI.I-J MEMORY DIAG.
TRAP TABL

MACRO Y05.02

Monday 07-0Oct-85 16:57

.SBTTL

14415
14416
14417
14418
14419
14420

Page 440

SEQ 0384

TRAP TABLE

;#THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED
1#BY THE "“TRAP" INSTRUCTION.
H

$ TRPAD:

14426
14427 057110

ROUTINE

"WORD _ $TRAP2
§TYPE
:CALLSTYPEIT

$TYPOC
$TYPOS

$NOTRAP; $TYPON

TRAP+1(104401)

TTY TYPEOUT ROUTINE

+2( 104402 ) TYPE OCTAL NUMBER (MITH LEADING ZEROS)
TRAP
TYPE OCTAL NUMBER (NO LEAD?G ZEROS
TRAP+3(104403)
TRAP+4(104404)
TYPE OCTAL NUMBER
3 CALL=TYPON

3 CALL=TYPOC
JCALL=TYPOS

%::g 057112

SNOTRAP; $TYPBN ; CALL=TYPBN

$TYPDS — ;CALL=TYPDS

TRAP
+5( 104405)

057114
14430
14431 057116

$GTSWR

;CALL=GTSWR

TRAP+7( 104407)

SROCHR
SROLIN
$RDOCT

;CALL=RDCHR
JCALL=ROLIN
s CALL=RDOCT

TRAP+11(104411) TTY TYPEIN CHARACTER ROUTINE
TRAP+12(104412) TTY TYPEIN STRING ROUTINE
TRAP+13(104413) READ AN OCTAL NUMBER FROM TTY

14435 057124

14436 057126

14437
14438 057130

14439 057132
14440

14441 057134
14442 057136
14443 057140
14444

$CKSWR ;CALL =CKSHR

$RODEC :CALL =RDDEC

14447 057144
14448 057146
14449
14450 057150

1351 057152

14457 057164
14458 057166
14459 057170
14460 037172
14461 057174

14466857206
14467 957210
14468
14469
14470
14471

057212
057214
057216
057220

GET _SOFT-SWR SETTING

TRAP+10(104410) TEST FOR CHANGE IN SOFT-SWR

TRAP+14(104414) READ A DECIMAL NUMBER FROM TTY

$SAVREG ;CALL=SAVREG
$RESREG ;CALL=RESREG

TRAP+15(104415) SAVE RO-R5 ROUTINE
TRAP.+16(104406) RESTORE RO-RS ROUTINE

SKERNEL

:CALL=KERNEL

TRAP+17(104417) ENTER KERNEL MODE

: CALL =KMAP

TRAP+22(104422) MAP KERNEL
1 TO0 1

$ENERGIZE
; CALL=ENERGIZETRAP+20(104420) TURN ON MEMORY MANAGEMENT & TRAPS
$DEENERGI
; CALL =DEENERGITRAP+21(104421) TURN OFF MEMORY MENAGEMENT & TRAPS

14445 057142
14446

TYPE DECIMAL NUMBER (WITH SIGN)
TRAP+6(104406)
TYPE BINARY (ASCII) NUMBER

$CACHN
$CACHF

s CALL =CACHOFF

s CALL=CACHON

TRAP+23(104423) TURN CACHE ON
TRAP+24(104424) TURN CACHE OFF

$LOADC
$READC

s CALL=LOADCSR
;CALL=READCSR

TRAP+25(104425) LOAD CORRECT CSR
TRAP+26(104426) READ CORRECT CSR

s CALL=PERRO1
: CALL=PERRO2
;CALL =PERRO3
1CALL =PERRO4
:CALL=PERRO7
sCALL=PERR10

TRAP+27(104427)
TRAP+30(104430)
TRAP+31(104431)
TRAP+32(104432)
TRAP+33(104433)
TRAP+34(104434)
TRAP+35(104435)
TRAP+36(104436)
TRAP+37(104437)
TRAP+40(104440)
TRAP+41(104441)
TRAP+42(104442)
TRAP+43(104443)
TRAP+44(104444)
TRAP+45(104445)
TRAP+46(104446)
TRAP+47(104447)
TRAP+50(104450)
TRAP+51(104451)

:CALL=PERR11

;:CALL=PERR12
;CALL=PERR13
;CALL=PERR1S

;CALL=PERR1S
1CALL=PERR16
;CALL=PERR17

: CALL=PERR20
s CALL=PERR21

sCALL=PERR23

;CALL=PERR24
;CALL=PERR25

PROGRAM DETECTED ERROR
PROGRAM DETECTED ERROR
PROGRAM DETECTED ERROR

ufilECTED

PROGRAM DETECTED ERROR
PROGRAM DETECTED
PROGRAM DETECTED
PROGRAM DETECTED
PROGRAM DETECTED

PROGRAM DETECTED
PROGRAM DETECTED ERROR
PROGRAM DETECTED
PROGRAM DETECTED ERROR
PROGRAM DETECTED ERROR

TRAP

MSV11-J MEMORY DIAG.

TABLE

MACRO Y05.02

Monday 07-0Oct-35 16:57

Page 440-1

TRAP+52(104452) PROGRAM DETECTED ERROR
TRAP+S3(104453) PROGRAM DETECTED ERROR
TRAP+S4(104454) PROGRAM DETECTED ERROR
TRAP+55(104455) PROGRAM DETECTED ERROR
TRAP+S6(104456) PROGRAM DETECTED ERROR
TRAP+57(104457) PROGRAM DETECTED ERROR
ERROR
TRAP+60(104460) PROGRAM DETECTED
ERROR
TRAP+61(104461) PROGRAM DETECTED
TRAP+62(104462) PROGRAM DETECTED ERROR
TRAP+63(104463) PROGRAM DETECTED ERROR
TRAP+64(104464) PROGRAM DETECTED ERROR
TRAP+65(104465) PROGRAM DETECTED ERROR
TRAP+66(104466) PROGRAM DETECTED ERROR

SEQ 0385

14472 057222
14473 057224
14474 0572;8
14475 0372
14476 057232
14477 057234
14478 057236
14479 057240
14480
057244
14481
14403 057246
1448 837250
14484
057

050272
050312
045112
050502
050600
050646
030726
050760
051014
051044
05%050
057070
057070

$PER26 ;CALL=PERR26
$PER27 ;CALL=PERR27
$PER30 ;CALL=PERR30
$PER31 ;CALL=PERR31
$PER32 ;CALL=PERRS2
$PER33 ;CALL=PERR33
$PER34 ;CALL=-PERR34
$PER3S ;CALL=PERR3S
sCALL=PERR36
$
$PER37 ;CALL=PERR37
$PER4AO ;CALL=PERRAO
$NOTRAP ;CALL=PERR41
$NOTRAP ;CALL=PERR42

14487 057256
14488 057260
057262
14489
057264
14490
057266
14491
057270
14492
057272
14493

034456
034472
034504
034520
C34560
034602
034622

14495 837 76
057
14496
14497 057302
14498 057304
14499
057306
057310
14500
14501 057312

034766
035102
035132
035144
035154
035170
034532

TRAP+70(104470) DISABLE ECC 0“ ALL CSR'S
$ECCDIS ;CALL=ECCDIS
DISABLE ECC ON 1 SELECTED CSR
TRAP+71(104471)
OECCIDIS;CALL-ECC.DIS
TRAP+72(104472) INITIALIZE ALL MX C!l S
0ECCINIT+C‘LL-ECC
1 SELECTED 1_CSR
[TIALIZE
$ECC1INI CALL-ECLIINIT TRAP+73(104473)
TRAP+74(104474) WRITE GENEI‘?ED CHECKBIT S II CSR'S
$CBCSR_ ;CALL=CBCSR
TRAP+75(104475) WRITE GENERATED CNECI'ITS IN 1 SELECYED CSR
$CB1CSR lClLL‘CllCSR
TRAP+76(104476) WAS THERE A SBE ON ANY CSR?
$WASSBE ;CALL=WASSBE
WAS THERE A SBE ON 1 SELECTED CSR?
77)
OH‘SIS‘E:CALL-HASISIE TRAP+77(1044)WAS
THERE A DBE ON ANY CSR?
TRAP+100(104500
$WASDBE ;CALL =WASDBE
TRAP+101(104501)WAS THERE A DBE ON 1 SELECTED CSR?
BE
; CALL=WASIDBE
$WAS1D
TRAP+102(104502)CLEAR ALL CSR'S
$CLRCSR ;CALL=CLRCSR
1 SELECTED CSR
TRAP+103(104503)CLEAR
0CLR1CSR:CALL-CLRIC$R
$CHKDIS ;CALL=CHKDIS
TRAP +104( IOCSN)DISM.E ECC &€ WRITE CKBITS FROM
ALL CSR'S
TRAP+105(104505)DISABLE ECC & WRITE CKBITS FROM 1 CSR
$CHK1DIS;CALL=CHKIDIS
JENABLE TRAPS ON SBE'S FROM ALL CSR’'S
10450606(
TRAP+1
$ENASBE ;CALL=ENASBE

1450 8373%6
14;3
057322
14

034276
035250
035300

$INVALID;CALL=INVALID
$ERRGEN ;CALL=ERRGEN

0573
14
057332
14509
057334
14510
14511 057336
14512 057340
14513 057342

057070
057070
057070
057070
057070
057070

14516

177776

id‘l’ 057

057070

14494

057274 034736

057314 034546

$NOTRAP ;CALL=PERRA3

14506 057324 035550
l‘ggz 057353 035566

TRAP+67(104467) PROGRAM DETECTED ERROR

OENAIS.EsClLL-ENASSlE
$TSTRD ;CALL=TSTREAD

TRAP+107(
104507 JENABLE TRAPS ON SBE'S FROM 1 SELECTED
TRAP+110(104510)TEST LOC (R1) & TST FOR SBE (WITHOUT FETCHE

$CBREG ClLL-ClREG
$SYNREG aClLL-SYNREG
$NOTRAP

TRAP+113(104513)ENABLE CHECK BIT REGISTER
TRAP+114(104514 )ENABLE SYNDROME BIT REGISTER

$NOTRAP
$NOTRAP
S$NOTRAP
$NOTRAP
$NOTRAP

;;ILC:REV B
;;ILC:REV B

177776

TRAP+111(104511)INVALIDATE BACKGROUND PATTERN ON BANK
TRAP+112(104512)TEST ERROR ADDRESS

:STATUS REGISTER

j
,

CVMJABO MSV1l-J MEMORY DIAG.

TABLE ~ ERROR

14319
14521
14
1452

POINTER

ie
e
v

14
14
14

057344

ocases
037346 060870
14335 gngg
14
14537 057352
060751
14

14539

14
14541
14542
14
14544

14545

14546
14547
14

037354 Q61017
7356
057360
057362

063551
060214
060627

037364
057366

061053
063631

18
18338

IF $ITEMB IS O THE ONLY PERTINENT DATA IS
EACH ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOWS:

$ERRTB:

DF11
ERROR

OH1
oT1
OF2
LERROR

OHa3
DT13
2

T3
OF9
ERROR

7402

060744

OF9

7404 061155

g?‘ld

| IPOINTS TO THE DATA HEADER
{iPOINTS TO THE DATA FORMAT
| IPOINTS TO THE DATA

;ERROR

060232
060744

J37606 oc3ses
037412 Osos2?

+sPOINTS TO THE ERROR MESSAGE

DH
o1
OF

057370
057372

14549 057374 061107

Ene

06123§

060627

057424

Ta3e

14569

057434

7436

14571 057440
14572 057442

061257

oesees

DHS

063243

ERROR

EnS

060546
060627

DT125
DF2

060252
060627
064764

Page 444

SBTTL TABLE ERROR POINTER
EACH ERROR THAT CAN OCCUR.
;oTHIS TABLE CONTAINS THE INFORMATION FOR
iaTHE INFORMATION IS OBTAINED BY USING THE INDEX NUMBCR FOUND IN
TABLE IS PERTINENT.
1SLOCATION $ITEMB. THIS NUMBER INDICATES WHICH ITEM IN TME (ERRPC).
ie

14527

14535

Monday 07-0Oct-85 16:57

{ $NOTE1 :
1 eNOTE2:

14
18

MACRO Y05.02

DH25

SEQ 0386

CVMJUABO MSV11-J MEMORY DIAG.

TABLE

14575

ERROR POINTER

MACRO Y05.02

Monday 07-0Oct-85 16:57

JERROR 11

14576 057444
14877 057446
74
14578
057452
14579
14
057454
14581

061317
064011
060304
060653
061317

En11
OH7
DY?
OF3
JERROR
EM11

14384

060666

-_—

OM7
D17

7456
057460
037462

064011
060304

057466
7470
7472

064121
060
060627

DH10
0T10
OF

7476
7500
7502

064011
060304
C60701

OH7
017
OFS
ERROR

060304
060714

DT7
DF6

oesaez
060370

DH13
DT13

i14607 03

061417
064242

o
DH13

146
1461

060370

14
14588

14586

14587
14
14
14

057464 061341

14591 057474 061317

14
14
14
14

14596
14597

0S
03

14600
1460

057512

14
14599

14 061365

1
1

14604

1
1
1461
1461

14614
14615

1461
1461
1461
146
1
14621
1
1
1

1
1462

061317
064011

057542

060751

060370
060751
061463

£n12

EM11

EM11
OH7

LERROR 16
13

OF11

DT13
DF11
1ERROR 20
15
DH13
DT13

060751

OF11
émm

063112

vy
3

063272
065022
060560
060627
061531
064011
060304
060701
0646

5
DH26
D126
OF2
iERROR 22
17
OH7
017
S
.

Page 446

SEQ 0387

CVMJUABO MSV11-J MEMORY DIAG.

TABLE

ERROR POINTER
7574

961371

7602

060370
0CO78%

061643
80376
mn
33
uuo
060751

000000
“‘iu”
060
060627

uus

s
&3&.
060627

g1
1

146

14632

seame
gzress
7640 060370
060751

1
1

1
igg

7644

1e6es

037

000000

064337
060412
060627

_—

7664 062111
7670
72

064416
0604
060727

14674

057676

064

14676

057702

1
1
1467
1

14878

7674 062

037700 060460
060653

MACRO Y05.02

Monday 07-Oct-85 16:57
JERROR
EM19

Page 448

DH13

DT13
oELL

ér"eozmu
OT13

OF11
LERROR
)
DH12
DT12
s

sNO MESSAGE

g
DT11
OF2

ERROR 30

fret
DT13
DF11

JERROR

DH14
DT14
.

DTS

—

DH1S
oT1é
OF
ERROR

£n2s

DH16

DT17
OFS

:NO MESSAGE

SEQ 0388

33g323g23
;I3NiEa9LmS.Q3mN.m3u2nu8Ineuru%5mm8wmwm2uuuuuALL~L"LLY2m-mt
O

-J MEMORY DIAG.

MACRO Y05.02
Monday 07-Oct-85 16:57
Page 450
SEQ 0389

CVMJABO MSV11- J MEMORY DIAG.

| TABL

POINTER

MACRO Y05.02

Monday 07-Oct-85 16:57

; ERROR

EMAO

147

060504
060762

14785 060152
14786
14787 060154

062361
064557
060504
060762
061643

Page 452

SEQ 0390

CVMJABO MSV11-J MEMORY DIAG.
TABLE
ERROR POINTER
14788 060156
14789 060160
14790 060162
14791
060164
14
14795 060172
14796
14797 060174
14798 060176
14799

MACRO Y05.02

Monday 07-Oct-85 16:57

064715
060526
060772

DH24
D124
DF14

061756
064715
060526
060772

EM22
DH24
DT24

063476
063665
060252
060627

M62
DHS
DTS
DF2

061756
064557
060504
060762

EM22
DH20
pT23
DF13

;ERROR

DFi4

éemon

sERROR

Page 452-1

SEQ 0391

MACRO Y05.02

CVMJABO MSV11-J ;%'T?Y DIAG.

ERROR DATA TAGS
14807
14808 060214

002020

002034

000000

002044

Monday 07-Oct-85 16:57

Page 453

DT1:

.SBTTL
.WORD

ERROR DATA TAGS (DT)
ERRPC,ADDRESS,GCOD,BAD,O

DT2:

.WORD

ERRPC,0

060222

002052

14810 060232

002020

002036

002072

14811 060242

002020

002034

002070

DT4:

.WORD

ERRPC,ADDRESS,NEMCNT,O

14812

002020

177572

177574

DTS:

.WORD

ERRPC,MMRO,MMR1,MMR2,MMR3,CPUERR,O

002400

DT6:

.MORD

ERRPC,APTPAR,LSIZE,APTECC,MSIZE,O

002034

DOT7:

.WORD

ERRPC,DUMMY,ADDRESS,DUMMY,GOOD,BAD,BADXOR

.WORD

DUMMY,DUMMY,DUMMY,DUMMY,0

OT11:
DT12:

.WORD
.

ERRPC,CSR,0
CSR,0

177574

DT14:

.WORD

CONTRL ,MMRO,MMR1,MMR2,MMR3,CPUERR,O

002176

DT16:

.WORD

ERRPC,DUMMY,DUMMY,GOOD,GOOD2,G0O0D3

.WORD

BAD,BAD2,BAD3,DUMMY,DUMMY,O

DT17:

.MORD

ERRPC,DUMMY,O

000000
002044

ODT22:
DT23:

.WORD
.WORD

ERRPC,DUMMY,0
,DUMMY ,DUMMY,0
,DUMMY AD,DUMMY
ERRPC,DUMMY,GOOD,B

14809 060226

060260

002020

177576

060266

000000

002424

14813 060270

002020

000000

172516

002422

177766

002402

000000

060312 002176 002044

002052

14814 060
14815 060

002020

002176

ooogu

14816 060

002176

000000

060342
060350

14817 060356
14818 060364

(02206
002214

002020
002150

002210
002216

002212
000000

002176

002034

002150

000000

172516

177766

002044

002046

002050

002176

000000

14819 %3;0

002200 002202 002204 DT10:
002020

002150
000000

000000

002176

002246 002250

14820 060412

177746

177572

giit
§

376

14822 060444

002052

14823

002020

060452

002054

060436

177576

14821

DT3:

DT13:

002056

14824 060466 002020 002044 002052 DT20:
060474

000000

060512
060520

002052
002176

14825 060476
14826 060504

1“210‘05%:
0605

002176

060554

002152

060574

002176

060614
060622

002020
002020

.MORD

ERRPC,DUMMY,ADDRESS,DUMMY,TSTDAT,TSTDAT+2,CHECK,CSR,0

ERRPC,GOOD,BAD,0

002150
002176

DT24:

.WORD

ERRPC,DUMMY,CSR,DUMMY,DUMMY,DUMMY
,DUMMY,O

002044

002150

DT25:

.WORD

ERRPC,GOOD,CSR,CSRNO,O

002052
002176

000000
002034

DT26:
DT27:

.WORD
.WORD

ERRPC,BAD,O
ERRPC,DUMMY,ADDRESS ,DUMMY,DUMMY ,DUMMY ,DUMMY,0

002176

DT30:

.WORD

ERRPC,DUMMY,DUMMY,GOOD,BAD,CSR,DUMMY,0

002176
002176
000000

002176
002052
000000

.WORD

DETRO,DETR1,DETR2,DETR3,DETR4,DETRS,DETSP,DETPSK,0

002176
000000

002044
002176

002020

.WORD

ERRPC,PADDRESS,PARCNT,0

002176
002176

0v0000

060560
060566

002020

002176
002176

14831

002176

060542

14828 060546
14
14830

002020
002020

.WORD

002176

02176
002150

SEQ 0392

;

1
\
‘

14844

14845
14846

14847
14848

22
(=]

§3 § §28 §38 388 gaasss
o0 o

§8 38 93888 8

1484
1484

—o

14841

MACRO Y05.02

14840

DIAG.

§8238828228838838888288

14839

14838

14837

14834
14835 060626
7
14836

)

$888 §32838883828888888228R228R38838 §ggggasss

CVMJABO MSV11-J ME
ERROR DATA FORMATS

010
003

Monday 07-Oct-85 16:57

Page 455

.SBTTL
.BYTE
.BYTE

SRROQ DATA FORMATS (DF)

DF3:

.BYTE

0,5,0.,8.,0,0,0,3,6,2.4

DF4:

.BYTE

0,5,0,8.,0,8.,8.,3,6,2.4

DFS:

.BYTE

0,5,0,8.,9.,9.,9..3,6,2,4

DF6:

.BYTE

0,5,0,8.,9..,8.,8.,3,6,2.4

DF7:

.BYTE

0,5,8.,0,0,9.,0,0,9..2.4

DF8:
DF9:

.BYTE
.BYTE

0,1.1.1.1

DF11:

.BYTE

0.5,0,8.,0,0,0,0,0

DF13:

.BYTE

0,5,0,0,3.6.2.4

DF14:

.BYTE

0,5,0.3.6.2.4

DF15:

.BYTE

0,5,0.,8.,3.6.4

DF16:

.BYTE

o.s..' .o'o.sl‘

SEQ 0393

0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0

0.5

——c—

CVMJABO MSV1l- J 'EMY DIAG.

(
ERROR MESSAGES

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 457

EM2:

.SBTTL
.ASCIZ

ERROR _MESSAGES (EM)
/CAN'T SET 22 BIT MODE IN MMR3/

14858 061055

EM3:

.ASCIZ

/PARITY ERROR(S) IN BANK 0/

14859 061107

EMA:

.ASCIZ

/NON-EXISTANT MEMORY (HOLES) IN BANK 0/

14860 061155

EM5:

.ASCIZ

/ILLEGAL OR RESERVED INSTRUCTION (TRAP TO 10)/

14861 061232

EM6:

.ASCIZ

/UNEXPECTED TRAP TO &4/

EM7:

.ASCIZ

/MEMORY MANAGEMENT (TRAP TO 250)/

14851
14857 061017
06102
061

0610
061033
061036

061041
061044
061047

061052

061060
061063
061066

101
124
105

116
040
124
062
111

SEQ 0394

115
105
116
115

BR——

CVMJABO MSV11-J MEMORY DIAG.

ERROR MESSAGES (EM)

061273
061276
061301

116
105
l;G

101
124

115
10
11
124
124
120
117

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 457-1

101
107
105

14863 061317

EM11:

.ASCIZ

/MEMORY DATA ERROR/

14864 061341

EM12:

.ASCIZ

/DETAILED ERROR DUMP/

14865 061365

EM13:

.ASCIZ

/MISSING EXPECTED SBE FLAG/

14866 061417

EM14:

.ASCIZ

/WRITE BYTE FAILED TO CLEAR SBE FLAG/

14867 061463

EM1S:

.ASCIZ

/FAILED TO GET INTERRUPT WiITH DBE FLAG/

061527
14868 061531

EM17:

.ASCIZ

/7MEMORY DATA ERROR IN CHECK BITS/

SEQ 0395

;

ABO MSV1l-J MEMORY DIAG.
MESSAGES (EM)

061534

117

122

117

122

061537
061
061545

040
124
105

061353
061556
061561
061564

111
103
103
102

061

104
101
122

123
123
055
105

111
000
102
104
040

061
061610
061613
061616

105
120
111
040

104
101
124
124

061627

116

061640

105

1646

055

061621
061624
0616
06163

14670 061643

061651
061654
061657
061
06166

061670
061673
061676
061701
1704
061707
06171
06171
1720
14871 061722

1725
1730
061733
061736
061741
061744
061747
1752

101

101
127

116
102

123

105
111
116
040
125

111

103
104

.ASCIZ

/SBE-DBE CAUSED PARITY TRAP WHEN INHIBITED/

EM20:

.ASCIZ

/SBE-DBE DID NOT CAUSE PARITY TRAP WHEN ENABLED/

EM21:

.ASCIZ

/SBE-DBE ON MASTER TEST WORD/

EM22:

.ASCIZ

/MISSING EXPECTED DBE/

040
104
117
103
123

115

123
107
130

06177
06177

110
111
104
102
104

105
040
122

061761
061764
061767

EM19:

040

124
124
117

000

131
101

120
110

120
111
040
101
127
116
116
114
000
102

061755

14872 061756

Page 457-2

125

040
122
131
122
040
105
105
102
104
123

055
105
116
101
105

Monday 07-Oct-85 16:57

116
110
113

061567
14869 061571
061574
061577
061

MACRO Y05.02

104
040
040
123
122

111
040
120

124
040

SEQ 0396

CVMJABO MSV11-J MEMORY DIAG.

ERROR MES

S (EM)

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 457-3

EM23:

.ASCIZ

/UNEXPECTED PARITY TRAP/

14874

EM24:

.ASCIZ

/RECEIVED DBE FLAG WHEN EXPECTING ONLY SBE FLAG/

14875

EM2S:

.ASCIZ

/CHECK BIT DATA ERROR/

14876

.ASCIZ

/ADDRESS PARITY ERROR DID NOT CAUSE ABORT/

14877

.ASCIZ

/ECC INHIBIT MODE POINTER FAILURE - DID NOT PROTECT BANK/

NSy

14873 062003

SEQ 0397

—

C VMJABO MSV1l-J gr)!m DIAG.
ERROR MESSAGES (
111

116
040

Monday 07-0Oct-85 16:57

Page 457-4

SEQ 0398

104

117
120
124
124
101
000
105

EM29:

.ASCIZ

/CORRECTION FAILURE WITH ECC ENABLED ON FORCED SBE/

EM30:

.ASCII

/MRITE BYTE WITH ECC ENABLED FAILED TO CLEAR DATA AT/<CRLF>

.ASCIZ

/FORCED SBE LOCATION/

.ASCIZ

/MOVB #360,(R2)+ WITH ECC ENABLED CHANGED DATA AT FORCED DBE LOCATION/

“

14878

MACRO Y05.02

14879 062361

s S8
062477
062502

062516

062461

EM32:

062450
062453
062456

062433
062436
062441
062444
14880 062445

CVMJABO

V1il-J MEMORY DIAG.

ENROR RESSAGES (EM)
062521
062524
i4

%’3
540
3

1
7

14882 062576

040
101

105
102

103

110

105

MACRO Y05.02

116
114

104

040

116
104

107
040

105
104

040
122

106
103

117
105

101
040

124
101

104
102

040
105

115

117

125
130
103
104

Monday 07-0Oct-85 16:57

457-5

SEQ 0399

101

101
124

104

000

126

EM33:

.ASCIZ

116
120
124

105
105
105
103

EM3S:

.ASCIZ

/UNEXPECTED CORRECTION WITH ECC DISABLE ON FORCED SBE/

124

127
116

111
040

040

104

111

062

114

105

040

703

14883 062704
062707
0627
06271

062737
06274
062

105
123

117

103

101

116

103

102

040

CVMJABO MSV1l-J MEMORY DIAG.
ERROR MESSAGES (EM)

MACRO Y05.02
124
111
049

Monday 07-Oct-85 16:57

Page 457-6

EM36:

.ASCIZ

/APT SIZE DISAGREES WITH PROGRAM SIZING/

EM40:

.ASCIZ

/BRANCH GOBBLE FAILED CONDITION CODES TEST/

.ASCIZ

/BAD ERROR ADDRESS GENERATED/

EMS51:

.ASCIZ

/FLAGS NOT SET ON FORCED UNCORRECTED SBE/

EMS2:

.ASCIZ

/BIT SET ERROR IN CSR/

123
122
123
111

14885

14886

&
2

14888

& NaRaunS

14887

SEQ 0400

' CVMJABO MSV11-J MEMORY DIAG.

| ERROR MESSAGES (EM)

Page 457-7

.ASCIZ

/BIT CLEAR ERROR IN CSR/

.ASCIZ

/ILLECAL CSR TYPE/

.ASCIZ

/BAD PARITY TRAP GENERATED/

.ASCIZ

/WRONG CHECK BIT READ BACK FROM MEMORY/

000
124
114
122
122
122
116

Mondey 07-Oct-85 16:57

123
102

MACRO Y05.02

.ASCIZ

/WRONG SYNDROME BITS READ INTO CSR/

148%

.ASCI1Z

/CSR UPDATE ERROR/

.ASCIZ

/PROCESSOR NOT SUPPORTED BY THIS DIAGNOSTIC/

14889

105

123
114

gfl

14895

101
103
040
120

EMS7:

14891

(7
T

14890

SEQ 0401

MSV11-J MEWORY DIAG.

ERROR RESSAGES (ER)

123

040

117

116

122

117

123

124

040

105
102

104
151

040
040

040

104

5‘

111
116

110

10
11

[
1Y
-

MACRO Y05.02

B
111

107
123

103

Mondey 07-Oct-85 16:57

Page

457-8

SEQ 0402 |

CVMJABO MSV11-J MEMORY DIAG
ERROR DATA HEADERS (DM)
14899 063551
06 3554
063557

[

ekt 2NsER8RRELEREINEECEEE RNREREREE BRRRRRERE 832382

14898

MACRO Y05.02

14900 06

14901

14902

14903

120

040

Mondey 07-Oct-85 16:57

Page 459

SEQ 0403

.SBTTL

ERROR DATA HEADERS (DH)

DEV ADD

DH2:

.ASCIZ

GD-CC BD-CC/

DH3:

.ASCIZ

1ST ADD

DH5:

.ASCIZ

MMRO

MMR1

MMR2

MMR3

DH6:

.ASCIZ

APTPAR

LSIZE

APTECC

MSIZE/

DH1:

.ASCIZ

GOOD

BAD/

105

101
040

107
104
040
101

120
040
104

103
104
103

120

040

& OF ERRORS/

123

CPUERR/

Em.fiv&i&m)oxm.

14904 064011

osagss

064036

064041
064044
064047
064052
14905 064055
064060
064063
064066
064071
064074
064077
064102
064105
064110
064113
064116

14906 064121

DH10:

.ASCIZ

‘lfig

DH11:

.ASCIZ

CSR/

103

123

DHi12:

.ASCIZ

/ CSR/

040

120

DH13:

.ASCII

040
101
040

040
104
040

040
117

040
240
101
040
040
122
103
040
124
040
124
101

040

(1)40

104

040

040
117

040
040
104
040
130

040
123
040
131
111
040
124

040

120
120

104
040
107
104
040
102
040
040
117
122
115
120
116
120
000

122

040
040
122
040
040
062
040
G40
040
040

040
040
061
040
040
040
040
122
040
040

06416
064170
064173
064176
064201
064
064207
064212
064215
14907 064217

040
040
122
040
040
120
040
040
127
040

040
040
065
040
040
040
040
120
000
040

040
040
040
040
123
040
040
123

14908 064235

040

14909 064242

040

06416

040

122

000

G00D/

060
040
040
040
040
122
040
040
063
040

064124
064127
064132
064135
064140
064143
064146
064151
064154
064157

DH7:

PADD

VADD

101

BANK

.ASCIZ

0649

120

040

380 0006

Page 459-1

040

323

Monday 07-Oct-85 16:57

.ASCII

040

064019’

MACRO Y05.02

XOR

BAD

CSR

MTYP INT PAT/

PADD

WROTE1

WROTE2/

064

BANK

VADD

PSW/

CVMJABO MSV11-J MEMORY DIAG.

ERROR DATA HEADERS (DH)
064261
064264
064267
064272

064275

MACRO Y05.02

SEQ 0405

101

101
040

.ASCIZ

/ CHKBITS

CSR/

14911

DH14:

.ASCIZ

/CONTRL

MMRO

MMR1

MMR2

MMR3

CPUERR/

14912

DH1S:

.ASCII

BANK

PADD

GD-WD1

GD-WD2

GD-CHK/

.ASCIZ

/ BAD-WD1 BAD-WD2

14913

Page 459-2

040
040

14910

[

Monday 07-0Oct-85 16:57

BAD-CHK INT PAT/

CVMJABO MSV11-J MEMORY DIAG.
ERROR DATA HEADERS (DH)
120
000

MACRO Y05.02

Mondey 07-Oct-85 16:57

Page 459-3

SEQ 0406

124

BANK/

120
040
102

DH16:

.ASCIZ

120

DH19:

.ASCIZ

PC/

120

DH20:

.ASCIZ

BANK GD-CSR

CSR

MTYP INT

PAT/

14917

DH23:

.ASCIZ

BANK GD-ERR BAD-ERR CSR

MTYP INT

PAT/

14918

DH24:

.ASCIZ

BANK

14919

DH25:

.ASCIZ

GD-DAT

14914

103

113

14915
14916

040
102

(CSR)

113
104
123

040

123

040

123

(CSR) CSR

(CSR)

MTYP INT

PAT/

CSRNO/

e o)

CVMJABO MSV1i1-J MEMORY DIAG.

ERROR DATA

MEADERS (DH)
104
101
040
123
040
103
116
040

055
124
050
122
040
123

117

040
040
101

117

14921

000
040
040
040
116
040
104
040

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 459-4

SEQ 0407

104
040

103
051

040

122
000
120
040
104
104

DH26
:

.ASCIZ

BADCODE/

DH27:

.ASCIZ

BANK

DH30:

.ASCIZ

BANK

VADD

PADD

CSR

MTYP PAT/

104

14922

PADD

WROTE

READ

CSR

PAT/

MSV11-J
CVMUABO
SeodAces
14925
14926 065173

065176
065201
065204
065207
06352
06521
065220
065223
3226
065231
065234
065237
06
065245
065250
065253

14927 065255

065260
065263
065266
065271
065274
065277
ossggg

MEMORY DIAG.
200

040
c40
040
040
040
040
040
040
115
131
117
111
122
111
040
120

200

040
040
040
040
040
040
040

065
065310
065313
065316
1

040
040
061
040
122

0‘533;

113

14928 0653

065335
065340
065343
065346
065351
065354
065357
065362
065365
065370

102

200

040
040
040
040
040
040
040
040
040
040

5373

063

5377

040

14929 065374

040

MACRO Y0S5.02

Monday

» 07-Oct-85 16:57 Page-

461

SEQ 0408

040

MSGOO1:

.SBTTL
.ASCIZ

MESSAGES
<CRLF>/

MEMORY CONFIGURATION MAP/

040

MSGO0O2:

.ASCIZ

<CRLF>/

16K WORD BANKS/

040
040
066
127
104

040
040
113
117
040

040

040
040
040
040
040
040
040
115
117
040
116
107
101
117
115
000

040
040
040
040
040
040
040
105
122
103
106
125
124
116
101

040
040
040
040
040
040
040

101

123

040

116

000

040

040
040
040
040
040
040
040
062
040
040

040
040
040
040
061
040

040

MSGO03: .ASCII <CRLF>/

040

040
040
040
040

040
040
040
040
040
066
040
040
040

.ASCIZ

sflSVll -J MEMORY DIAG.

14930 065437
065442

0654
14931 065500
065

ERRERSSUNIS2RRRRRARRRRRARARRRRALY

CVMJ
MES

MACRO Y05.02

Monday 07-0Oct-85 16:57

MSGO04:

.ASCII <CRLF>/

Page 461-1

SEQ 0409

012345670123456701234567/

.ASCIZ

/7012345670123456701234567012345670123/

MSGOO05:

.ASCIZ

<CRLF>/ERRORS

MSGO06:

.ASCIZ

<CRLF>/UNDEFINED TRAP INSTRUCTION/<32>

.ASCIZ

<CRLF>/MEMTYPE /

sMEMORY

MSGO010:

.ASCIZ

<CRLF>/PROTECT

:MEMORY PROTECTED

MSG11A:

.ASCIZ

TYPE

R R RRRRRRRRR22R2222222222222RR2E3E

323288R202328802223322
882 R2R2R2E222222RRRLE
g8k

120

LR EEE LRI LA 3333333103333
33 3 003333 1

14940 066113
14941 066115

33 31

10
14939 066111

ER S8R

14937 0657
065

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 461-2

SEQ 0410

MSGO11:

.ASCIZ

MSGO12:

.ASCIZ

/456701234567012345670123456701234567012345670123456701234567/

MSG118:
MSG11C:
MSG110:

MSGO13:

MSGO14:

337

CVMJABO MSV11-J MEMORY DIAG.

MESSAGES

MSGO15:
MSGO16:

1/
/1/
701234567/
/R/

/ 7/
0,0

<CRLF>/CSR

s SPACE

sron SINGLE ASCII CHMACTERS € TERMINATOR

CVMJABO MSV11-J MEMORY DIAG.
066145
14946 066146
066151
066154
14947 066157

SR8R223a03a%A3 13333

MESSAGES

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 461-3

SEQ 0411
:8 SPACES

MSGO17:

.ASCIZ

MSGO18:
MSGO19:

.ASCIZ
.ASCIZ

" AR
/

MSGO20:

.ASCIZ

<CRLF:>/FS COMMAND MODE/

MSGO21:

.ASCII

<CRLF>/COMMANDS AVAILABLE:/

.ASCII

<CRLF>/0 = EXIT/

.ASCII

<CRLF>/1

READ CSR/

.ASCII

<CRLF>/2

LOAD CSR/

.ASCII

<CRLF>/3

EXAMINE MEMORY/

320
14955 066321
324

.ASCII

<CRLF>/4

MODIFY MEMORY/

14956 066343

.ASCII

<CRLF>/5 = SELECT BANK & TEST/

14957 0“37§

.ASCII

<CRLF>/6 = TYPE CONFIG MAP/

14948 oux:g
14949 066166
71

14954

0ges01

12 SPACES
+3 SPACES

304

06637

——

RESIAGES

MSV11-J MEMORY DIAG.

i
s

3
1

14958 066416

14959 m

HERH - :

14960

066450
066453
066456
066461

066467
06647

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 461-4

117
111

115

040
123
055

.ASCII

<CRLF>/7 = SOB-A-LONG TEST/

.ASCII

<CRLF>/8 = ERROR SUMMARY/

.ASCII

<CRLF>/9=

.ASCII

<CRLF>/10= SET FILL COUNT/

.ASCII

<CRLF>/11= ENTER KAMIKAZE MODE/

.ASCII

<CRLF>/12= EXIT KAMIKAZE MODE/

.ASCII

<CRLF>/713= TURN CACHE OFF/

.ASCII

<CRLF>/14= TURN CACHE ON/

REFRESH TEST/

0664

066510
3
066516
066521

14961

14962

14963

14964

14965

SEQ 0412

CVMJABO MSV11-J MEMORY DIAG.

MESSAGES

MACRO Y0S5.02

Monday 07-Oct-85 16:57

Peage 461-5

110
14966

.ASCII

<CRLF>/15= TEST SELECTED BANKS/

14967 066704

.ASCII

<CRLF>/16= TEST ALL BANKS/

.ASCII

<CRLF>/17= ENABLE TRACE/

.ASCII

<CRLF>/18= DISABLE TRACE/

.BYTE
.ASCIZ

15,12.0

.ASCIZ

<CRLF>/CSR WORD? /

.ASCIZ

<CRLF>/CSR DOES NOT EXIST/

.ASCIZ

:/
<CRLF>/COMMAND

MSGO27:

.ASCI1Z

<CRLF>/0LD CSR WAS/

MSGO28 :

.ASCIZ

<CRLF>/CSR IS NOW/

14970 “‘7;;
14971 0667
067000

MSGO22:

067003
067006
067011
014
14972 06;0 7

MSGO025:

14974 067057
067

0670
14975 067071
067074
067077
0671
0671
14976 067106

117

040

<CRLF>/WHICH CSR(0-F)? /

101

103

SEQ 0413

CVMJABO MSV11i-J MEMORY DIAG.

14979

067161
067164

Monday 07-0Oct-85 16:57

Page 461-6

111

%16

130
111
040

MSGO29:

.ASCIZ

<CRLF>/EXAMINE MEMORY/

MSGO30

.ASCIZ

<CRLF>/BANK(0-177)? /

MSGO31:

.ASCIZ

<CRLF>/PHYSICAL ADDRESS(0-17757776)7 /

.ASCIZ

<CRLF>/PARITY ABORT/<32>

.ASCIZ

<CRLF>/TIMEOQUT TRAP/<32>

.ASCIZ

<CRLF>/BYPASSING ECC TESTS ON BANK /

MSGB34:

.ASCIZ

/ DUE TO SPE LOCATIONS/

a‘l

067
067

= oo

14978 06714
“7103

o
o s

3] SBERERRSon
SuBSERNEERR:
~NUO
- =
SRERERRIN
RS INGLTS uwnogn
~

MESSAGES

MACRO Y05.02

MSGO3S:
MSGO36:

/Qv/

<CRLF>/MODIFY MEMORY/

SEQ 0414

CVMJABO MSV11-J MEMORY DIAG.

MESSAGES

067357

105

14986 06736
067370
067373
067376
067401
14987 067404

200
104
101

06 7

122

115
131
117

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 461-7

117

000
114

MSGO37:

.ASCIZ

<CRLF>/0LD DATA WAS /

MSGO38:

.ASCIZ

<CRLF>/DATA IS NOW /

MSGO039:

.ASCIZ

<CRLF>/INPUT NEW DATA? /

MSGO040:

.ASCIZ

<CRLF>/SELECT BANK & TEST/

ASCIZ

<CRLF>/BANK NOT ACCESSABLE/

14991 06751
06

MSGO42:

.ASCIZ

<CRLF>/TEST(0-47)?

14992 067533

MSGO43:

.ASCIZ

<CRLF>/TEST O DATA IS? /

14993 067555

MSG046:

.ASCIZ

<CRLF>/T0O ESCAPE TYPE ANY KEY/<CRLF><12>¢<12>

14994 067610

MSGO47:

.ASCIZ

<CRLF>/TEST COMPLETE/

14988 067422

040

124
127

040

104
101
123
117
000
111

125
116

104
101
101

040

14989 067444

06
14990 067470

124
040
123
105
040
116
046
105
000

SEQ 0415

CVHJllOsHSVII-J MEMORY DIAG.

MACRO Y05.02

Monday 07-0Oct-85 16:57

Page 461-8

MESSAGE

14995 067627
0676

06763

040

124
126

117
101

MSGO48:

.ASCIZ

/ NOT AVAILABLE NOW - TRY LATER!/

.ASCIZ

<CRLF>/BANK REQUIRES RELOCATION/

111
102
040

127

040

131
101

122

14996

101

040
121
122
040

14997
14998

MSGOS51:

.EVEN
.ASCIZ

/POMER RECOVERY/

14999

MSGOS5:

.ASCIZ

<CRLF>/S0B-A-LONG TEST/

MSGOS56:

.ASCIZ

<CRLF>/BELL = EACH PASS COMPLETE/

MSGOS58:

.ASCIZ

<CRLF>/

15002

MSGO61:

.ASCIZ

2%/

15003

MSGO62:

.ASCIZ

/INPUT MUST BE A/

MSGO63:

.ASCIZ

/N OCTAL /

15001

15004

117

CSR

.../

SEQ 0416

CVMJABO MSV11-. MEMORY DIAG.
MESSAGES
070071
070074
15005 070077

103
114
116
102
200
040
103

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 461-9

101

000

MSGO64:

.ASCIZ

/NUMBER/ <CRLF >

MSGO6S
:

.ASCIZ

/ DECIMAL

15007

MSGO66
:

.ASCIZ

<CRLF>/ERRORS > 20 - ABORTING FOR XXDP CHAIN/

15008 070170
070173
070176
15009 070177
070202
070205
070210
070213
070216
070221
070224

MSGO67:

.ASCIZ

/FATAL 7/

MSGO70:

.ASCIZ

/K WORDS OF MEMORY TOTAL/<CRLF>

15010

MSGO73:

.ASCIZ

<CRLF>/REFRESH TEST/

15011

MSGO75:

.ASCIZ

<CRLF>/RELOCATION NOT POSSIBLE/<32>

15012

MSGO76:

.ASCIZ

<CRLF>/

15013

MSGO77:

.ASCIZ

<CRLF>/END PASS @&/

15006

115
122

BANK

ERRORS/<CRLF>

SEQ 0417

CVHJllosHSV1l-J MEMORY DIAG.

MESSAGE

070332

043
105

MACRO Y05.02

000
122
122
051

Monday 07-0Oct-85 16:57

Page 461-10

MSGO79:

.ASCIZ

/ ERROR(S) DETECTED/<CRLF>

MSGO8S:

.ASCIZ

<CRLF>/FILL COUNT(OCTAL)? /

.ASCIZ

<CRLF>/KERNEL STACK/

15017

MSG089:

.ASCIZ

<CRLF>/SUPERVISOR STACK/

15018

MSG090:

.ASCIZ

<CRLF>/USER STACK/

15019

MSGO9S1:

.ASCIZ

/ IS EMPTY/

15020

MSGO092:

.ASCIZ

/RELOCATED

15021

MSG093:

.ASCIZ

/BANK=/

15022

MSGO095:

.ASCIZ

15023

MSG101:

.ASCIZ

<CRLF>/ENTERING KAMIKAZE MODE/

15024

MSG102:

.ASCIZ

<CRLF>/LEAVING KAMIXAZE MODE/

15014

15015

15016

117
123

104
105
105
000
106
114
117
124
103
114
040
113
116

105
103
104

111
040

125

124
051
000

TEST=/

SEQ 0418

CVMJABO MSV11-J MEMORY DIAG.
MESSAGES
070600
070603

15025 070605

105

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 461-11

SEQ 0419

117

000

114
126
107
123
117

MSG103:

.ASCIZ

<CRLF>/LEAVING FS MODE/<CRLF>

MSG104:
MSG105:

.BYTE
.ASCIZ

32,0

15028 070704

MSG106:

.ASCIZ

<CRLF>/CACHE IS OFF/

15029 070722
0707

MS5G107:

.ASCIZ

<CRLF>/CACHE IS ON (EXCEPT DURING ACTUAL PATTERNS)/

15030 070777

MSG110:

.ASCIZ

<CRLF>/0ONLY SELECTED BANKS WILL BE

071040
15031 071043

MSG111:

.ASCIZ

<CRLF>/ALL BANKS WILL BE TESTED/

070610

<CRLF>/ENTER BANKS

; CONTROL Z

USE NUMBER 200 TO TERMINATE/

TESTED/

CVMJABO SHSVII-J MEMORY DIAG.
MESSAGE
071046
071051
071

071057
071

15032

040
116
040

114
102
124
124
000
040
040
102

MACRO Y05.02

Monday 07-0Oct-85 16:57

Page 461-12

102
113
127
114
105
105
105
MSG112:

.ASCIZ

/K OF Q-BUS PARITY MEMORY/<CRLF>

15033

MSG113:

.ASCIZ

/K OF ECC MEMORY/<CRLF>

15034

M1184:

.ASCIZ

<CRLF>"

11/84"

15035

MSG117:

.ASCIZ

<CRLF>"

11/83"

15036

MSG119:

.ASCIZ

<CRLF>/

NO/

15037

MSG120:

.ASCIZ

/ CACHE AVAILABLE/

15038

MSG121:

.ASCIZ

/ CACHE BYPASSED/

15039

MSG122:

.ASCII

<CRLF>/CSR NUMBER /

15040
15041

MSGA122:. BYTE
ASCIZ

)

7/ CONTROLS TOO MANY BANKS/

SEQ 0420

CVMJABO MSV11-J MEMORY DIAG.

MESSAGES

102

113

103
120
124
000
122
122
040
122
117
104

SEQ 0421

MSG125:

.ASCIZ

/ PASSES COMPLETED/

MSG126:

.ASCIZ

<CRLF>/PROGRAM CSR COULD NOT BE DETERMINED/

MSG127:

.ASCIZ

<CRLF>/TRACE ENABLED/

MSG128:

.ASCIZ

<CRLF>/TRACE DISABLED/

.ASCIZ

<CRLF><CRLF>/

.ASCIZ

<CRLF>* CVMJABO

.ASCIZ

b 33331

15044 071401

Page 461-13

123

105

15043 071334

Monday 07-0Oct-85 16:57

101

15042 0713

15046 071440

MACRO Y05.02

ECC/PARITY MEMORY DIAGNOSTIC*

15047 071472

CSR MAP/<CRLF>

15048 071542

MSG129:

—

CVMJABO MSV1l1-J MEMORY DIAG.

MESSAGES

MACRO Y05.02

Monday 07-Oct-85 16:57

Page 461-14

15049 071545
071550
o711
071
071561
071564
071567
Q71572

120
103
123
040
124
125
117
105

122
105
117
116
040
120
122
104

117
123
12
11
123
120
124
040

MSG130:

.ASCIZ

/PROCESSOR NOT SUPPORTED BY THIS DIAGNOSTIC/

15050 071620

200

125

NOUBMT:

.ASCIZ

<CRLF>/UNIBUS MEMGRY WILL NOT BE TESTED/<CRLF>

071626
071631
071634
071637

123
105
122
127

115
131
111

071645
071650
071653
071656
071661

117
102
124
124
200

124
105
105
105
000

071642

15051

15057 071664
15058 071664
15059 071664

15063

114

010414

000200

115
117
114

116

040
123

104

.EVEN

END:

$$END

<PRINT__60000-SUPLIMIT

.END STARTS

;SUPERVISOR ADDRESSES LEFT

SEQ 0422

CVMJABO MSV11-J MEMORY DIAG.
Symdol tat'e

ABORT

052

| ABORTC 032316
083389
ABORTE

002

ey
S
ACTFLA 002350

007480

AbTRCE oozg;”
o4
e

APTRRR

902423

8AD
BADPC

BRG088

BSIzE

MACRO Y05.02

027500

Monday 07-Oct-85 16:57

$004

§§g§12

c:Lu:n_. 300055
000588

He 0437s4
SHR

005744

Biol
8102

053572

8103

083576

8103 0336
811

036
036
o3¢
306

ga3a1e

044136

013210

045470

002052
002022

817
82

014060
o1s%es

015754
006136

BADXOR 002060
BAFPAR 002632
014336
BAKPAT

855

015772

104424
04423

031530
033

3003:

o21334

BADPSW 002032
8AD2

002054

BANKIN 003104
BANKMG o:ng:
BANKOK 040364
BAUPAR
BCTEST 014516
ooTare
BTG,
002324
8ITO = 000001
8ITI

= 000002

8IT10 = 002000

814
816

820
824

8%
830
833
834

026036
026064
026506
ose360
026700
027060

Beo

027102

835
83
837
84

BITL1 .
- 004000

B4z

BIT14 = 040000
00000

845
846

BIT13 - 030000
BIT3 - 000008

8113 - 900010
BIT4 - 000020
8ITS
= 000040
81T
- 999399
8IT8 = 000400
BLocK1 oseeTe
BLOCK2 040716
SWLAC 002135

. 1777

6.3;;:3

813

APTSIZ 002444
BACKGN 033516

Pege 461-15

027630
g21770

030930

85
850

o03111s

851

835
854
836
857
850

045474

éagfi
1044
3%

fo4si0
g.&
7
04308
dee
000073
042650
I

SRINC 0053
fl%
SRINT 002236

031630
034636
0
035508

035500
047246
ComT 002876
CPERRF 052364
cp
CPUBIT 052362
002106

064242

DHE

<7y

DH16
OH19
DHZ0
OH2

DH2s

064337

064535
064552
04SST

oea7is

Dnse oss0ss
OHs.

063631

DHS

063665

SRLOO 005832
gmm

DH6
::::E
DIAGFL 093¢

902322

DISPTE 013466

ur_

000020

TARG- 002242
e
8 i
DETATL. 093356
002236
002200
002202
003206
0022
12
SP 002214
i

DF11
o1y

060751

DF1S
DF16

061001
061010

DF14
46

031644

IR 002325

ga3ise

oossss
031132

031142

002150
. 172100
SRCAS 016672
0022

DHIZ

oFs
DFA
oFs

oF78
Dl
DHIO
DH11
DH1Z2

T
7

060666
gs0701

060
';‘g
060
oessst
064121
064217
064235

DISPLA 002640
ISPRE= 0001

Oom
- 177570
oT1
011
DTIS Oso3es
060370
o1

DT14

DTie
DT17
D12
DT20
Diss
D123
DT25
DT26
127
DTS
2

oTa.
DTS
D16

OT7

060412

ocoess
060460
060226
060466
oeoese
060508
060526
060546
060360

060566

060232

oeoces

060252
060270

060304
DR
Goo1ve
DUPCS- 000102
ECCDIS- 104470

ECCIDI{ou“%
ECCLIN- 1044
ENTVEL= 000030
EM11
061317
EM12
EM1S 061341
061365

SEQ 0423

CVHMJABO MSV11-J MEMORY DIAG.

| Symbol table
| EM14
EM1
EM17
EM19

Page 461-16

SEQ 0424

002432

gifi

" nmNNNNN"

w
4

Monday 07-Oct-85 16:57

061417

EXIT2

MACRO Y05.02

Symbol table

[ L150

| L151

L152
L1S3
L154
L15S
L156
L157

L16
L160
L161
Li162
L163
L164
L165S

L166

L167
L17
L170
Li71
Li72
L173
L174
L175
L176
L177
L2

L20
L200
L201
L203
L204
L205
L207
L2l
L210
L211
L212
L213
L21s
L216
L217
L221

L22
L
L226
L227
L230
L231
L232
L233
L234
L23s
L236

020256

L334

034426

026766
026752
026764
027010
026776
027010

027122
030022
006234
030026
030112
030130
030134

L336
L337
L34
L340
L341
L342

034664

L416

L240
L2411
L242
L243
L244
L245

006244

L343
L344
L34S
L346
L347
L3S
L350

034664
034726
006462
034734
035030
035030

L351

035072
035100
035222
036324
036340
006516
036352

036352

L425
L426
L4227
L43
L430
L431
L432

005676
021022
021642
021620
021642
021706
022030
022006

L246
L247
L25
L250
L2251
L252
L253

023312
120
006040
023432
023612
023620
023756
023764
024144
024152

024156
025572
025710
026160
026236
026260
026530
026540
026652

026614
026632
027022
026722

Page 461-17

026734

L24

006012
022214
022214
022322
022274
022352

Monday 07-Oct-85 1€:57

L2537

020266

020266
020360
020370
020370
020724
020756

MACRO Y05.02

L256

Las?7
L26
L261

L263
L264
L266
L267
La7
L271
L272
L273
L274
L3
L300
L301
L303
L304
L30S
L306
L307
L31
L310
L311
L315
L316
L317
L32
L320
L321
L322
L323
Ls24
L32S
L326
L327
L33
L330
L331
L332
L3333

03041C
030456
030464
030610
0
031020
031070

03
031316
031334
031362
gz.
031
031566
031704
031710
031762
031764
032022
006350
032042
032046
032140
032136
032160
006354
032160
032276
032344
032722
033322
033416
033406
033414
006420
033424
033450
033552
034420

L335

L352
L3S3
L354
L35S
L356
L357
L36
L360
L361
L362
L363

L364
L365
L366
L367
L37
L370
L371
L372
L373
L374
L37S
L376
L377
L4
L40
L&40O
L4011
L402
L403

L404
L4405
LA06
L407
L4l
L410
L4111
L4a12
L413
L4148
L4115

036454
036504
036626
036626
036626
036606
006522
036626
036670
036670
036720

040112
040302
040464
040532
006552
040536
040544
040560
040572
041004
041014
041150
041210
005160
006576
041214
041244
041256
042444

042504
042544
042752
042766
006650
043000
043330
043332
043444
043756
043742

SEQ 0425

043712

LS01

006640
044052
044164
044454
044456
044722

LS02

052164

L42
L420
L4221
L422
La23
L424

ouogo

045400

LS10
LS511
L3512
LS13
LS14
LS15
LS16

052126
052164
052174
052670
053616
006766

L433

044736
044742
044760
006642
045106
045110
045154

LS03
LS04
LS50S
LS06
LS07
LS1

054022
054026
054106
054112
055114
055120
055242

La17

LA34
L4335
L436
L437
L44
L440
L4441
L4442
L443
L4444
L4AS

L446
LaA7
L4S
L450
L4511
L452
L4533
L4S4
LASS
LAS6
LAS?
L460
L461
L462
L4663
L464
L465
L466
La67

L&70
L4a71
L&72
L473
L474
LA7S
L&76
L4777
LS
LS0
LS00

045506
045766
047304
047306

050136
050150
050166
050170
050210

050240
050242
006670
050460
050514
050544
050556
050570
050612
0
050740
050754
050756
051072
051162
051172

051514
051514
051754
051710
051734
051754
051774
052166
36
006724
052036

L517

LS2
LS20
LS3
LS4
LSS
LS6
LS?7
L6
L60
L61
L62

052114

055332

010724
055334
010730
010732
011462
011476
011600
005316
011604
011750
011750

L63
011750
L64
011750
L6S
011744
L66
012022
L67
012026
L7
005316
L70
012030
L71
012212
L72
012212
L73
012212
L74
012216
L7S
012434
L76
012434
L77
012424
MAINT = 177750
MAPHO = 170202
MAPKER 037646
MAPLO = 170200
MAPL1 = 170204
MASK
MBERR

035604

012670
013506
MFPT_ = 000007
MJPAT
017316
MJTEST 017212
MKCNT
016364
MK
015544
MKCSRT 016702
MKFLAG 002120

CVMJABO MSV11-J MEMORY DIAG.

e
RBRNE
39443

O~NUWN-=
O

GNP~

LE R R

MTPAO3
MTPAOA

067610
067627

B EEENN]

0157

Monday 07-Oct-85 16:57

-2

MACRO Y05.02

LI]

MSV11-J MEMORY DIAG.

ggLLLg ”"”””"”ggggggigggssig

“gngly

B s (o0 (ot i Bt
o2 pob 1o s o8

e3222222220028
3

e s et s g
sassasessiFuspaahay

| ML
MKPA
MKTEST
MMRO
MR1

22888 REE8 & 82 288
~~4 ~4
~N~
=flfldfl
oB
3
e A RN 80‘ ~N i~

| gy‘o! table

Page 461-18

SEQ 0426

0225

020714
020746
021012
021220
021476
022066
022342

Spans. 17537

SUPSTK= 000740
SVKPAR 036306
SHAPAT
002634
002636
000176
055124
002566
000001
000002
002000
004000
010000
020000
040000
100000
000004
000010
000020
000040
000100
000200
000400
001000
104514
004066

Page 461-19

TSTRO1
0344
TSTREA=
IST1

SEQ 0427

iAR

o
-

€
R

e
hik

Monday 07-Oct-85 16:57

MACRO Y05.02

MSVY11-J MEMORY DIAG.
able

€S Oleses

—

SCOPE = 000004

ng,O HSVll J MEMORY DIAG.
table

SERROR
SERRTE
SERRTY

MACRO Y05.02

051410
057344
052366

LS
= 000000
$MADR1 056750
$MADR2 056754

oozsg
0567

$MADR4
SMAIL

SES
=
SFATAL
! SFILLC
| SFILLS
Fe
=
SGTSWR

000001
0567
0026
002357
000000
054754

$MAMS3
$MAMS4
$MBADR
$MNEW
$MSGAD
$MSGLG

056732
056734

SHALT2
SHIBTS
SHIOCT
SILLUP
$INVAL
S$ITEMB
$I¢
SKERNE
SKMAP

057074
057020
056216
046206
035250
002015
1
034070
036202

$MSWR
SMTYP1
$MTYP2
SMTYP3
$MTYP4
$NOTRA
$NULL
$NWTST=
$OCNT

056025
056747
056753
056757
056763
057070
002356
00000
054350

‘ 0?13

002639

SETEND
SEXMAL

3’.3332

'
| SETABL

SHALT

0320%0

114}

= 000102

SLF

002661

ABS.

071664

Errors detected:

$MAMS1
$MAMS2

056746
056752

$OCTVL

056764
056716

056756
056762
057022

$PATMA
$PERO1
$PERO2
$PERO3
$PERO4
$PERO7
$PER10O
$PER11

$PER12
$PER13
$PER14
$PER15
$PER16

002012
047364
047412
047440
047470
047552
047574
047624
047644

Page 461-20
$PWRDN
$PWRUP
$QUES
=
$R
$RAND
$RDCHR
$PDDEC
$ROLIN

056716

056700

$0CT8 = 056704

$OMODE

000105
034162
002622
002624

000000

056760

$MSGTY

= 000107

sLL
=
SLOADC
SLPADR
SLPERR

$MADR3

Monday 07-Oct-85 16:57

$OVER
$0¢
=
$PASS
$PASTM

000

001
O

054352

051324
000000
056724
057026

(RW,I,GBL,ABS.OVR)

(RW,I,LCL,REL,CON)

as¢ Agsembler statistics

nod.: 1377
file
Work
file writes: 1005
Work
Size of work file: 27640 Words
( 108 Pages)
Size of core pool: 17990 Words
( 69 Pages)
Operating system: RSX-11M/PLUS

Eleapsed time: 00:12:53. 0s

CVMJAB.BIC,CVMJAB.LST/-SP/NL: TOC=CVMJAB/ML,CVMJUAB. MAC

$TRAP2

045260
045634
002657

177777
056502
055334
056220
055464
056050
034256
056444
056406
046212
051054
000001

SEQ 0428

057076
057024
034276
055762
054354