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

    +81

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    8. 8
    var
          sMem: String;
    .......
    case Byte(sMem[len]) of
          Word('k'): { Что то делаем };
          Word('m'): { Что то делаем };
          Word('g'): { Что то делаем };
    end;

    Вот такой вот гавнокод

    Запостил: haker, 25 Января 2013

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

    • без контекста говнокодистость неочевидна.
      даже если чтотоделаем идентичны. ибо -- пока идентичны.
      Ответить
      • Приводить к байту и ворду зачем было?
        Ответить
        • это обусловлено тем что нужно было провести для символа из строки проверку через case...
          А case не умеет работать со строками в явном виде, вот и пришлось приводить к числам
          Ответить
          • Дык с чарами он вполне работает. Тарас прав, что-то типа такого должно работать:
            cast sMem[len] of
              'k': { что-то делаем };
              'g': { что-то делаем };
              '/': { что-то делаем };
              'a': { что-то делаем };
              'm': { что-то делаем };
            end;
            Ответить
            • > Дык с чарами он вполне работает
              Это даже говно мамонта может с чарами, а FPC, к примеру, нормально кейсит по строкам.
              Ответить
          • Это не строки, Михалыч
            Ответить
          • Это не строки, а символы.
            Код действительно говно, поэтому я плюсанул, откуда -6?
            Говно, никак не влияющее на выхлоп компилятора, но и нахрен не нужное.
            Ответить
            • Наверное люди забыли где находятся. Люди тут за гавнокод плюсуют!
              Ответить
              • авнокод
                Это ты забыл где ты находишься. На говнокоде делают так, как хотят.
                Ответить
    • http://risovach.ru/upload/2012/01/comics_Dajver_orig_1325446401.jpg
      Ответить

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