Select Code to Download

use warnings;
use Inline C => Config =>
...

test($ref);

#define SvNSIV(sv) ( SvNOK(sv) ? SvNVX(sv) : ( SvSIOK(sv) ? SvIVX(sv) 
+: sv_2nv(sv) ) )
...
    const NV nv1 = SvNSIV(a);