/
n-dimens
/
pascalabcnet
Обзор
Документация
Войти
/
n-dimens
/
pascalabcnet
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
TestSuite/partial_constructor4.pas
17 строк
229 B
Sun Serega
fix #2440
09 фев 2021, 15:43
09 фев 2021, 15:43
f303ea1
Код
Авторство
О чём код?
var x := 0; type t1 = partial class end; t0 = class constructor := x := 1; constructor(p: byte) := x := 2; end; t1 = partial class(t0) end; begin new t1(5); Assert(x = 2); end.