[comp.os.vms] Official Patch #1 for ARC for VAX/VMS

scjones@sdrc.UUCP (Larry Jones) (09/03/89)

Well, I've given up on getting the new release ready for
distribution since my free time has dropped from zero to
negative.  However, since a number of people have reported having
problems with VMS ARC crashing on large files, I have developed
the following patch.  To apply it, save the following text in a
file called "ARCPATCH.COM" in the same directory as your ARC.EXE
executable, then type "$ PATCH @ARCPATCH".  This should create a
new version of ARC.EXE as well as ARCPATCH.JNL which is a journel
of the changes.  If you have any problems, let me know.

(For anyone who wants the VMS ARC distribution, it is available
from the ibm.pc archives on SIMTEL20.)
----
Larry Jones                         UUCP: uunet!sdrc!scjones
SDRC                                      scjones@SDRC.UU.NET
2000 Eastman Dr.                    BIX:  ltl
Milford, OH  45150-2789             AT&T: (513) 576-2070
"I have plenty of good sense.  I just choose to ignore it."
-Calvin
------------CUT HERE-----------------------
ARC.EXE
SE EC
^X00000061
RE /I/H
^X0001965D
'SUBL3 R2,#^X00000020,R1'
'MOVL #^X0000FFFF,R0'
'EXTZV R2,R1,R0,R1'
'MCOML R1,R1'
'BICL3 R1,W^^X0000080C(R4),R1'
'MOVL B^^X00000008(AP),R0'
'MOVAL W^^X00000408(R4)[R0],R0'
'MOVL R1,(R0)'
'CMPL B^^X00000004(AP),#^X00000010'
'BLEQ ^X00019690'
'MOVB #^X000000FF,B^^X000000F3(FP)'
'BRB ^X00019694'
'MOVB #^X00000000,B^^X000000F3(FP)'
'CVTBL B^^X000000F3(FP),R0'
'MOVL R0,R0'
'RET'
EXIT
'BGEQ .+^X00000004'
'MNEGL #^X00000001,R0'
'RET'
'SUBL3 R2,#^X00000020,R1'
'MOVL #^X0000FFFF,R0'
'EXTZV R2,R1,R0,R1'
'MCOML R1,R1'
'BICL3 R1,W^^X0000080C(R4),R1'
'MOVL B^^X00000008(AP),R0'
'MOVAL W^^X00000408(R4)[R0],R0'
'MOVL R1,(R0)'
'CLRL R0'
'RET'
EXI
U
EXI