diff options
author | Andy Dougherty <doughera@lafcol.lafayette.edu> | 1994-04-04 00:00:00 +0000 |
---|---|---|
committer | Andy Dougherty <doughera@lafcol.lafayette.edu> | 1994-04-04 00:00:00 +0000 |
commit | 2304df62caa7d9be70e8b8bcdb454e139c9c103d (patch) | |
tree | 98a456ef0fbe59b1a02bfe68afa4a3d9afb4f21c /handy.h | |
parent | 8990e3071044a96302560bbdb5706f3e74cf1bef (diff) | |
download | perl-2304df62caa7d9be70e8b8bcdb454e139c9c103d.tar.gz |
perl 5.0 alpha 8
[the last one taken from the September '94 InfoMagic CD; a similar
style of cleanup as the previous commits was performed]
Diffstat (limited to 'handy.h')
-rw-r--r-- | handy.h | 8 |
1 files changed, 7 insertions, 1 deletions
@@ -79,6 +79,12 @@ typedef unsigned long U32; #define strnNE(s1,s2,l) (strncmp(s1,s2,l)) #define strnEQ(s1,s2,l) (!strncmp(s1,s2,l)) +#ifdef HAS_SETLOCALE /* XXX Is there a better test for this? */ +# ifndef CTYPE256 +# define CTYPE256 +# endif +#endif + #if defined(CTYPE256) || (!defined(isascii) && !defined(HAS_ISASCII)) #define isALNUM(c) (isalpha(c) || isdigit(c) || c == '_') #define isIDFIRST(c) (isalpha(c) || (c) == '_') @@ -159,7 +165,7 @@ long lastxcount[MAXXCOUNT]; #define Safefree(d) d = d #endif /* lint */ -#ifdef STRUCTCOPY +#ifdef USE_STRUCT_COPY #define StructCopy(s,d,t) *((t*)(d)) = *((t*)(s)) #else #define StructCopy(s,d,t) Copy(s,d,1,t) |