This commit is contained in:
parent
2d891e9998
commit
416172164d
8
TestSuite/errors/err0506.pas
Normal file
8
TestSuite/errors/err0506.pas
Normal file
|
|
@ -0,0 +1,8 @@
|
|||
//!Обобщённая функция p1 не может быть вызвана с данным набором фактических параметров
|
||||
procedure p1<T1>(d: T1->()) := exit;
|
||||
|
||||
function f(b: byte) := 0;
|
||||
|
||||
begin
|
||||
p1(f);
|
||||
end.
|
||||
|
|
@ -1069,6 +1069,8 @@ namespace PascalABCCompiler.TreeRealization
|
|||
{
|
||||
if (fact_type == null)//issue #347
|
||||
return false;
|
||||
if (formal_type == null)
|
||||
return false;
|
||||
if (formal_type.generic_function_container == null && fact_type.generic_function_container != null)
|
||||
{
|
||||
//swap
|
||||
|
|
|
|||
Loading…
Reference in a new issue