Skip to content

Commit

Permalink
ext/B/B.xs: Remove EBCDIC dependency
Browse files Browse the repository at this point in the history
These are unnecessary EBCDIC dependencies: It uses isPRINT() on EBCDIC,
and an expression on ASCII, but isPRINT() is defined to be precisely
that expression on ASCII platforms.
  • Loading branch information
Karl Williamson committed Sep 14, 2012
1 parent ec34087 commit 138e21c
Showing 1 changed file with 0 additions and 8 deletions.
8 changes: 0 additions & 8 deletions ext/B/B.xs
Original file line number Diff line number Diff line change
Expand Up @@ -403,11 +403,7 @@ cstring(pTHX_ SV *sv, bool perlstyle)
sv_catpvs(sstr, "\\$");
else if (perlstyle && *s == '@')
sv_catpvs(sstr, "\\@");
#ifdef EBCDIC
else if (isPRINT(*s))
#else
else if (*s >= ' ' && *s < 127)
#endif /* EBCDIC */
sv_catpvn(sstr, s, 1);
else if (*s == '\n')
sv_catpvs(sstr, "\\n");
Expand Down Expand Up @@ -448,11 +444,7 @@ cchar(pTHX_ SV *sv)
sv_catpvs(sstr, "\\'");
else if (c == '\\')
sv_catpvs(sstr, "\\\\");
#ifdef EBCDIC
else if (isPRINT(c))
#else
else if (c >= ' ' && c < 127)
#endif /* EBCDIC */
sv_catpvn(sstr, s, 1);
else if (c == '\n')
sv_catpvs(sstr, "\\n");
Expand Down

0 comments on commit 138e21c

Please sign in to comment.