Digital PDFs

MAINDEC-15-D0EA-D

January 1970

18 pages

Original

0.4MB

Document:	JMP-Y Interrupt Test
Order Number:	MAINDEC-15-D0EA-D
Revision:
Pages:	18
Original Filename:	http://bitsavers.org/pdf/dec/pdp15/diag/MAINDEC-15-D0EA-D_JMP-Y_Interrupt_Test_Jan70.pdf

OCR Text

?]}P - ~sC P (/

IDENTIFICATION
Product Code: I

MAINDEC-15-DOEA-D (D)

Product Name:

JMP Y - Interrupt Test

Date:

! J~nuary 5, 1970

Maintainer:

Diagnostic Group

Author:

Edward P. Steinberger

-'"1 (

ABSTRACT
The JMP Y - Interrupt Te.t determine. if the PDP-15 will complete a JMP Y
(where Y is some random value) instruction before it goes into program interrupt.
This is done by setting a I/O flag and then transferring control to an ION/JMP Y
instruction group (located at a random place in memory). The computer
should complete the JMP Y instruction before the comptJter goes into
program interrupt. If no error occurs, the 10 N/JMP Y instruction group
is moved to other random memory locations and the test is repeated'.'
Errors are indicated to the operator via the Teletype or error halts.

REQUIREMENTS

2. 1

Equipment
Standard ,PDP-15 computer.

2.2

Storage
The program uses a II of 4K memory for the program or as a test area. The
program occupies m,mory from location 07400 to 07746 and tests ,all
locations below 07400.

2.3

Preliminary Programs
Basic Instruction Teats

LOADING PROCEDURE
a.

Put HRI tape of program in reader (high speed if available).

Set ADDRESS SWITCHES to 07400; the BANK MODE switch on a 1.

Depress and release READ-IN key.

STARTING PROCEDURE

4. 1

Control Switch Settings
The following is a table of accumulator switch settings and their action
on the program:
ACSwitch

Set As

1
0
1
0

Action
Ha It on error
Don't halt on error
Don't print errors
Print errors

AC Switch

Set As

2
3

o
1

o
4

Action
Ring bell on error
Ring bell after N passes
Loop on current Y
Don't loop on current Y
Loop on current location
Don't loop on current location

N is an arbitrary number (initially 100 ) which is controlled by the LAW-N
instruction in location 07400 and may ~e changed at the operator's discretion •.
4.2

Starting Address
The starting address of the program is 07400.

4.3

Program and/or Operator Action
a.

ADDRESS SWITCHES to 07400.

Set ACCUMULATOR SWITCHES to desired positions (see 4.1).
Normal setting is 500000:

Depress I/O RESET

Depress START

OPERATING PROCEDURE

5. 1

Operational Switch Settings (see 4.1)

5.2

Subroutine Abstracts
None

5.3

Program and/or Opertor Action
To put the program in the scope mode, the ACCUMULATOR SWITCH
REGISTER should be set to 260000(don't holt, don't print, bell after N
passes, loop on current Y, loop on current locations).

ERRORS
Unless AC switch 1 is a 1, errors will be printed on the teletype.

6. 1

Error Halts and Description
There is one error halt inside the program at location 07546. Any program
diagnosed errors will cause a halt at this location if AC switch 0 is a 1.
The program stores HALT in a II locations of the test area memory. If the
computer does not go into program interrupt immediately after executing
the JMP Y, the computer will halt at location Y.

6.2

Error Recovery

6 .2. 1

Program Diagnosed Error
If AC switch 0 is a 1, the computer will halt on a program diagnosed
error. To recover from this type of error I reset AC switches 0 to 4
as necessary (see Section 4. 1) and then depress CONTINUE.

6.2.2

Interrupt Failures
Interrupt failures will cause a halt at location Y. To recover, reset
AC switches 0 to 4 as necessary (see Section 4. 1) and then start the
computer at location 07400 (BEGIN) after depressing I/o RESET.

6.2.3

Test for ION, JMP Y, and Y
To test particular memory locations for the ION, JMP Yand/or Y ,
store the address of the ION in location 077~3 (POINT1), that address + 1
in location 07734 (POINT2), the address Y in location 07735 (POINT3).
Then set AC switches 3 and 4 to 1, depress I/O RESET, and start the
computer at location 07400 (BEGIN). All addresses must be less than
07400 and not 0000 1 •

6.3

Error Switch Hierarchy

6.4

Error Typeout Example
ION -JMP V
II V"
JMP AT
001234
007654

C(O)
001235

The above example shows that a JMP 7654 instruction was stored in
location 1234 (it is implied that the ION is in 1233). The 1235
stored in location 00000 indicates the JMP was not completed before
the computer went into program interrupt.
7.

RESTRICTIONS

7. 1

Starting Restrictions
(None)

7.2

Operating Restrictions
(None)

MISCELLANEOUS

8. 1

Execution Time
Approximately 96 ms per IONIJMP Y instruction group.

10.

PROGRAM DESCRIPTION
a.

The first function that is performed is that of in itia Iizati on. A
register to count loops and a location to assure typeout of the error
message header are initialized, and the bell on the Teletype is run
to raise the teleprinter flag to assure a flag for program interrupt •

. b.

Then a check is made to see if the locations of the ION and JMP V
instructions should be changed (switch 4). If they are not changed,
the program proceeds to c. If they are, a number is obtained from
a random numb~r generator, made into an address, and checked
that it is below the program, not equal to V, not equal to 00000
or 000001, and stored in POINT1 and incremented and stored in
POINT2.

Then a check is made .to see if the number V should be changed
(switch 3). If It is not changed, the program proceeds to d.
If it is, a number is obtained from a different random number
generator than was used in b., made into an address, checked to
see that it was below the program, not equal to location of ION
or JMP Y instructions, not equal to 00001, and stored in POINT3.

Then HALT is stored in all memory locations in the test area of
memory. The ION instruction is stored, as well as the JMP V
instruction after it has been formed from Yand JMP. The AC
and Link are then cleared and control is transferred to the ION/JMP Y
instruction group.

Upon return from the program interrupt, the contents of location 00000
are checked to make sure the proper number was stored. If not, the
error subroutine is called.

A check is then made to see if the scope mode (AC switches 3 and 4
a 1) has been requested and if so, control is immediately transferred
back to the instruction group.

If the instruction group is not being scoped, a check is made on
ringing the bell (switch 2), after which control goes back to b.

LISTINGS

PAGE

JMP-y

IONJMP
,TITLE IONJMP
I

~7400

07400
1217401
07402
07403
07404
07405
07406
07407
0741121
1217411
1217412
07413
1217414
07415
07416
07417
1217420
07421
1217422
07423
1217424
07425
07426
07427
1217430
07431
07432
07433
07434
07435
07436
07437
0744121
07441
07442
07 443
07444
07445
07446
07447
1217450
1217451
el7452
1217453
07454
07455
07456
07457

777700
(1147717
76"'207
HH560
207746
047525
750004
507725
740200
607437
1076 1 0
507723
",47733
047734
447734
741200
60741:
5477Ze

607412
347743
74011210
607412
207734
347743
740100
607412
207735
547733
607412
547734
607412
750004
507724
7402121121
607460
1076 21
507723
Q!47735
547730
607443
347743
74010121
607443
207735
547733
607443
547734
607443

IJMP Y-INTERRUPT TEST
.FULL
.LOC 740(11
BEGIN
LAW 1771210
DAC COUNT
LAW 207
JMS TYPE
LAC lr~+l
DAC [RROR1+13
HERE1
LAS
AND MASK2
StA
JMP HERE2
JMS RANDOM
AND MASK
DAC POINTl
OAC POINT2
151 POINT2
SNA
JMP HERE1+4
SAO ONE
JMP HERE1+4
TAO UPLIM
S;-~ •

HERE2

JMP HERE1+4
LAC POINT2
iAo UPLIM
SMA
JMp HERE1+4
LAC POINT3
SAO POINT1
JMP HERE1+4
SAO POINT2
JMP HERE1+4
LAS
ANI) MASK1
SlA
JMP HERE3
JMS RANoUM
AND MASK
oAC POINT3
SAD ONE
JMP HERE2+4
TAQ UPLIM
SMA
JMP HERE2+4
LAC POINT3
SAO POINTl
JMP HERE2+4
SAD POINT2
JMP HERE2+4
.EJECT

ISET UP TO COUNT LOOPS
IRING BELL TO SET

1/0

FLAG

IINITIALIlE ERROR TYPEOUT ROUTINE
IVARY CURRENT LOCATION

INO
IYES, GENERATE RANDOM ADDRESS
ISTORE IN "ION" POINTER
ISTORE IN "JMP Y" POINTER
lAND INCREMENT
lIS "ION"=0?

/YES
IHOW ABOUT 11
IYES
lIS THE "ION" POINTER
IINSID[ THIS PROGRAM?
IYES, GENERATE ANOTHER
INO, NOW HOW ABOUT
ITHE "JMP Y" POINTER?
lIS IT OK?
INo, TRY AGAIN
10K SO FAR, NOW IS "V" POINTER
IE QUAL TO "ION" POINTER
IYES
INO, EQUAL TO "JMP Y" POINTER
IYES
IVARY "V" POINTER?
INO
IYES, GENERATE RANDOM ADDRESS
lAND STORE IN POINT3
lIS "Y"=l?
IYES
lIS "V" INSIDE THE PROGRAM?

IYES
INO, CHECK IT AGAINST

IPOINT1
lAND
IPOINT2

PAGE

Jf"lp-Y

IONJMP

07460
07 4 61
07462
07463
07464
07465
07466
07 4 67

107574
207721

HERE3

~67733

207735
2477?2
V'67734

754000
627733

JMS HALT
LAC IONCON
DACo POINTl
LAC POINT3
XOR JMPCON
DAC" POI NT 2
CLA!CLL
JMPo POINTl

/STORE H"L
IN MEMORY
ITHEN STORE THE ION
IVyA THE "ION" POINTER
/GET "y"
/FORM JMP "Y"
/STORE VIA "JMP Y" POINTER
ICLEAR AC AND L
IEXECUTE ION-JMP Y

LAC POINT3
LAC 0
AND MASK
SAO POINT3
SKP
JMS ERROR1
LAS
RTL
RTL
SNL
JMP .+3
SPA:CLA:CLL
JMP* POINT1
LAS
RTL
SMA
JMS BELL
JMP HERE1
.EJECT

IGET "Y"

07470
07471
07472
07473
07474
07475
07476
07477
07500
07501
07502
07 5 0 3
07504
07505
07506
07507
07510
07511

2077 3 5
200000
507723
547735
741000
107512
750004
742010
742010
740400
607505
7 551 00
627733
750004
742010
740100
107550
607406

RETURN

lOGES C(0)="Y+l"
IYES
INO. ERROR
IMOVE BITS 3 + 4 INTO LINK AND AC
ILOOP ON CURRENT tty"?
INO
IYES, LOOP ON CURRENT LOCATION?
IYES, RETURN TO ION-JMP Y
INO. SEE ABOUT RINGING BELL
IRING BELL?
IYES

PAGE

JMP-Y

IONJMP
IERROR TYPEOUT SUBROUTINE
I

137512
07513
07514
07515
07516
07517
07520
07521
07522
07523
07524
07525
07526
07527
07530
07531
07532
07533
07534
07535
07536
07537
07540
07541
07542
137543
07544
137545
07546
07547

~el0000

750004
742010
740100
607521
760207
107560
7500A4
740010
741100
607544
207745
107652
207727
A47525
207734
107632
760240
107560
207735
107632
76132413
107560
200000
1'1.17632
1137566
7513004
741100
740040
627512

ERROR1

LAS
RTL
SMA
JMP
LAW
JMS
LAS
RAL
SPA
JMP
LAC
JMS
LAC
OAC
LAC
JMS
LAW
JMS
LAC
JMS
LAW
JMS

.+3
207

IRING BELL?
INO

TY~E

IPRINT ERRORS?
.+20

rrr

MPRINT
NEWINS
ERROR1+13
POINT2
PRINT
240
TYPE
POINT3
PRINT
240
TYPE
U"C 0
JHS PRINT
JMS CRLF
LAS
SPA
XX
JMP* ERROR1
.EJECT

INa
IPRINT HEADER
ICHANGE so THAT HEADER PRINTS ONLY ONCE
IPRINT LOCATION OF JMP Y
11 SPACE;

IPRINT "V"
11 SPACE

IPRINT ceel)
ICR-LF
IHALT ON ERROR?
IYES
,lEX I T

PAGE

JMP-Y

IONJMP
/USEFUL SUqROUTINES
/

BELL

07550
07551
0755?
07553
07554
07555
07556
07557

0000~0

07560
07561
07562
07563
07564
07565

Ql00000
507736
700406
70Q1401
607563
627560

TYPE

. 07566
07567

00~000

CRLF

1St' COUNT
BELL
XCT BEGIN
DAC COUNT
LAW 207
JMS TYPE
JMP .. BELL

447717
627'550

JMP~

4~74Q!0

~47717

76ft1207
107560
627550
I

AND RUBOUT
TLS
TSF
JMP .-1
JMP .. TYPE
I

0757~

07571
07572
07573

760215
107560
760212
107560
627566

LAW 215
JMS TypE
LAW 212
JMS TyPE
JMP.. CRLF
.EJECT

PAGE

JMP-Y

IONJMP
ISUBROUTINE TO STORE HALTS IN MEMORY
I

07574
07575
07576
07577
0760fl1
07601
07602
07603
07604
07605
07606
07607

~0~000

HALT

02M PNTR
LAC HLTCON
OAC" PNTR
JS2 PNTR
LAC PNTR
SAD UPLIMl
SKP
JMP HALT+2
LAC CON1
DAC 1
JMp .. HALT

147731
?~77!l0
~67731

447731
207731
547744
7414'100
607576
207716
"'4~001

627574
I
I

IRANDOM NUMBER GENERATORS
I

000000
207617

RANDOM

07610
07611
07612
07613
07614
07615
07616

741400
347620
047617
627610

07617
07620

000137
000003

RAND1

07621
07622
07623
07624
07625
07626
07"627

000000
207630
744'010
741400
347631
047630
627621

RANDUM

07630
07631

000065
000003

RAND2

144~10

0
LAC RAND1
RAL!CLL

StL
TAO RAND1+1
DAC RANDl
JMP. RANDOM
/

137
3

0
LAC RAN02
RAL!CLL
SlL
TAO RAN02+1
DAe RAN02
JMP. RANDUM

65
3
.EJECT

PAGE

JMP-Y

IONJMP
fOCTAl PRI"JT SUSROUTINF
I

07632
07633
07634
07635
07636
07637
0764'"
07641
07642
07643
07644
07645
07646
07647
07650
07651

l(h~0e(JI0

PR!~T

v
nAC TEMP

(1147741
777772

LAW 17772
DAr: TALLY
LAC TEMP
RAL:CLL
RAL
RTL
DAC TEMP
AND SEVEN
TAD 14SK I I
JMS TYPE
LAC TEMP
ISl TALLY
JMP .-10
JMPit PRINT

~47740

207741
744010
740010
742010
047741
507737
347715
107560
207741
447740
607640
627632

I
IMESSAGE PRINT SUBROUTINE

I
07652
07653
07654
07655
07656
07657
07660
07661
07662
07663
07664
07665
07666
07667
07670
07671
07672

000000
047732
227732
742020
742020
742020
742020
740020
107560
547736

MPRINT

OAC PNTRl
LAC. PNTRl
RTR:
RTRi
RTR;

RTR:

RAR

JMS TYPE
SAD RUBQUT
JMp. MPRINT
LAC. PNTR1
JMS TYPE
SAD RUBQUT
JMPo MPRINT
lSi! PNTR1
JMP MPRJNT+2

627"652

227732
107560
547736
627652
44/732

607654
I

07673
07674
07675
07676
07677
07700
07701.
07702
07703
07704
~7705

07706
07707
~710
711

215212
311317
316255
312315
320240
331215
212312
315320
2403Q11
324240
240240
242331
242240
240240
303250

IERROR MESSAGE HEADER
MESSl
215212
311317
316255
312315
32~24f21

331215
212312
31'5320
240301
324240

ICR,LF
11.0

IN,IJ,M
IP,SP

IY,CR

24~240

ILF,J
IM,P
ISP,A
IT,SP
ISP,SP

242331
242240

I",Y
I",SP

24~240

ISP,SP

3032_

IC, (

PAGE

JMP-Y

07712
07713
07714

260251
215212
377000

IONJMP
260251
215212
377000

.EJECT

10, )

ICR,LF

lEND

PAGE

JMP-Y

IONJMP
ICONSTANTS AND VARIA8LF:S
/

07715
07716
07717
07 7 20
07721
07722
07723
07724
07725
07726
07727
07730
07731
07732
07733
07734
137735
07736
07737
07740
07741
07742
07743
07744
07745
07746

000260
607470
"'000~0

740040
700042
600000
~17777
~4-00Q10

020000
010000
607531
000001
00000il}
000000
000002
000003
000004
000377
000007
000000
000000
ftl00002
770400
007400
007673
207745

ASK!I
COhJl
COUNT
HLTCON
IONCON
JHPCON
MASK
MASK1
HASK2
HASK3
NEWINS
ONE
PNTR
PNTRl
PO P,JTl
POINT2
POINT3
RUB OUT
SEVEN
TALLY
TEMP
TWO
UPLIM
UPLIMl
i!~l

?60
JMP RETURN
0

HLT
ION
JMP
17777
40000
20000
10000
JHP ERROR1+17
1
0
0

2
3
4
377

"'7

0
0
2
-BEGIN

BEGIN
MESS1
LAC ttt

000000
SItE=07747

.ENO
NO ERROR LINES

PAGE
ASKtJ
REC-IN
RELL
CLOF'
CLON
CLSF'
CONi
COUNT
CRLF'

EEM
ERRORl
HALT
HEREl
HERE2
HERE3
HLTCON
IONCON
JMPCON
KR8
KSF'
LEM
MASK
MASK1
MASK2
MASK3
MESS1
MPRtNT
NEWINS
ONE

pcr

PNTR
PNTR1
POINT1
POINT2
POINT3
PRINT
PSA
PSB
PSF
RANDOM
RANDUM
RAND1
RAND2
RCF'
RETURN
RRB
RSA
RSB
RSF'
RUBOUT
SEVEN
TALLY
Tcr
TEMP
TLS

JMP-y
07715
07400
07550
7000V'14

700044
700001
07716
07717
07566
707702
07512
07574
07406
07437
07460
07720
07721
07722
700~12

700301
707704
07723
07724
07725
07726
07673
07652
07727
07730
700202
07731
07732
07733
07734
07735
~7632

700204
700244
700201
07610
07621
07617
07630
700102
07470
700112
700104
700144
700101
07736
07737
07740
700402
07741
700406

rONJMP

PAGE

Tsr
TWO
TYPE
UPLIM
UPLIMl

JMP-Y
700401
f!J7742

f.rt

07560
07743
07744
07745

.EOT

00000

rONJMP

PAGE
.EOT
REGIN
HERE1
HERE2
HERE3
RETURN
ERROR1
BELL
TyPE
CRLF"
HALT
RANDOM
RAND1
RANDUM
RAND2
PRINT
totPRINT
MESS1
ASK I I
CONl
COUNT
HLTCON
IONCON
JMPCON
MASK
MASK1
MASK2
MASK3
NEWINS
ONE
PNTR
PNTR1
POINT1
POINT2
POINT3
RUBOUT
SEVEN
TALLY
TEMP
TWO
UPLIM
UPLIMl
~~~

CLSF"
CLOF"
CLaN
RSF"
RCF"
RSA
RRA
RS8
PSF"
peF

PSA
PSA

JMP-Y
012112100
074el0
074el6
07437
07460
07470
07512
075501
1217560
07566
07574
07610
1217617
07621
1217630
07632
07652
07673
07715
07716
07717
07720
07721
07722
07723
07724
07725
07726
07727
07730
07731
07732
07733
07734
07735
07736
07737
07740
07741
07742
07743
1217744
07745
700001
71210004
700044
700101
7012111212
70011214
71210112
700144
700201
7121121202
700204
71210244

IONJMP

PAGE

KSF
KRR

TSF
TCF
TL.S
EEM
LEM

:;'2

JMP-Y
700301
7003j2
700401
700402
7~0406

7077Ql2
707704

IONJMP