Skip to content

Commit a78980f

Browse files
khwilliamsonkhwilliamson
committed
Revert "Move many SV mathoms functions to macros in sv.h"
This reverts commit 2d85958.
1 parent 09fa455 commit a78980f

File tree

5 files changed

+584
-276
lines changed

5 files changed

+584
-276
lines changed

‎embed.fnc

+31-32
Original file line numberDiff line numberDiff line change
@@ -2334,7 +2334,7 @@ ARdp |SV * |newSVpvz |const STRLEN len
23342334
ARdp |OP * |newSVREF |NN OP *o
23352335
Adp |SV * |newSVrv |NN SV * const rv \
23362336
|NULLOK const char * const classname
2337-
ARdmp |SV * |newSVsv |NULLOK SV * const old
2337+
AMRbdp |SV * |newSVsv |NULLOK SV * const old
23382338
ARdp |SV * |newSVsv_flags |NULLOK SV * const old \
23392339
|I32 flags
23402340
ARdm |SV * |newSVsv_nomg |NULLOK SV * const old
@@ -3113,7 +3113,7 @@ ATdip |void |SvAMAGIC_on |NN SV *sv
31133113
ATdp |void |sv_backoff |NN SV * const sv
31143114
Adp |SV * |sv_bless |NN SV * const sv \
31153115
|NN NOCHECK HV * const stash
3116-
Cdmp |bool |sv_2bool |NN SV * const sv
3116+
CMbdp |bool |sv_2bool |NN SV * const sv
31173117
Cdp |bool |sv_2bool_flags |NN SV *sv \
31183118
|I32 flags
31193119
Cp |bool |sv_can_swipe_pv_buf \
@@ -3137,22 +3137,22 @@ Adfpv |void |sv_catpvf_mg |NN SV * const sv \
31373137
|...
31383138
Adp |void |sv_catpv_mg |NN SV * const dsv \
31393139
|NULLOK const char * const sstr
3140-
Admp |void |sv_catpvn |NN SV * const dsv \
3140+
AMbdp |void |sv_catpvn |NN SV * const dsv \
31413141
|NN const char *sstr \
31423142
|STRLEN len
31433143
Adp |void |sv_catpvn_flags|NN SV * const dsv \
31443144
|NN const char *sstr \
31453145
|const STRLEN len \
31463146
|const I32 flags
3147-
Admp |void |sv_catpvn_mg |NN SV * const dsv \
3147+
AMbdp |void |sv_catpvn_mg |NN SV * const dsv \
31483148
|NN const char *sstr \
31493149
|STRLEN len
3150-
Admp |void |sv_catsv |NN SV * const dsv \
3150+
AMbdp |void |sv_catsv |NN SV * const dsv \
31513151
|NULLOK SV * const sstr
31523152
Adp |void |sv_catsv_flags |NN SV * const dsv \
31533153
|NULLOK SV * const sstr \
31543154
|const I32 flags
3155-
Admp |void |sv_catsv_mg |NN SV * const dsv \
3155+
AMbdp |void |sv_catsv_mg |NN SV * const dsv \
31563156
|NULLOK SV * const sstr
31573157
Adp |void |sv_chop |NN SV * const sv \
31583158
|NULLOK const char * const ptr
@@ -3172,7 +3172,7 @@ Adp |I32 |sv_cmp_locale_flags \
31723172
|NULLOK SV * const sv1 \
31733173
|NULLOK SV * const sv2 \
31743174
|const U32 flags
3175-
Admp |void |sv_copypv |NN SV * const dsv \
3175+
AMbdp |void |sv_copypv |NN SV * const dsv \
31763176
|NN SV * const ssv
31773177
Adp |void |sv_copypv_flags|NN SV * const dsv \
31783178
|NN SV * const ssv \
@@ -3222,12 +3222,12 @@ ARdp |bool |sv_does_sv |NN SV *sv \
32223222
Adp |void |sv_dump |NULLOK SV *sv
32233223
Adp |void |sv_dump_depth |NULLOK SV *sv \
32243224
|I32 depth
3225-
Admp |I32 |sv_eq |NULLOK SV *sv1 \
3225+
AMbdp |I32 |sv_eq |NULLOK SV *sv1 \
32263226
|NULLOK SV *sv2
32273227
Adp |I32 |sv_eq_flags |NULLOK SV *sv1 \
32283228
|NULLOK SV *sv2 \
32293229
|const U32 flags
3230-
Admp |void |sv_force_normal|NN SV *sv
3230+
AMbdp |void |sv_force_normal|NN SV *sv
32313231
Adp |void |sv_force_normal_flags \
32323232
|NN SV * const sv \
32333233
|const U32 flags
@@ -3247,7 +3247,7 @@ Cdp |char * |sv_grow_fresh |NN SV * const sv \
32473247
|STRLEN newlen
32483248
Adp |void |sv_inc |NULLOK SV * const sv
32493249
Adp |void |sv_inc_nomg |NULLOK SV * const sv
3250-
Admp |void |sv_insert |NN SV * const bigstr \
3250+
AMbdp |void |sv_insert |NN SV * const bigstr \
32513251
|const STRLEN offset \
32523252
|const STRLEN len \
32533253
|NN const char * const little \
@@ -3265,7 +3265,7 @@ ARdp |bool |sv_isa_sv |NN SV *sv \
32653265
|NN SV *namesv
32663266
Adp |int |sv_isobject |NULLOK SV *sv
32673267
Adip |IV |SvIV |NN SV *sv
3268-
Cmp |IV |sv_2iv |NN SV * const sv
3268+
CMbp |IV |sv_2iv |NN SV *sv
32693269
Adp |IV |sv_2iv_flags |NN SV * const sv \
32703270
|const I32 flags
32713271
Adip |IV |SvIV_nomg |NN SV *sv
@@ -3289,7 +3289,7 @@ Adp |MAGIC *|sv_magicext |NN SV * const sv \
32893289
EXp |MAGIC *|sv_magicext_mglob \
32903290
|NN SV *sv
32913291
Adp |SV * |sv_2mortal |NULLOK SV * const sv
3292-
ARdmp |SV * |sv_mortalcopy |NULLOK SV * const oldsv
3292+
AMRbdp |SV * |sv_mortalcopy |NULLOK SV * const oldsv
32933293
ARdp |SV * |sv_mortalcopy_flags \
32943294
|NULLOK SV * const oldsv \
32953295
|U32 flags
@@ -3307,7 +3307,6 @@ Adp |bool |sv_numeq_flags |NULLOK SV *sv1 \
33073307
|NULLOK SV *sv2 \
33083308
|const U32 flags
33093309
Adip |NV |SvNV |NN SV *sv
3310-
Cmp |NV |sv_2nv |NN SV * const sv
33113310
Adp |NV |sv_2nv_flags |NN SV * const sv \
33123311
|const I32 flags
33133312
Adip |NV |SvNV_nomg |NN SV *sv
@@ -3328,12 +3327,12 @@ Adp |STRLEN |sv_pos_u2b_flags \
33283327
|STRLEN uoffset \
33293328
|NULLOK STRLEN * const lenp \
33303329
|U32 flags
3331-
Admp |char * |sv_2pv |NN SV *sv \
3330+
AMbdp |char * |sv_2pv |NN SV *sv \
33323331
|NULLOK STRLEN *lp
3333-
CRdmp |char * |sv_pv |NN SV *sv
3334-
Admp |char * |sv_2pvbyte |NN SV *sv \
3332+
CMRbdp |char * |sv_pv |NN SV *sv
3333+
AMbdp |char * |sv_2pvbyte |NN SV *sv \
33353334
|NULLOK STRLEN * const lp
3336-
CRdmp |char * |sv_pvbyte |NN SV *sv
3335+
CMRbdp |char * |sv_pvbyte |NN SV *sv
33373336
Adp |char * |sv_2pvbyte_flags \
33383337
|NN SV *sv \
33393338
|NULLOK STRLEN * const lp \
@@ -3345,21 +3344,21 @@ ip |char * |sv_pvbyten_force_wrapper \
33453344
|NN SV * const sv \
33463345
|NULLOK STRLEN * const lp \
33473346
|const U32 dummy
3348-
CRdmp |char * |sv_2pvbyte_nolen \
3347+
CMRbdp |char * |sv_2pvbyte_nolen \
33493348
|NN SV *sv
33503349
Adp |char * |sv_2pv_flags |NN SV * const sv \
33513350
|NULLOK STRLEN * const lp \
33523351
|const U32 flags
3353-
Cdmp |char * |sv_pvn_force |NN SV *sv \
3352+
CMbdp |char * |sv_pvn_force |NN SV *sv \
33543353
|NULLOK STRLEN *lp
33553354
Adp |char * |sv_pvn_force_flags \
33563355
|NN SV * const sv \
33573356
|NULLOK STRLEN * const lp \
33583357
|const U32 flags
3359-
CRdmp |char * |sv_2pv_nolen |NN SV *sv
3360-
Admp |char * |sv_2pvutf8 |NN SV *sv \
3358+
CMRbdp |char * |sv_2pv_nolen |NN SV *sv
3359+
AMbdp |char * |sv_2pvutf8 |NN SV *sv \
33613360
|NULLOK STRLEN * const lp
3362-
CRdmp |char * |sv_pvutf8 |NN SV *sv
3361+
CMRbdp |char * |sv_pvutf8 |NN SV *sv
33633362
Adp |char * |sv_2pvutf8_flags \
33643363
|NN SV *sv \
33653364
|NULLOK STRLEN * const lp \
@@ -3371,7 +3370,7 @@ ip |char * |sv_pvutf8n_force_wrapper \
33713370
|NN SV * const sv \
33723371
|NULLOK STRLEN * const lp \
33733372
|const U32 dummy
3374-
CRdmp |char * |sv_2pvutf8_nolen \
3373+
CMRbdp |char * |sv_2pvutf8_nolen \
33753374
|NN SV *sv
33763375
AIdp |bool |SvPVXtrue |NN SV *sv
33773376
Adp |char * |sv_recode_to_utf8 \
@@ -3476,7 +3475,7 @@ Adp |void |sv_setrv_noinc |NN SV * const sv \
34763475
Adp |void |sv_setrv_noinc_mg \
34773476
|NN SV * const sv \
34783477
|NN SV * const ref
3479-
Admp |void |sv_setsv |NN SV *dsv \
3478+
AMbdp |void |sv_setsv |NN SV *dsv \
34803479
|NULLOK SV *ssv
34813480
Adp |void |sv_setsv_flags |NN SV *dsv \
34823481
|NULLOK SV *ssv \
@@ -3509,7 +3508,7 @@ Adp |SV * |sv_strftime_tm |NN SV *fmt \
35093508
Adp |SV * |sv_string_from_errnum \
35103509
|int errnum \
35113510
|NULLOK SV *tgtsv
3512-
Cdmp |void |sv_taint |NN SV *sv
3511+
CMbdp |void |sv_taint |NN SV *sv
35133512
CRdp |bool |sv_tainted |NN SV * const sv
35143513
Adip |bool |SvTRUE |NULLOK SV *sv
35153514
Cdp |I32 |sv_true |NULLOK SV * const sv
@@ -3532,18 +3531,18 @@ Adp |void |sv_unref_flags |NN SV * const ref \
35323531
Cdp |void |sv_untaint |NN SV * const sv
35333532
Adp |void |sv_upgrade |NN SV * const sv \
35343533
|svtype new_type
3535-
Admp |void |sv_usepvn |NN SV *sv \
3534+
AMbdp |void |sv_usepvn |NN SV *sv \
35363535
|NULLOK char *ptr \
35373536
|STRLEN len
35383537
Adp |void |sv_usepvn_flags|NN SV * const sv \
35393538
|NULLOK char *ptr \
35403539
|const STRLEN len \
35413540
|const U32 flags
3542-
Admp |void |sv_usepvn_mg |NN SV *sv \
3541+
AMbdp |void |sv_usepvn_mg |NN SV *sv \
35433542
|NULLOK char *ptr \
35443543
|STRLEN len
35453544
Adp |bool |sv_utf8_decode |NN SV * const sv
3546-
Admp |bool |sv_utf8_downgrade \
3545+
AMbdp |bool |sv_utf8_downgrade \
35473546
|NN SV * const sv \
35483547
|const bool fail_ok
35493548
Adp |bool |sv_utf8_downgrade_flags \
@@ -3554,8 +3553,8 @@ Adm |bool |sv_utf8_downgrade_nomg \
35543553
|NN SV * const sv \
35553554
|const bool fail_ok
35563555
Adp |void |sv_utf8_encode |NN SV * const sv
3557-
Admp |STRLEN |sv_utf8_upgrade|NN SV *sv
3558-
Admp |STRLEN |sv_utf8_upgrade_flags \
3556+
AMbdp |STRLEN |sv_utf8_upgrade|NN SV *sv
3557+
Adm |STRLEN |sv_utf8_upgrade_flags \
35593558
|NN SV * const sv \
35603559
|const I32 flags
35613560
Adp |STRLEN |sv_utf8_upgrade_flags_grow \
@@ -3565,7 +3564,7 @@ Adp |STRLEN |sv_utf8_upgrade_flags_grow \
35653564
Adm |STRLEN |sv_utf8_upgrade_nomg \
35663565
|NN SV *sv
35673566
Adip |UV |SvUV |NN SV *sv
3568-
Cmp |UV |sv_2uv |NN SV * const sv
3567+
CMbp |UV |sv_2uv |NN SV *sv
35693568
Adp |UV |sv_2uv_flags |NN SV * const sv \
35703569
|const I32 flags
35713570
Adip |UV |SvUV_nomg |NN SV *sv
@@ -6403,7 +6402,7 @@ p |int |magic_setcollxfrm \
64036402
|NN MAGIC *mg
64046403
EXop |SV * |strxfrm |NN SV *src
64056404
: Defined in locale.c, used only in sv.c
6406-
Admp |char * |sv_collxfrm |NN SV * const sv \
6405+
AMbdp |char * |sv_collxfrm |NN SV * const sv \
64076406
|NN STRLEN * const nxp
64086407
Adp |char * |sv_collxfrm_flags \
64096408
|NN SV * const sv \

‎embed.h

-32
Original file line numberDiff line numberDiff line change
@@ -469,7 +469,6 @@
469469
# define newSVpvn_share(a,b,c) Perl_newSVpvn_share(aTHX_ a,b,c)
470470
# define newSVpvz(a) Perl_newSVpvz(aTHX_ a)
471471
# define newSVrv(a,b) Perl_newSVrv(aTHX_ a,b)
472-
# define newSVsv(a) Perl_newSVsv(aTHX,a)
473472
# define newSVsv_flags(a,b) Perl_newSVsv_flags(aTHX_ a,b)
474473
# define newSVuv(a) Perl_newSVuv(aTHX_ a)
475474
# define newTRYCATCHOP(a,b,c,d) Perl_newTRYCATCHOP(aTHX_ a,b,c,d)
@@ -675,25 +674,15 @@
675674
# define str_to_version(a) Perl_str_to_version(aTHX_ a)
676675
# define strict_utf8_to_uv Perl_strict_utf8_to_uv
677676
# define suspend_compcv(a) Perl_suspend_compcv(aTHX_ a)
678-
# define sv_2bool(a) Perl_sv_2bool(aTHX,a)
679677
# define sv_2bool_flags(a,b) Perl_sv_2bool_flags(aTHX_ a,b)
680678
# define sv_2cv(a,b,c,d) Perl_sv_2cv(aTHX_ a,b,c,d)
681679
# define sv_2io(a) Perl_sv_2io(aTHX_ a)
682-
# define sv_2iv(a) Perl_sv_2iv(aTHX,a)
683680
# define sv_2iv_flags(a,b) Perl_sv_2iv_flags(aTHX_ a,b)
684681
# define sv_2mortal(a) Perl_sv_2mortal(aTHX_ a)
685-
# define sv_2nv(a) Perl_sv_2nv(aTHX,a)
686682
# define sv_2nv_flags(a,b) Perl_sv_2nv_flags(aTHX_ a,b)
687-
# define sv_2pv(a,b) Perl_sv_2pv(aTHX,a,b)
688683
# define sv_2pv_flags(a,b,c) Perl_sv_2pv_flags(aTHX_ a,b,c)
689-
# define sv_2pv_nolen(a) Perl_sv_2pv_nolen(aTHX,a)
690-
# define sv_2pvbyte(a,b) Perl_sv_2pvbyte(aTHX,a,b)
691684
# define sv_2pvbyte_flags(a,b,c) Perl_sv_2pvbyte_flags(aTHX_ a,b,c)
692-
# define sv_2pvbyte_nolen(a) Perl_sv_2pvbyte_nolen(aTHX,a)
693-
# define sv_2pvutf8(a,b) Perl_sv_2pvutf8(aTHX,a,b)
694685
# define sv_2pvutf8_flags(a,b,c) Perl_sv_2pvutf8_flags(aTHX_ a,b,c)
695-
# define sv_2pvutf8_nolen(a) Perl_sv_2pvutf8_nolen(aTHX,a)
696-
# define sv_2uv(a) Perl_sv_2uv(aTHX,a)
697686
# define sv_2uv_flags(a,b) Perl_sv_2uv_flags(aTHX_ a,b)
698687
# define sv_backoff Perl_sv_backoff
699688
# define sv_bless(a,b) Perl_sv_bless(aTHX_ a,b)
@@ -702,17 +691,12 @@
702691
# define sv_catpv(a,b) Perl_sv_catpv(aTHX_ a,b)
703692
# define sv_catpv_flags(a,b,c) Perl_sv_catpv_flags(aTHX_ a,b,c)
704693
# define sv_catpv_mg(a,b) Perl_sv_catpv_mg(aTHX_ a,b)
705-
# define sv_catpvn(a,b,c) Perl_sv_catpvn(aTHX,a,b,c)
706694
# define sv_catpvn_flags(a,b,c,d) Perl_sv_catpvn_flags(aTHX_ a,b,c,d)
707-
# define sv_catpvn_mg(a,b,c) Perl_sv_catpvn_mg(aTHX,a,b,c)
708-
# define sv_catsv(a,b) Perl_sv_catsv(aTHX,a,b)
709695
# define sv_catsv_flags(a,b,c) Perl_sv_catsv_flags(aTHX_ a,b,c)
710-
# define sv_catsv_mg(a,b) Perl_sv_catsv_mg(aTHX,a,b)
711696
# define sv_chop(a,b) Perl_sv_chop(aTHX_ a,b)
712697
# define sv_clear(a) Perl_sv_clear(aTHX_ a)
713698
# define sv_cmp_flags(a,b,c) Perl_sv_cmp_flags(aTHX_ a,b,c)
714699
# define sv_cmp_locale_flags(a,b,c) Perl_sv_cmp_locale_flags(aTHX_ a,b,c)
715-
# define sv_copypv(a,b) Perl_sv_copypv(aTHX,a,b)
716700
# define sv_copypv_flags(a,b,c) Perl_sv_copypv_flags(aTHX_ a,b,c)
717701
# define sv_dec(a) Perl_sv_dec(aTHX_ a)
718702
# define sv_dec_nomg(a) Perl_sv_dec_nomg(aTHX_ a)
@@ -728,9 +712,7 @@
728712
# define sv_does_sv(a,b,c) Perl_sv_does_sv(aTHX_ a,b,c)
729713
# define sv_dump(a) Perl_sv_dump(aTHX_ a)
730714
# define sv_dump_depth(a,b) Perl_sv_dump_depth(aTHX_ a,b)
731-
# define sv_eq(a,b) Perl_sv_eq(aTHX,a,b)
732715
# define sv_eq_flags(a,b,c) Perl_sv_eq_flags(aTHX_ a,b,c)
733-
# define sv_force_normal(a) Perl_sv_force_normal(aTHX,a)
734716
# define sv_force_normal_flags(a,b) Perl_sv_force_normal_flags(aTHX_ a,b)
735717
# define sv_free(a) Perl_sv_free(aTHX_ a)
736718
# define sv_get_backrefs Perl_sv_get_backrefs
@@ -739,7 +721,6 @@
739721
# define sv_grow_fresh(a,b) Perl_sv_grow_fresh(aTHX_ a,b)
740722
# define sv_inc(a) Perl_sv_inc(aTHX_ a)
741723
# define sv_inc_nomg(a) Perl_sv_inc_nomg(aTHX_ a)
742-
# define sv_insert(a,b,c,d,e) Perl_sv_insert(aTHX,a,b,c,d,e)
743724
# define sv_insert_flags(a,b,c,d,e,f) Perl_sv_insert_flags(aTHX_ a,b,c,d,e,f)
744725
# define sv_isa(a,b) Perl_sv_isa(aTHX_ a,b)
745726
# define sv_isa_sv(a,b) Perl_sv_isa_sv(aTHX_ a,b)
@@ -750,7 +731,6 @@
750731
# define sv_len_utf8_nomg(a) Perl_sv_len_utf8_nomg(aTHX_ a)
751732
# define sv_magic(a,b,c,d,e) Perl_sv_magic(aTHX_ a,b,c,d,e)
752733
# define sv_magicext(a,b,c,d,e,f) Perl_sv_magicext(aTHX_ a,b,c,d,e,f)
753-
# define sv_mortalcopy(a) Perl_sv_mortalcopy(aTHX,a)
754734
# define sv_mortalcopy_flags(a,b) Perl_sv_mortalcopy_flags(aTHX_ a,b)
755735
# define sv_newmortal() Perl_sv_newmortal(aTHX)
756736
# define sv_newref(a) Perl_sv_newref(aTHX_ a)
@@ -761,12 +741,8 @@
761741
# define sv_pos_b2u_flags(a,b,c) Perl_sv_pos_b2u_flags(aTHX_ a,b,c)
762742
# define sv_pos_u2b(a,b,c) Perl_sv_pos_u2b(aTHX_ a,b,c)
763743
# define sv_pos_u2b_flags(a,b,c,d) Perl_sv_pos_u2b_flags(aTHX_ a,b,c,d)
764-
# define sv_pv(a) Perl_sv_pv(aTHX,a)
765-
# define sv_pvbyte(a) Perl_sv_pvbyte(aTHX,a)
766744
# define sv_pvbyten_force(a,b) Perl_sv_pvbyten_force(aTHX_ a,b)
767-
# define sv_pvn_force(a,b) Perl_sv_pvn_force(aTHX,a,b)
768745
# define sv_pvn_force_flags(a,b,c) Perl_sv_pvn_force_flags(aTHX_ a,b,c)
769-
# define sv_pvutf8(a) Perl_sv_pvutf8(aTHX,a)
770746
# define sv_pvutf8n_force(a,b) Perl_sv_pvutf8n_force(aTHX_ a,b)
771747
# define sv_recode_to_utf8(a,b) Perl_sv_recode_to_utf8(aTHX_ a,b)
772748
# define sv_ref(a,b,c) Perl_sv_ref(aTHX_ a,b,c)
@@ -803,7 +779,6 @@
803779
# define sv_setrv_inc_mg(a,b) Perl_sv_setrv_inc_mg(aTHX_ a,b)
804780
# define sv_setrv_noinc(a,b) Perl_sv_setrv_noinc(aTHX_ a,b)
805781
# define sv_setrv_noinc_mg(a,b) Perl_sv_setrv_noinc_mg(aTHX_ a,b)
806-
# define sv_setsv(a,b) Perl_sv_setsv(aTHX,a,b)
807782
# define sv_setsv_flags(a,b,c) Perl_sv_setsv_flags(aTHX_ a,b,c)
808783
# define sv_setsv_mg(a,b) Perl_sv_setsv_mg(aTHX_ a,b)
809784
# define sv_setuv(a,b) Perl_sv_setuv(aTHX_ a,b)
@@ -812,7 +787,6 @@
812787
# define sv_strftime_ints(a,b,c,d,e,f,g,h) Perl_sv_strftime_ints(aTHX_ a,b,c,d,e,f,g,h)
813788
# define sv_strftime_tm(a,b) Perl_sv_strftime_tm(aTHX_ a,b)
814789
# define sv_string_from_errnum(a,b) Perl_sv_string_from_errnum(aTHX_ a,b)
815-
# define sv_taint(a) Perl_sv_taint(aTHX,a)
816790
# define sv_tainted(a) Perl_sv_tainted(aTHX_ a)
817791
# define sv_true(a) Perl_sv_true(aTHX_ a)
818792
# define sv_uni_display(a,b,c,d) Perl_sv_uni_display(aTHX_ a,b,c,d)
@@ -821,15 +795,10 @@
821795
# define sv_unref_flags(a,b) Perl_sv_unref_flags(aTHX_ a,b)
822796
# define sv_untaint(a) Perl_sv_untaint(aTHX_ a)
823797
# define sv_upgrade(a,b) Perl_sv_upgrade(aTHX_ a,b)
824-
# define sv_usepvn(a,b,c) Perl_sv_usepvn(aTHX,a,b,c)
825798
# define sv_usepvn_flags(a,b,c,d) Perl_sv_usepvn_flags(aTHX_ a,b,c,d)
826-
# define sv_usepvn_mg(a,b,c) Perl_sv_usepvn_mg(aTHX,a,b,c)
827799
# define sv_utf8_decode(a) Perl_sv_utf8_decode(aTHX_ a)
828-
# define sv_utf8_downgrade(a,b) Perl_sv_utf8_downgrade(aTHX,a,b)
829800
# define sv_utf8_downgrade_flags(a,b,c) Perl_sv_utf8_downgrade_flags(aTHX_ a,b,c)
830801
# define sv_utf8_encode(a) Perl_sv_utf8_encode(aTHX_ a)
831-
# define sv_utf8_upgrade(a) Perl_sv_utf8_upgrade(aTHX,a)
832-
# define sv_utf8_upgrade_flags(a,b) Perl_sv_utf8_upgrade_flags(aTHX,a,b)
833802
# define sv_utf8_upgrade_flags_grow(a,b,c) Perl_sv_utf8_upgrade_flags_grow(aTHX_ a,b,c)
834803
# define sv_vcatpvf(a,b,c) Perl_sv_vcatpvf(aTHX_ a,b,c)
835804
# define sv_vcatpvf_mg(a,b,c) Perl_sv_vcatpvf_mg(aTHX_ a,b,c)
@@ -2282,7 +2251,6 @@
22822251
# define sv_dup_inc(a,b) Perl_sv_dup_inc(aTHX_ a,b)
22832252
# endif /* defined(USE_ITHREADS) */
22842253
# if defined(USE_LOCALE_COLLATE)
2285-
# define sv_collxfrm(a,b) Perl_sv_collxfrm(aTHX,a,b)
22862254
# define sv_collxfrm_flags(a,b,c) Perl_sv_collxfrm_flags(aTHX_ a,b,c)
22872255
# if ( defined(PERL_CORE) || defined(PERL_EXT) ) && \
22882256
( defined(PERL_IN_LOCALE_C) || defined(PERL_IN_MATHOMS_C) || \

0 commit comments

Comments
 (0)