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:
498b0fa
)
infnan: comment tweak, IS_NUMBER_NOT_INT also if saw infnan
author
Jarkko Hietaniemi
<jhi@iki.fi>
Fri, 30 Jan 2015 02:21:35 +0000
(21:21 -0500)
committer
Jarkko Hietaniemi
<jhi@iki.fi>
Mon, 2 Feb 2015 22:02:59 +0000
(17:02 -0500)
perl.h
patch
|
blob
|
blame
|
history
diff --git
a/perl.h
b/perl.h
index
d4f7f52
..
d3951a9
100644
(file)
--- a/
perl.h
+++ b/
perl.h
@@
-6259,7
+6259,7
@@
int flock(int fd, int op);
int). value returned in pointed-
to UV */
#define IS_NUMBER_GREATER_THAN_UV_MAX 0x02 /* pointed to UV undefined */
-#define IS_NUMBER_NOT_INT 0x04 /* saw . or E notation */
+#define IS_NUMBER_NOT_INT 0x04 /* saw . or E notation
or infnan
*/
#define IS_NUMBER_NEG 0x08 /* leading minus sign */
#define IS_NUMBER_INFINITY 0x10 /* this is big */
#define IS_NUMBER_NAN 0x20 /* this is not */