summaryrefslogtreecommitdiff
path: root/pp_ctl.c
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2001-05-31 00:16:44 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2001-05-31 00:16:44 +0000
commit0064a8a9866779dceb087452b9bfaa733c51adce (patch)
tree3fdfd380d1e3b371bed489f787cf1c3a69e22234 /pp_ctl.c
parent9c5ffd7c3fe1ab64d3e7d06810ac3ab42426718b (diff)
downloadperl-0064a8a9866779dceb087452b9bfaa733c51adce.tar.gz
Salvage bits and pieces from the experimental 'utf8 everywhere'
patch: rename HINT_BYTE and IN_BYTE to HINT_BYTES and IN_BYTES to match the pragma name; various robustness cleanups. p4raw-id: //depot/perl@10339
Diffstat (limited to 'pp_ctl.c')
-rw-r--r--pp_ctl.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/pp_ctl.c b/pp_ctl.c
index 736f84d9d2..032be2e33d 100644
--- a/pp_ctl.c
+++ b/pp_ctl.c
@@ -323,7 +323,7 @@ PP(pp_formline)
NV value;
bool gotsome = FALSE;
STRLEN len;
- STRLEN fudge = SvCUR(tmpForm) * (IN_BYTE ? 1 : 3) + 1;
+ STRLEN fudge = SvCUR(tmpForm) * (IN_BYTES ? 1 : 3) + 1;
bool item_is_utf = FALSE;
if (!SvMAGICAL(tmpForm) || !SvCOMPILED(tmpForm)) {