Select Code to Download

T_dbtkeydatum_btree
        {
...
                $var.size = (int)len;
            }
        }

            SV* my_sv = ST(1) ;
            DBM_ckFilter(my_sv, filter_store_key, "filter_store_key");
            DBT_clear(key) ;
            SvGETMAGIC(ST(1)) ;

            SV* my_sv = ST(1) ;
            SvGETMAGIC(ST(1)) ;
            DBM_ckFilter(my_sv, filter_store_key, "filter_store_key");
            SvSETMAGIC(ST(1)) ;
            DBT_clear(key) ;