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