17 lines
437 B
ObjectPascal
17 lines
437 B
ObjectPascal
type
|
||
cd1<T,C>=class
|
||
end;
|
||
cd2<T,C>=record
|
||
end;
|
||
cd3<T,C>=template //тожесамое что template class
|
||
end;
|
||
cd4<T,C>=template class
|
||
end;
|
||
cd5<T,C>=template record
|
||
end;
|
||
cd6<T,C>=interface //Выдавать ошибку "Интерфейс не может иметь......" Тожесамое с секциией where для классов, записей.....
|
||
end;
|
||
|
||
begin
|
||
|
||
end. |