diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 1999-08-02 12:53:10 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 1999-08-02 12:53:10 +0000 |
| commit | b9c39e7333cadd99fd23059be7fbd6399d58fec4 (patch) | |
| tree | fc5db9dccbd5d20e638897557dd001ec78ced868 /regcomp.c | |
| parent | 88c07c3641c0fb59ded524dfdcea26f44c3acd38 (diff) | |
| download | perl-b9c39e7333cadd99fd23059be7fbd6399d58fec4.tar.gz | |
Fix some of the {IV_IS_QUAD,UV_IS_QUAD} cases so that
emacs code indentation doesn't get wrong ideas--
in other words, introduce a couple of "redundant" if:s.
p4raw-id: //depot/cfgperl@3887
Diffstat (limited to 'regcomp.c')
| -rw-r--r-- | regcomp.c | 6 |
1 files changed, 4 insertions, 2 deletions
@@ -2834,10 +2834,11 @@ S_regclassutf8(pTHX) if (range) { if (lastvalue > value) FAIL("invalid [] range in regexp"); - if (!SIZE_ONLY) #ifdef UV_IS_QUAD + if (!SIZE_ONLY) Perl_sv_catpvf(aTHX_ listsv, "%04" PERL_PRIx64 "\t%04" PERL_PRIx64 "\n", (UV)lastvalue, (UV)value); #else + if (!SIZE_ONLY) Perl_sv_catpvf(aTHX_ listsv, "%04x\t%04x\n", lastvalue, value); #endif lastvalue = value; @@ -2851,10 +2852,11 @@ S_regclassutf8(pTHX) range = 1; continue; /* do it next time */ } - if (!SIZE_ONLY) #ifdef UV_IS_QUAD + if (!SIZE_ONLY) Perl_sv_catpvf(aTHX_ listsv, "%04" PERL_PRIx64 "\n", (UV)value); #else + if (!SIZE_ONLY) Perl_sv_catpvf(aTHX_ listsv, "%04x\n", value); #endif } |