> -- Сергей Губанов писал(а):
> TYPE    Data* = RECORD      x*, y*, z*, u*, v*, w*, p*, q*, r*: REAL    END;

Кстати, хотелось бы узнать хоть один осмысленный пример существования такой структуры с мусором внутри. В обероне нельзя создавать и возвращать из функций структуры (только передавать по ссылке и инитить)?