mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-07 15:28:08 +02:00
bb00c76fe7
symdef.pas: * tobjectdef.find_implemented_interface: use equal_defs to ensure that equal specializations of interfaces are found as well * getparaencoding: use globals.CP_NONE instead of just CP_NONE, because defcmp contains a cp_none enum as well. + added test git-svn-id: trunk@25609 -
14 lines
125 B
ObjectPascal
14 lines
125 B
ObjectPascal
{ %NORUN }
|
|
|
|
program tw21015;
|
|
|
|
{$mode delphi}
|
|
|
|
uses
|
|
uw21015;
|
|
|
|
var
|
|
x: IIntTest;
|
|
begin
|
|
x := TGenImpl<Integer>.Create;
|
|
end. |