Lines Matching refs:Locals

583   Locals: TLocalStorage;
585   Locals.Initialize;
587     Locals.AsInteger['x'] := 2;
588     Locals.AsInteger['X'] := 3;
589     CheckEquals(2, Locals.AsInteger['x']);
590     CheckEquals(3, Locals.AsInteger['X']);
591     CheckEquals(0, Locals.AsInteger['y']);
592     Locals.AsInteger['X'] := Locals.AsInteger['x'] * 2;
593     CheckEquals(4, Locals.AsInteger['X']);
594     CheckEquals(2, Locals.Count);
596     Locals.Finalize;
602   Locals: TLocalStorage;
604   Locals.Initialize;
608     Locals['Z'] := TANTLRString.Create('Value Z');
610     Locals['x'] := TANTLRString.Create('Value x');
611     Locals['X'] := TANTLRString.Create('Value X');
612     CheckEquals('Value x', (Locals['x'] as IANTLRString).Value);
613     CheckEquals('Value X', (Locals['X'] as IANTLRString).Value);
614     Check(Locals['y'] = nil);
616     Locals['X'] := TANTLRString.Create(
617       (Locals['X'] as IANTLRString).Value + ' Update');
618     CheckEquals('Value X Update', (Locals['X'] as IANTLRString).Value);
619     CheckEquals(3, Locals.Count);
621     Locals.Finalize;