class RDoc::Context

def add_alias_impl(an_alias, meth)
  new_meth = RDoc::AnyMethod.new an_alias.text, an_alias.new_name
  new_meth.is_alias_for = meth
  new_meth.singleton    = meth.singleton
  new_meth.params       = meth.params
  new_meth.comment      = an_alias.comment
  meth.add_alias new_meth
  add_method new_meth
  # aliases don't use ongoing visibility
  new_meth.visibility = meth.visibility
  new_meth
end