summaryrefslogtreecommitdiff
path: root/op.c
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2008-01-05 17:15:30 +0000
committerNicholas Clark <nick@ccl4.org>2008-01-05 17:15:30 +0000
commit8f6ae13c8af6db5c57cde14346d77d89a10817d3 (patch)
tree07bc1e8a370597d168d8d4aa82f3569b6dbce71b /op.c
parentb9ad30b40cf004f5ea6fd7a945a950cf873aed7b (diff)
downloadperl-8f6ae13c8af6db5c57cde14346d77d89a10817d3.tar.gz
Abolish RXf_UTF8. Store the UTF-8-ness of the pattern with SvUTF8().
p4raw-id: //depot/perl@32852
Diffstat (limited to 'op.c')
-rw-r--r--op.c1
1 files changed, 0 insertions, 1 deletions
diff --git a/op.c b/op.c
index a0c4f3587f..4f8879ef4b 100644
--- a/op.c
+++ b/op.c
@@ -3449,7 +3449,6 @@ Perl_pmruntime(pTHX_ OP *o, OP *expr, bool isreg)
const char *const p = SvPV(pat, len);
pat = newSVpvn_flags(p, len, SVs_TEMP);
}
- assert(!(pm_flags & RXf_UTF8));
PM_SETRE(pm, CALLREGCOMP(pat, pm_flags));