mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-07 04:28:00 +02:00

pgenutil.pas: + add new function could_be_generic which checks whether a given symbol name could be a generic (which is determined using the genericdummysyms list for the current module) pexpr.pas: * factor: only do a typecheck pass (postfixoperators does one as well) if the found node can not be a generic type * sub_expr: do a typecheck pass if it isn't a specialization + added test git-svn-id: trunk@25579 -
17 lines
213 B
ObjectPascal
17 lines
213 B
ObjectPascal
{ %NORUN }
|
|
|
|
program tw24867;
|
|
|
|
{$MODE DELPHi}{$H+}
|
|
{$APPTYPE CONSOLE}
|
|
|
|
uses
|
|
fgl;
|
|
|
|
var
|
|
d: TFPGMap<string, string>; // ok
|
|
begin
|
|
d := TFPGMap<string, string>.Create; // Error: This type can't be a generic
|
|
end.
|
|
|