! DCL RECALL patches for VMS V5.0 --- Extend # of commands that can be recalled
!
! This patch uses the REPLACE command instead of DEPOSIT.  The REPLACE
! command automatically prevents you from making a mistake by forcing you
! to enter the instruction(s) you intend to replace.  If what you enter does
! not match the code that is there, an error is generated and no patch is made.
!
DCL.EXE
REPL/INST 65ED+8
'CMPB B^0C5(R10),#15'
EXIT
'CMPB B^0C5(R10),#3F'
EXIT
REPLA/INST 6618
'CMPB B^0C5(R10),#15'
EXIT
'CMPB B^0C5(R10),#3F'
EXIT
REPL/INST 6662+4
'CMPB B^0C5(R10),#15'
EXIT
'CMPB B^0C5(R10),#3F'
EXIT
REPL/INST 6AFA
'CMPL R1,#14'
EXIT
'CMPL R1,#3E'
EXIT
REPL/INST 6B20
'MOVL #14,R6'
EXIT
'MOVL #3E,R6'
EXIT
REPL/INS 6B38
'MOVL #14,R9'
EXIT
'MOVL #3E,R9'
EXIT
REPL/INST 6BE7
'CMPB (R2),#31'
'BNEQ 6BF3'
'MOVW #2F32,(R2)'
'BRB 6BF8'
'MOVW #2F31,(R2)'
EXIT
'CMPB (R2),#20'
'BNEQ 6BEF'
'MOVB #30,(R2)'
'INCB (R2)'
'MOVB #2F,B^01(R2)'
EXIT
UPDATE
EXIT