Select Code to Download

T_TIED_HASH

...

                $arg = newRV_noinc((SV*)hash);
        }

my $obj = new TiedXS(1);

ok($obj);
ok(tied $obj);