method vblock b =
    b.blocals <- List.filter self#good_var b.blocals;
    DoChildren