/
n-dimens
/
pascalabcnet
Обзор
Документация
Войти
/
n-dimens
/
pascalabcnet
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
TestSuite/debug1.pas
10 строк
146 B
Бондарев Иван
#159
26 май 2016, 14:16
26 май 2016, 14:16
6ccd444
Код
Авторство
О чём код?
begin var i: integer; {$IFDEF DEBUG} i := 2; {$ENDIF} {$IFDEF RELEASE} i := 3; {$ENDIF} assert(i = {$IFDEF DEBUG}2{$ELSE}3{$ENDIF}); end.