!*** MODULE $CHKPNTDEF ***
!DEC$ OPTIONS/ALIGN=(RECORDS=PACKED,COMMONS=PACKED)/NOWARN
 ! -
 ! 
 !  Define flags for calls to create checkpointable processes
 ! +
	PARAMETER CHKPNT$M_AUTO_RESTART = '00000001'X
	PARAMETER CHKPNT$M_DEBUG = '00000002'X
	PARAMETER CHKPNT$M_ASYNC = '00000004'X
	STRUCTURE /CHKPNTDEF/
	    PARAMETER CHKPNT$S_AUTO_RESTART = 1
	    PARAMETER CHKPNT$V_AUTO_RESTART = 0	 !  auto-restart detached process
	    PARAMETER CHKPNT$S_DEBUG = 1
	    PARAMETER CHKPNT$V_DEBUG = 1		 !  merge in DEBUG
	    PARAMETER CHKPNT$S_ASYNC = 1
	    PARAMETER CHKPNT$V_ASYNC = 2		 !  asynchronous checkpoint process 
	BYTE %FILL (1)
	END STRUCTURE	! CHKPNTDEF
!DEC$ END OPTIONS