Куча говна / Говнокод #1073 Ссылка на оригинал

0

  1. 1
  2. 2
  3. 3
  4. 4
  5. 5
  6. 6
  7. 7
  8. 8
  9. 9
  10. 10
  11. 11
  12. 12
  13. 13
  14. 14
PROCEDURE changeValue ( KeyStore:IN OUT Keys'Class; value: IN INTEGER ) 
  IS 
  BEGIN
   IF value = 1024 THEN
      Message ( "NOT IN RANGE" );
   ELSIF value = 2048 THEN
      Message ( "OUT OF RANGE" );
   ELSIF value = KeyStore.def THEN

     KeyStore.val = value;
  ELSE
    Message ( "IN RANGE");
 END IF;
 END changeValue;

Какой-то наркоманский код.
Трезвый такого не напишет.
Почему приходится дорабатывать такое... будто за кем-то ж.. подтираешь:)

Запостил: guest guest, (Updated )

Комментарии (1) RSS

  • ava guest # Ссылка на оригинал 0

    Похоже на инфу для отладки.
    Наверно в реальном коде этих условий не будет.
    Ответить

Добавить комментарий

Из-за тебя ушел bormand, guest!

    А не использовать ли нам bbcode?

    ↑
    8
    ↓