[p5sagit/p5-mst-13.2.git] / x2p / handy.h

/* $Header: handy.h,v 3.0 89/10/18 15:34:44 lwall Locked $
 *
 *    Copyright (c) 1989, Larry Wall
 *
 *    You may distribute under the terms of the GNU General Public License
 *    as specified in the README file that comes with the perl 3.0 kit.
 *
 * $Log:	handy.h,v $
 * Revision 3.0  89/10/18  15:34:44  lwall
 * 3.0 baseline
 * 
 */

#define Null(type) ((type)0)
#define Nullch Null(char*)
#define Nullfp Null(FILE*)

#define bool char
#define TRUE (1)
#define FALSE (0)

#define Ctl(ch) (ch & 037)

#define strNE(s1,s2) (strcmp(s1,s2))
#define strEQ(s1,s2) (!strcmp(s1,s2))
#define strLT(s1,s2) (strcmp(s1,s2) < 0)
#define strLE(s1,s2) (strcmp(s1,s2) <= 0)
#define strGT(s1,s2) (strcmp(s1,s2) > 0)
#define strGE(s1,s2) (strcmp(s1,s2) >= 0)
#define strnNE(s1,s2,l) (strncmp(s1,s2,l))
#define strnEQ(s1,s2,l) (!strncmp(s1,s2,l))
Commit	Line	Data
a687059c	1	/* $Header: handy.h,v 3.0 89/10/18 15:34:44 lwall Locked $
	2	*
	3	* Copyright (c) 1989, Larry Wall
	4	*
	5	* You may distribute under the terms of the GNU General Public License
	6	* as specified in the README file that comes with the perl 3.0 kit.
8d063cd8	7	*
8d063cd8	8	* $Log: handy.h,v $
a687059c	9	* Revision 3.0 89/10/18 15:34:44 lwall
a687059c	10	* 3.0 baseline
8d063cd8	11	*
	12	*/
	13
	14	#define Null(type) ((type)0)
	15	#define Nullch Null(char*)
	16	#define Nullfp Null(FILE*)
	17
	18	#define bool char
	19	#define TRUE (1)
	20	#define FALSE (0)
	21
	22	#define Ctl(ch) (ch & 037)
	23
	24	#define strNE(s1,s2) (strcmp(s1,s2))
	25	#define strEQ(s1,s2) (!strcmp(s1,s2))
	26	#define strLT(s1,s2) (strcmp(s1,s2) < 0)
	27	#define strLE(s1,s2) (strcmp(s1,s2) <= 0)
	28	#define strGT(s1,s2) (strcmp(s1,s2) > 0)
	29	#define strGE(s1,s2) (strcmp(s1,s2) >= 0)
	30	#define strnNE(s1,s2,l) (strncmp(s1,s2,l))
	31	#define strnEQ(s1,s2,l) (!strncmp(s1,s2,l))