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

    −1

    1. 1
    2. 2
    3. 3
    4. 4
    procedure ChangeChar(var c: char; val: char);
begin
  c := val;
end;

    Это из модуля PABCSystem. Но зачем?

    Запостил: Morgoth, 26 Сентября 2018

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

    • ava OBEH 26.09.2018 05:56 # −3

      Христа ради...
      Ответить

    • ava Elvenfighter 26.09.2018 10:59 # −1

      Ежели в поцкале есть функциональщина, то сойдет как костыль для преобразования.
      Ответить

      • ava Steve_Brown 26.09.2018 12:05 # −1

        Да вообще контекст надо смотреть. Указатели на функцию-то там точно есть, условная компиляция вроде тоже...
        Ответить

        • ava Morgoth 26.09.2018 15:29 # −1

          Да-да, но это не фуекция, а процедура, часть стандартной библиотеки, а пипизация в паскале строгая – там, где нужна ыункция вряд ли пропиздуоюрину сунешь.
          Ответить

        • ava OBEH 27.09.2018 11:04 # −1

          Зато в "PHP" всей этой хуеты нет. Поэтому я за "PHP".
          Ответить

    • ava Morgoth 27.09.2018 11:09 # −1

      В пхп есть коллбеки, но они какие-то сранные. А вот насчет условной компиляции незнаю, но можно пхп препроцессить пхп, гуест где-то примером уже насирал.
      Ответить

    • ava Iroquois 03.10.2018 07:38 # −1

      Должно быть хотя бы
      procedure ChangeChar(var c: char;  var val: char);
var b:char;
begin
  b:=c;
  c := val;
  val:=b;
end;
      Ответить

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