!   NAME: Z6061077  PRODUCT: BASE     CATEGORY: SPEC    SYSTEM: VMS
!   DATE: 10SEP90   STATUS:  DZ+UT    USAGE-ID: V6-ENGINE-1077
!
!   Setting up the DDIF engine and the DDIF and DDIFC drivers for use on VMS
!
!   NOTE: THE ^ CHARACTER IS THE ASCII 'HAT' CHARACTER (X'5E')
!   NOTE: THE { CHARACTER IS THE ASCII LEFT SQUARE BRACKET (X'5B')
!   NOTE: THE } CHARACTER IS THE ASCII RIGHT SQUARE BRACKET (X'5D')
!
!   IMAGE: SAS$ROOT:{IMAGE}SAS606.EXE
!
!   NOTE: Use SAS$ROOT:{USAGE.PATCH}APPLY_PATCH.COM to apply this patch
!-----------------------------------------------------------------------
!   END
SAS606.EXE
DEFINE PATAREA=0
DEFINE DDIF_ALLOWED =^X09A5C
DEFINE VXPARSE=^X0276F4
SET ECO ^X069
ALIGN/BYTE PATAREA
REPLACE/BYTE DDIF_ALLOWED
00
EXIT
01
EXIT
REPLACE/INSTRUCTION VXPARSE+^X18AA
'TSTL R0'
'BNEQ VXPARSE+^X18AF'
EXIT
'NOP'
EXIT
UPDATE
EXIT