瀏覽代碼

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

Sven/Sarah Barth 3 年之前
父節點
當前提交
c6aba5cd8d
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      compiler/procinfo.pas

+ 1 - 1
compiler/procinfo.pas

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