- removed inlining_procedure global var (artefact from pass_2 inlining)

git-svn-id: trunk@6266 -

compiler/aasmtai.pas

@@ -780,8 +780,7 @@ implementation
     constructor tailineinfo.create;
      begin
        inherited create;
-       if not(inlining_procedure and
-              (cs_gdb_valgrind in current_settings.globalswitches)) then
+       if not(cs_gdb_valgrind in current_settings.globalswitches) then
          fileinfo:=current_filepos;
      end;
 

compiler/globals.pas

@@ -248,7 +248,6 @@ interface
                                            proc calls to proc loads in firstcalln }
        compile_level : word;
        resolving_forward : boolean;      { used to add forward reference as second ref }
-       inlining_procedure : boolean;     { are we inlining a procedure }
        exceptblockcounter    : integer;  { each except block gets a unique number check gotos      }
        aktexceptblock        : integer;  { the exceptblock number of the current block (0 if none) }
        LinkLibraryAliases : TLinkStrMap;
@@ -1086,7 +1085,6 @@ implementation
         do_make:=true;
         compile_level:=0;
         DLLsource:=false;
-        inlining_procedure:=false;
         resolving_forward:=false;
         paratarget:=system_none;
         paratargetasm:=as_none;

compiler/pass_2.pas

@@ -161,8 +161,6 @@ implementation
             oldcodegenerror:=codegenerror;
             oldlocalswitches:=current_settings.localswitches;
             oldpos:=current_filepos;
-            if not inlining_procedure then
-              current_filepos:=p.fileinfo;
             current_settings.localswitches:=p.localswitches;
             codegenerror:=false;
 {$ifdef EXTDEBUG}