/*******************************************************
 *
 * file name - ccs.h
 *
 *
 * author - rtgregory
 *
 * date created - 7-mar-90
 *
 * $Id: ccs:[rich.work]ccs.h_v 2.2 91/03/06 13:38:58 RICH Exp Locker: RICH $
 * $Author: RICH $
 * $Revision: 2.2 $ 
 *
 *******************************************************/

#ifndef CCS_HEADER_INCLUDED
#define CCS_HEADER_INCLUDED

#define INT	int
#define INTX	int

#define TRUE (INTX) 1
#define FALSE (INTX) 0

#define S1EQS2( s1, s2)		(strcmp( s1,s2) == 0)
#define S1NES2( s1, s2)		(strcmp( s1,s2) != 0)

#define ISNULLSTRING( str)     *str == '\0'
#define ISNOTNULLSTRING( str)  *str != '\0'
#define SETNULLSTRING( str)    *str =  '\0'

#define WHITE_SPACE "\n\f\t\b\v\r "

#ifdef VMS

#define TEXT_FILE	,"rat=cr", "rfm=var"
	/* use this to prevent a file from being opened as a stream_lf file */

#include <descrip.h>

#define declare_desc(name)  \
	struct dsc$descriptor name = { 0, DSC$K_DTYPE_T, DSC$K_CLASS_D, 0 }

#define fill_desc(name,str) \
	name.dsc$w_length = strlen(str); \
	name.dsc$a_pointer = str;

#define make_desc(name,str,siz) \
	name.dsc$w_length = siz; \
	name.dsc$a_pointer = str; \
	name.dsc$a_pointer[siz-1] = '\0';

char *c_next_file( void);
int c_next_file_init( char *);

#else /* !vms */

#  define TEXT_FILE

#endif /* vms */

#endif /* CCS_HEADER_INCLUDED */
/* eof */