1 /* $RCSfile: handy.h,v $$Revision: 4.0.1.1 $$Date: 91/04/12 09:29:08 $
3 * Copyright (c) 1989, Larry Wall
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.
9 * Revision 4.0.1.1 91/04/12 09:29:08 lwall
10 * patch1: random cleanup in cpp namespace
12 * Revision 4.0 91/03/20 01:57:45 lwall
17 #define Null(type) ((type)0)
18 #define Nullch Null(char*)
19 #define Nullfp Null(FILE*)
31 #define Ctl(ch) (ch & 037)
33 #define strNE(s1,s2) (strcmp(s1,s2))
34 #define strEQ(s1,s2) (!strcmp(s1,s2))
35 #define strLT(s1,s2) (strcmp(s1,s2) < 0)
36 #define strLE(s1,s2) (strcmp(s1,s2) <= 0)
37 #define strGT(s1,s2) (strcmp(s1,s2) > 0)
38 #define strGE(s1,s2) (strcmp(s1,s2) >= 0)
39 #define strnNE(s1,s2,l) (strncmp(s1,s2,l))
40 #define strnEQ(s1,s2,l) (!strncmp(s1,s2,l))