(module test_22b1_orphan_class
  (class TShow
    (param a)
    (method tshow
      (type (fn-type (params a) (ret (con Str))))))
  (instance
    (class TShow)
    (type (con Int))
    (method tshow
      (body "<int>"))))