This is a live mirror of the Perl 5 development currently hosted at
https://github.com/perl/perl5
https://perl5.git.perl.org
/
perl5.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
bfab39a
)
Re: [PATCH 5.004_66] REG_INFTY patch corrected
author
Ilya Zakharevich
<ilya@math.berkeley.edu>
Tue, 9 Jun 1998 23:02:52 +0000
(19:02 -0400)
committer
Gurusamy Sarathy
<gsar@cpan.org>
Wed, 10 Jun 1998 07:35:29 +0000
(07:35 +0000)
Message-Id: <
199806100302
.XAA04958@monk.mps.ohio-state.edu>
p4raw-id: //depot/perl@1109
regcomp.h
patch
|
blob
|
blame
|
history
diff --git
a/regcomp.h
b/regcomp.h
index
f9e8c2e
..
bc7977d
100644
(file)
--- a/
regcomp.h
+++ b/
regcomp.h
@@
-271,10
+271,9
@@
struct regnode_2 {
#endif
-/* I16_MAX is no good for REG_INFTY because sizeof(short) > 2
- * is perfectly fine. In Cray C90 sizeof(short) == 4,
- * in Cray T90 sizeof(short) == 8. */
-#define REG_INFTY ((1<<15)-1)
+#ifndef
+# define REG_INFTY I16_MAX
+#endif
#ifdef REGALIGN
# define ARG_VALUE(arg) (arg)