From:	ARISIA::SUSKIND      "Virtual User" 19-JUL-1989 17:05
To:	EVERHART
Subj:	Carl Lydick at Caltech gave a patch to change LTA rap (netnew)cln* this is for v5 VMS



  PATCH  Version 4-00    15-Sep-1984

IMAGE FILE BEING PATCHED:	"B:[VMSDS]IO_ROUTINES.EXE;4"
JOURNAL FILE:			"B:[VMSDS]IO_ROUTINES.JNL;1"
DATE/TIME OF PATCH:		19-JUL-1989 16:30:17.80
ECO LEVELS SET:		1, 2

%PATCH-I-NOLCL, image does not contain local symbols
PATCH>defi ioc$clone_ucb=217c
symbol "IOC$CLONE_UCB" defined as 0000217C
PATCH>ex/ins ioc$clone_ucb+0a
00002186:  CMPW    B^68(R2),#270F
PATCH>rep/ins ioc$clone_ucb+0a
OLD>  'cmpw b^68(r2),#270f'
OLD>  exit
NEW>  'cmpw b^68(r2),#3e7'
NEW>  exit
old:	00002186:  CMPW    B^68(R2),#270F
new:	00002186:  CMPW    B^68(R2),#03E7
PATCH>update
%PATCH-I-WRTFIL, updating image file B:[VMSDS]IO_ROUTINES.EXE;5
PATCH>e/i
0000218C:  BLEQU   00002192
PATCH>e/i
0000218E:  MOVW    #01,B^68(R2)
PATCH>exit
