Skip to content

Commit 1e60ec6

Browse files
committed
pv_uni_display(): Fix indentation
These lines were indented an extra space, not a multiple of 4, nor even 2.
1 parent 5a77192 commit 1e60ec6

File tree

1 file changed

+34
-34
lines changed

1 file changed

+34
-34
lines changed

utf8.c

Lines changed: 34 additions & 34 deletions
Original file line numberDiff line numberDiff line change
@@ -4196,40 +4196,40 @@ Perl_pv_uni_display(pTHX_ SV *dsv, const U8 *spv, STRLEN len, STRLEN pvlim,
41964196
SvPVCLEAR(dsv);
41974197
SvUTF8_off(dsv);
41984198
for (s = spv, e = s + len; s < e; s += UTF8SKIP(s)) {
4199-
UV u;
4200-
bool ok = 0;
4201-
4202-
if (pvlim && SvCUR(dsv) >= pvlim) {
4203-
truncated++;
4204-
break;
4205-
}
4206-
4207-
u = utf8_to_uvchr_buf(s, e, 0);
4208-
if (u < 256) {
4209-
const U8 c = (U8) u;
4210-
if (flags & UNI_DISPLAY_BACKSLASH) {
4211-
if ( isMNEMONIC_CNTRL(c)
4212-
&& ( c != '\b'
4213-
|| (flags & UNI_DISPLAY_BACKSPACE)))
4214-
{
4215-
const char * mnemonic = cntrl_to_mnemonic(c);
4216-
sv_catpvn(dsv, mnemonic, strlen(mnemonic));
4217-
ok = 1;
4218-
}
4219-
else if (c == '\\') {
4220-
sv_catpvs(dsv, "\\\\");
4221-
ok = 1;
4222-
}
4223-
}
4224-
/* isPRINT() is the locale-blind version. */
4225-
if (!ok && (flags & UNI_DISPLAY_ISPRINT) && isPRINT(c)) {
4226-
const char string = c;
4227-
sv_catpvn(dsv, &string, 1);
4228-
ok = 1;
4229-
}
4230-
}
4231-
if (!ok)
4232-
Perl_sv_catpvf(aTHX_ dsv, "\\x{%" UVxf "}", u);
4199+
UV u;
4200+
bool ok = 0;
4201+
4202+
if (pvlim && SvCUR(dsv) >= pvlim) {
4203+
truncated++;
4204+
break;
4205+
}
4206+
4207+
u = utf8_to_uvchr_buf(s, e, 0);
4208+
if (u < 256) {
4209+
const U8 c = (U8) u;
4210+
if (flags & UNI_DISPLAY_BACKSLASH) {
4211+
if ( isMNEMONIC_CNTRL(c)
4212+
&& ( c != '\b'
4213+
|| (flags & UNI_DISPLAY_BACKSPACE)))
4214+
{
4215+
const char * mnemonic = cntrl_to_mnemonic(c);
4216+
sv_catpvn(dsv, mnemonic, strlen(mnemonic));
4217+
ok = 1;
4218+
}
4219+
else if (c == '\\') {
4220+
sv_catpvs(dsv, "\\\\");
4221+
ok = 1;
4222+
}
4223+
}
4224+
/* isPRINT() is the locale-blind version. */
4225+
if (!ok && (flags & UNI_DISPLAY_ISPRINT) && isPRINT(c)) {
4226+
const char string = c;
4227+
sv_catpvn(dsv, &string, 1);
4228+
ok = 1;
4229+
}
4230+
}
4231+
if (!ok)
4232+
Perl_sv_catpvf(aTHX_ dsv, "\\x{%" UVxf "}", u);
42334233
}
42344234
if (truncated)
42354235
sv_catpvs(dsv, "...");

0 commit comments

Comments
 (0)