/
n-dimens
/
pascalabcnet
Обзор
Документация
Войти
/
n-dimens
/
pascalabcnet
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
TestSuite/lambda_capture_T_3.pas
17 строк
219 B
Mikhalkovich Stanislav
bug fix #1418
17 июн 2019, 01:01
17 июн 2019, 01:01
7f52cc8
Код
Авторство
О чём код?
type t1<T>=class function p1(t: byte := 4): integer; end; function t1<T>.p1(t: byte): integer; begin var p: procedure := () -> begin Assert(t=4); end; p; end; begin t1&<integer>.Create.p1 end.