diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 1998-03-07 07:51:28 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-03-07 07:51:28 +0000 |
| commit | 3bd495df69b982704c59fc1ecbed71e5112e7da0 (patch) | |
| tree | 47303adb4596ab4c7c0b981f50c0a72d52092338 /perl.h | |
| parent | fe9f1ed50ae7ad31787549184f98f0a71eda0191 (diff) | |
| parent | 1d16519d77cbada019f865cb923236cd48a23c72 (diff) | |
| download | perl-3bd495df69b982704c59fc1ecbed71e5112e7da0.tar.gz | |
[win32] integrate mainline changes
p4raw-id: //depot/asperl@799
Diffstat (limited to 'perl.h')
| -rw-r--r-- | perl.h | 22 |
1 files changed, 19 insertions, 3 deletions
@@ -73,7 +73,11 @@ class CPerlObj; # ifdef __GNUC__ # define stringify_immed(s) #s # define stringify(s) stringify_immed(s) +#ifdef EMBED +register struct op *Perl_op asm(stringify(OP_IN_REGISTER)); +#else register struct op *op asm(stringify(OP_IN_REGISTER)); +#endif # endif #endif @@ -812,7 +816,11 @@ Free_t Perl_free _((Malloc_t where)); # ifdef MAXUSHORT # define PERL_USHORT_MAX ((unsigned short)MAXUSHORT) # else -# define PERL_USHORT_MAX ((unsigned short)~(unsigned)0) +# ifdef USHRT_MAX +# define PERL_USHORT_MAX ((unsigned short)USHRT_MAX) +# else +# define PERL_USHORT_MAX ((unsigned short)~(unsigned)0) +# endif # endif #endif @@ -822,7 +830,11 @@ Free_t Perl_free _((Malloc_t where)); # ifdef MAXSHORT /* Often used in <values.h> */ # define PERL_SHORT_MAX ((short)MAXSHORT) # else -# define PERL_SHORT_MAX ((short) (PERL_USHORT_MAX >> 1)) +# ifdef SHRT_MAX +# define PERL_SHORT_MAX ((short)SHRT_MAX) +# else +# define PERL_SHORT_MAX ((short) (PERL_USHORT_MAX >> 1)) +# endif # endif #endif @@ -832,7 +844,11 @@ Free_t Perl_free _((Malloc_t where)); # ifdef MINSHORT # define PERL_SHORT_MIN ((short)MINSHORT) # else -# define PERL_SHORT_MIN (-PERL_SHORT_MAX - ((3 & -1) == 3)) +# ifdef SHRT_MIN +# define PERL_SHORT_MIN ((short)SHRT_MIN) +# else +# define PERL_SHORT_MIN (-PERL_SHORT_MAX - ((3 & -1) == 3)) +# endif # endif #endif |