function mnew

static VALUE mnew(VALUE klass, VALUE obj, ID id, VALUE mklass)