1 2 3 4 5 6 7 8 9 10 11 12
{ Old file: tbs0346a.pp } { } unit ub0292; interface type word = system.word; implementation end.