Ticket #869: ticket_18B.ObjectReferencesAndDecompilation.tol

//////////////////////////////////////////////////////////////////////////////
// Compílese aparte estas líneas (con F11, en el Eval u otro archivo)
/*
Class @Element {
  Text _.info;
  Anything GetThis(Real void){ _this }
};

NameBlock Container = [[
  Set _.elements = Copy(Empty);
  Real CreateElement(Text info) {
    @Element element = [[
      Text _.info = info
    ]];
    Set Append(_.elements, [[element]]);
  0};
  @Element GetElement(Real index) {
    _.elements[index]
  };
  Anything GetElementThis(Real index) {
    @Element element = _.elements[index];
    element::GetThis(?)
  }
]];

Real Container::CreateElement("nota");
*/
//////////////////////////////////////////////////////////////////////////////
// Compílese esta línea (con F9) y decompílese (con F8)

@Element algo = Container::GetElement(1);

//////////////////////////////////////////////////////////////////////////////
// Compílese aparte esta línea (con F11, en el Eval u otro archivo)
// y se obtendrá el error

// Anything ea = Container::GetElementThis(1);

//////////////////////////////////////////////////////////////////////////////