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
(from parent 1:
2c7fd04
)
Certain PERL_UNICODE symbols are core only
author
Karl Williamson
<khw@cpan.org>
Sat, 17 Oct 2020 21:58:01 +0000
(15:58 -0600)
committer
Karl Williamson
<khw@cpan.org>
Tue, 3 Nov 2020 03:16:29 +0000
(20:16 -0700)
perl.h
patch
|
blob
|
blame
|
history
diff --git
a/perl.h
b/perl.h
index
343d8de
..
3cabb15
100644
(file)
--- a/
perl.h
+++ b/
perl.h
@@
-7299,6
+7299,8
@@
extern void moncontrol(int);
# define PIPE_OPEN_MODE PIPESOCK_MODE
#endif
+#ifdef PERL_CORE
+
#define PERL_MAGIC_UTF8_CACHESIZE 2
#define PERL_UNICODE_STDIN_FLAG 0x0001
@@
-7339,6
+7341,8
@@
extern void moncontrol(int);
#define PERL_UNICODE_WIDESYSCALLS 'W'
#define PERL_UNICODE_UTF8CACHEASSERT 'a'
+#endif
+
/*
=for apidoc_section Signals
=for apidoc Amn|U32|PERL_SIGNALS_UNSAFE_FLAG