diff options
Diffstat (limited to 'universal.c')
| -rw-r--r-- | universal.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/universal.c b/universal.c index 6ee65a6a11..65477fb775 100644 --- a/universal.c +++ b/universal.c @@ -1089,12 +1089,12 @@ Perl_boot_core_UNIVERSAL(pTHX) CV* to_native_cv = get_cv("utf8::unicode_to_native", 0); CV* to_unicode_cv = get_cv("utf8::native_to_unicode", 0); - cv_set_call_checker(to_native_cv, + cv_set_call_checker_flags(to_native_cv, optimize_out_native_convert_function, - (SV*) to_native_cv); - cv_set_call_checker(to_unicode_cv, + (SV*) to_native_cv, 0); + cv_set_call_checker_flags(to_unicode_cv, optimize_out_native_convert_function, - (SV*) to_unicode_cv); + (SV*) to_unicode_cv, 0); } #endif |