1. Pascal / Говнокод #19343

    −17

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    try
if (cs_parentMK.delta=null) and (changes_flag=false) then changes_flag:= false
else changes_flag:=true;
except
if changes_flag<>true then changes_flag:=false;
end;

    Вдруг boolean как здесь: http://govnokod.ru/3274

    Запостил: tucvbif, 24 Января 2016

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

    • ava inkanus-gray 20.02.2016 20:47 # 0

      Код повышенной надёжности. Вдруг все операторы перегружены?
      Ответить

      • ava bormand 20.02.2016 21:00 # 0

        В паскале?
        Ответить

        • ava kegdan 20.02.2016 21:12 # 0

          Да уж... в паскале может быть перегружен только мозг программиста
          Ответить

        • ava inkanus-gray 20.02.2016 22:00 # 0

          В FPC возможно всё:
          http://www.freepascal.org/~michael/ref/refch15.html

          http://www.freepascal.org/~michael/ref/refse88.html

          Даже оператор присвоения перегружается:
          http://www.freepascal.org/~michael/ref/refse89.html

          Ещё в TMT-Паскале (помним, скорбим) была перегрузка.
          Ответить

          • ava kegdan 20.02.2016 22:32 # 0

            >> TMT-

            Teenage mutant turtles!
            Ответить

            • ava inkanus-gray 21.02.2016 01:35 # 0

              Кстати, вики3_14дарам TMT-Паскаль не понравился:
              https://ru.wikipedia.org/wiki/Википедия:К_удалению/14_февраля_2011#TMT_Pascal
              Ответить

      • ava 1024-- 21.02.2016 04:27 # 0

        Ещё от перегрузки замены языка защищает. Заменить <> на != - и готов код на PHP или ещё каком языке со слабой типизацией.
        Ответить

      • ava tucvbif 23.02.2016 20:46 # 0

        От чего-то наподобие #define TRUE FALSE не спасёт.
        Ответить

    • ava guest 18.03.2016 10:16 # 0

      лаба
      Ответить

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