Explorar o código

* make tprocinfo.addnestedproc public so that it can be used to add generated functions

Sven/Sarah Barth %!s(int64=3) %!d(string=hai) anos
pai
achega
c6aba5cd8d
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      compiler/procinfo.pas

+ 1 - 1
compiler/procinfo.pas

@@ -57,7 +57,6 @@ unit procinfo;
           nestedprocs : tlinkedlist;
           nestedprocs : tlinkedlist;
           { required alignment for this stackframe }
           { required alignment for this stackframe }
           fstackalignment : longint;
           fstackalignment : longint;
-          procedure addnestedproc(child: tprocinfo);
        public
        public
           { pointer to parent in nested procedures }
           { pointer to parent in nested procedures }
           parent : tprocinfo;
           parent : tprocinfo;
@@ -179,6 +178,7 @@ unit procinfo;
           function get_first_nestedproc: tprocinfo;
           function get_first_nestedproc: tprocinfo;
           function has_nestedprocs: boolean;
           function has_nestedprocs: boolean;
           function get_normal_proc: tprocinfo;
           function get_normal_proc: tprocinfo;
+          procedure addnestedproc(child: tprocinfo);
 
 
           procedure add_local_ref_sym(sym:tsym);
           procedure add_local_ref_sym(sym:tsym);
           procedure export_local_ref_syms;
           procedure export_local_ref_syms;