Говнокод

procedure ChangeChar(var c: char; val: char);
begin
  c := val;
end;

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

Запостил:

Morgoth, 26.09.2018 (Updated 26.09.2018)

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

OBEH 8 лет ago # 0

Христа ради...
Ответить
- TOPT 8 лет ago # 0 ⇈
  
  У гнилей нет бога
  Ответить
  - Morgoth 8 лет ago # 0 ⇈
    
    А у гOBEH есть...
    Ответить
- Morgoth 8 лет ago # 0 ⇈
  Только ради него:
```
function ChangeChar(&$c, $val) {
$c = $val;
}
```
  Ответить
- guest 8 лет ago # 0 ⇈
  
  ты гной
  Ответить
Elvenfighter 8 лет ago # 0

Ежели в поцкале есть функциональщина, то сойдет как костыль для преобразования.
Ответить
- Steve_Brown 8 лет ago # 0 ⇈
  
  Да вообще контекст надо смотреть. Указатели на функцию-то там точно есть, условная компиляция вроде тоже...
  Ответить
  - Morgoth 8 лет ago # 0 ⇈
    
    Да-да, но это не фуекция, а процедура, часть стандартной библиотеки, а пипизация в паскале строгая – там, где нужна ыункция вряд ли пропиздуоюрину сунешь.
    Ответить
    - Steve_Brown 8 лет ago # 0 ⇈
      
      Не придирайся к терминологии.
      Ответить
  - OBEH 8 лет ago # 0 ⇈
    
    Зато в "PHP" всей этой хуеты нет. Поэтому я за "PHP".
    Ответить
    - Morgoth 8 лет ago # 0 ⇈
      
      Я промахнулся
      http://govnokod.ru/24816#comment431328
      Ответить
Morgoth 8 лет ago # 0

В пхп есть коллбеки, но они какие-то сранные. А вот насчет условной компиляции незнаю, но можно пхп препроцессить пхп, гуест где-то примером уже насирал.
Ответить
Iroquois 8 лет ago # 0
Должно быть хотя бы
```
procedure ChangeChar(var c: char;  var val: char);
var b:char;
begin
  b:=c;
  c := val;
  val:=b;
end;
```
Ответить
- KRPT_DDD 8 лет ago # 0 ⇈
  
  Н ТГД Т XCHNGCHR.
  Ответить