diff --git a/compiler/ncnv.pas b/compiler/ncnv.pas
index a6d63538a9..df4cc72f0c 100644
--- a/compiler/ncnv.pas
+++ b/compiler/ncnv.pas
@@ -2631,6 +2631,7 @@ implementation
                         (left.nodetype=loadn) then
                       begin
                         tloadnode(left).left:=cloadparentfpnode.create(tprocdef(tloadnode(left).symtable.defowner),lpf_forload);
+                        typecheckpass(tloadnode(left).left);
 
                         pi:=current_procinfo.get_first_nestedproc;
                         while assigned(pi) do
diff --git a/compiler/nld.pas b/compiler/nld.pas
index 6f819826eb..1d2de58edc 100644
--- a/compiler/nld.pas
+++ b/compiler/nld.pas
@@ -562,6 +562,7 @@ implementation
                 { parent frame pointer pointer as "self" }
                 left.free;
                 left:=cloadparentfpnode.create(tprocdef(p.owner.defowner),lpf_forpara);
+                typecheckpass(left);
               end;
           end
         { we should never go from nested to non-nested (except for an anonymous