summaryrefslogtreecommitdiff
path: root/embed.fnc
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2018-03-05 11:16:15 -0700
committerKarl Williamson <khw@cpan.org>2018-03-05 11:22:14 -0700
commit23a7ee81e1f64dbbde529a3010a311ed7e872fcf (patch)
treeac5bfe6ebfb7a7988d3062bb99b58fe8cc8585cc /embed.fnc
parent290746ac426c1396497786818282dc2d1330cf79 (diff)
downloadperl-23a7ee81e1f64dbbde529a3010a311ed7e872fcf.tar.gz
EBCDIC conditional compilation fixes
The recent changes fixed by this commit neglected to take into account EBCDIC differences. Mostly, the algorithms apply only to ASCII platforms, so the EBCDIC is ifdef'd out. In a couple cases, the algorithm mostly applies, so the scope of the ifdefs is smaller.
Diffstat (limited to 'embed.fnc')
-rw-r--r--embed.fnc2
1 files changed, 2 insertions, 0 deletions
diff --git a/embed.fnc b/embed.fnc
index bc57c1d7e7..6c4f859583 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -807,7 +807,9 @@ AndmoR |bool |is_utf8_invariant_string|NN const U8* const s \
AnidR |bool |is_utf8_invariant_string_loc|NN const U8* const s \
|STRLEN len \
|NULLOK const U8 ** ep
+#ifndef EBCDIC
AniR |unsigned int|_variant_byte_number|PERL_UINTMAX_T word
+#endif
#if defined(PERL_CORE) || defined(PERL_EXT)
EinR |Size_t |variant_under_utf8_count|NN const U8* const s \
|NN const U8* const e