The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

TYPEMAP
mvr        T_MVR


INPUT
T_MVR
        $var = mvr_from_sv(aTHX_ $arg);

OUTPUT
T_MVR
        sv_set_mvr(aTHX_ $arg, $var);