diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 1999-08-02 10:32:01 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 1999-08-02 10:32:01 +0000 |
commit | 0f4b663008b5032408c35f3557d9d5c2790d3fcb (patch) | |
tree | 60ab7022a0c6f1632b74bf965475fcce8e70fe6b /regcomp.c | |
parent | f0d0442576ea74c58911be43ef48f5977fe2e1fa (diff) | |
download | perl-0f4b663008b5032408c35f3557d9d5c2790d3fcb.tar.gz |
More 64-bit fixing. One known bug of that kind
remains, 32-bit platforms using long long in
the test t/pragma/utf8 subtests 1-3 fail.
(Update: change #3884 fixed that one.)
p4raw-link: @3884 (not found)
p4raw-id: //depot/cfgperl@3880
Diffstat (limited to 'regcomp.c')
-rw-r--r-- | regcomp.c | 4 |
1 files changed, 4 insertions, 0 deletions
@@ -698,7 +698,11 @@ S_study_chunk(pTHX_ regnode **scanp, I32 *deltap, regnode *last, scan_data_t *da FAIL("variable length lookbehind not implemented"); } else if (minnext > U8_MAX) { +#ifdef UV_IS_QUAD + FAIL2("lookbehind longer than %" PERL_PRIu64 " not implemented", (UV)U8_MAX); +#else FAIL2("lookbehind longer than %d not implemented", U8_MAX); +#endif } scan->flags = minnext; } |