From c5cc20572a7b4b286b81c43cfa00d9f5ee546b2f Mon Sep 17 00:00:00 2001 From: Ivan Bondarev Date: Sun, 12 Mar 2023 11:08:45 +0100 Subject: [PATCH] #2818 --- TestSuite/generics67.pas | 5 +++++ TestSuite/ns.dll | Bin 0 -> 4096 bytes .../TreeConversion/syntax_tree_visitor.cs | 2 +- 3 files changed, 6 insertions(+), 1 deletion(-) create mode 100644 TestSuite/generics67.pas create mode 100644 TestSuite/ns.dll diff --git a/TestSuite/generics67.pas b/TestSuite/generics67.pas new file mode 100644 index 000000000..58baae3f4 --- /dev/null +++ b/TestSuite/generics67.pas @@ -0,0 +1,5 @@ +{$reference 'ns.dll'} +begin + var v1:= new ns.c2; + v1.Name&(); +end. \ No newline at end of file diff --git a/TestSuite/ns.dll b/TestSuite/ns.dll new file mode 100644 index 0000000000000000000000000000000000000000..a3b7d6a4ea54451a9e20c9fd0b0e95a7d706715f GIT binary patch literal 4096 zcmd^BU2GIp6h5=tmZdXjVTa#VdHr54%mg5E`K_!~eJl`|H$=DJgIMGIoDo7xD z%@ei@LynbZFnF&fj4DVF4OX#|T;#d}IJOAY)4WRbNj;Im!hZpc)U_+pxfwBb(bl*^ zoF4XSrq;&2)WA9f*3dBReicH?`peqxh>^46D-C zeqjs>Knn(+UIi3-yh6f$Khw{Txw(=p4w2()Iol?)8x)y6RPasLv#l(p7W_aIXd-)3 zm;sF&1wm=j%)s?1FM{Jz5ZY){B`2^7LYo$zZ@CUGB&7`xR)_KEiPNrkY9PQp&6WaD z-d39uCv5BsYZ~x;uI#AiSJGIHl8jZ*CEGnwh_eRtoj!%L^YibpKk zNwGRrQJNS<>VcXMG8v1mQ)0uop4#|Odg-$4E0^E}egPFqH?=IObjvT=#sXiyExblu z(x`pw6pG*uQ@wmAwkp)LbeL*Syr&nhBOYI=1i>#Q(Jp>E(vj93fkouPSC$eWg) z_1x3Gv|Z}McrR%uM4jk+omf7V(o;8%w4QwIr;i3MeR}Tv+1Ee+mRFe1W{&#!C1k9u z>*O*Mj?g`8PGofVRH-0v6Edk;!z=1y4*jX9;wthl%+EOT-_4%P$fE?W6?0jR^8W{R zxrcJ(A26*lwHhkDwpMdI>3X_tj~SK|zDGjHM~bcP?ZIC1>!o(hf5mZ^A=*Z?SnGi= z4&gOkEoVFac6cR$p3Ik~3|At3pr$EB$AO1v3e*Tq&^Y)J;KQI9zN!2D?@G75FxJ-2 zG|w+eZTPZRZ7ZcZu!3C;^01GEZv}xp9Xdg-)bE!4APubnsSmwD0qk6GAzZE7h)os5 z6u`=YJio?HzaeP_Sy%r0D9bg#;I35htiwB+iQK1H_5BSISiCfu|nA(*fw0J}1g+xI*l+k^^&V`|gyrnZ!C55tUFEw9_T)Fjn3_ yjIq{kWn~^#mm@OI0o2k*t_7TqjVx8%jM@r6Y#)y2kp(sU=Dl>_k*&ZZo%lZu&=KVT literal 0 HcmV?d00001 diff --git a/TreeConverter/TreeConversion/syntax_tree_visitor.cs b/TreeConverter/TreeConversion/syntax_tree_visitor.cs index 343662df7..bb76ea37f 100644 --- a/TreeConverter/TreeConversion/syntax_tree_visitor.cs +++ b/TreeConverter/TreeConversion/syntax_tree_visitor.cs @@ -5219,7 +5219,7 @@ namespace PascalABCCompiler.TreeConverter foreach (SymbolInfo func in funcs) { function_node f = func.sym_info as function_node; - if (f.is_generic_function) + if (f != null && f.is_generic_function) { //Проверяем на совпадение bool found = false;