Lines Matching refs:sv1
5817 Perl_sv_eq(pTHX_ register SV *sv1, register SV *sv2)
5827 if (!sv1) {
5832 pv1 = SvPV(sv1, cur1);
5841 if (cur1 && cur2 && SvUTF8(sv1) != SvUTF8(sv2) && !IN_BYTES) {
5845 if (SvUTF8(sv1)) {
5864 if (SvUTF8(sv1)) {
5865 /* sv1 is the UTF-8 one,
5903 string in C<sv1> is less than, equal to, or greater than the string in
5911 Perl_sv_cmp(pTHX_ register SV *sv1, register SV *sv2)
5918 if (!sv1) {
5923 pv1 = SvPV(sv1, cur1);
5932 if (cur1 && cur2 && SvUTF8(sv1) != SvUTF8(sv2) && !IN_BYTES) {
5935 if (SvUTF8(sv1)) {
5993 Perl_sv_cmp_locale(pTHX_ register SV *sv1, register SV *sv2)
6005 pv1 = sv1 ? sv_collxfrm(sv1, &len1) : (char *) NULL;
6037 return sv_cmp(sv1, sv2);