/
n-dimens
/
pascalabcnet
Обзор
Документация
Войти
/
n-dimens
/
pascalabcnet
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
TestSuite/lambda_capture_T_1.pas
16 строк
228 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) := t -> begin Assert(t=3); end; p(3); end; end; begin t1&<integer>.Create.p1 end.