Страница 34

#241: Детектор рачьего свиста

26 ноября 2008, 12:45. рейтинг: 1295

Работаю программистом по автоматизации производства. Есть большой проект, который уже несколько лет хорошо и стабильно работает, но в него регулярно нужно вносить небольшие изменения в связи с модернизацией оборудования. И был в свое время у меня помошник, в образовании которого есть ряд существенных пробелов.

Итак, одно из таких изменений было внесено и шел процесс финального тестиро вания на экспериментальном стенде – все отлично, все работает и радует глаз. И тут понадобилось мне отлучиться. Прихожу – оборудование стоит, никаких аварийных сообщений нет. Ненормально и совершенно непригодно для реальной эксплуатации. Пробую еще несколько раз: оборудование останавливается в произвольные моменты времени без всяких на то причин! А надо сказать, что проект сделан в среде Ult raLogik, у которой с возможностями отладки большие проблемы. Поэтому самый верный способ поиска ошибок – это медленное и вдумчивое курение исходников. И вот при очередной итерации этого увлекательного процесса я обнаруживаю следующую проце дуру, написанную моим горе-помошником.

procedure FBDBLOCK(var Input: integer;

var FromValue : integer;

var ToValue : integer;

var Output : boolean);

var

prevvalue: integer;

begin

Output:=false;

if (Input=ToValue) and (prevvalue=FromValue) then Output:=true;

prevvalue:=Input;

end;

Фанфары, мат и желание дать в репу! У него оборудование выключается, когда на систему снизойдёт вселенская благодать и случайное значение неинициализиро ванной переменной совпадёт с нужным!

Хорошо, что это был первый раз, когда эта процедура реально использовалась.

#242: Хотел как лучше

26 ноября 2008, 12:45. рейтинг: 1817

У меня случай был.

Выдал новому сотруднику новый комп.

Через полчаса он приходит ко мне со слегка виноватым, но умным взглядом и спрашивает, есть ли у меня установочный диск XP. Думаю, домой просит. Может, винда слетела, он же продвинутый пользователь!

Я говорю:

– Есть, держи!

Но на всякий случай интересуюсь:

– А зачем? (глупый, конечно, вопрос)

– Надо ось поставить, – деловито сообщают мне.

– Где? – не унимаюсь я.

– На компе!

– На каком?

– На рабочем! – отвечает сотрудник, а глазки хитро так бегают.