#ifndef __jfd__errchk
#define __jfd__errchk

#include <stsdef.h>
#include <lib$routines.h>

#define errchk_ret(arg) if (!($VMS_STATUS_SUCCESS(arg))) \
			    return(arg);

#define errchk_sig(arg) if (!($VMS_STATUS_SUCCESS(arg))) \
			    (void)lib$signal(arg);

#define errchk_stop(arg) if (!($VMS_STATUS_SUCCESS(arg))) \
		    	     (void)lib$stop(arg);

#endif /* __jfd__errchk */

Back to the master examples list.