let
  class A extends Object {}
  /* <- @keyword.type */
  /*      ^ @keyword */
  /*              ^ @type.builtin */

  type B = class extends A {
  /*       ^ @keyword.type */
  /*             ^ @keyword */
  /*                     ^ @type */

    var a := 12

    method meth() : int = self.a
    /* <- @keyword.function */
    /*     ^ @function.method */
    /*                    ^ @variable.builtin */
  }

  var object := new B
  /*            ^ @keyword.operator */
in
  object.a := 27;
  /*     ^ @variable.member */

  object.meth()
  /*     ^ @function.method */
end
/* vim: set ft=tiger: */