Browse Source

* small fix to inclocked inlining changes

git-svn-id: trunk@1340 -
marco 20 years ago
parent
commit
8f50bb556e
1 changed files with 0 additions and 8 deletions
  1. 0 8
      rtl/i386/i386.inc

+ 0 - 8
rtl/i386/i386.inc

@@ -1093,16 +1093,8 @@ procedure cpuinclocked(var l : longint);assembler;
 {$ifndef REGCALL}
      movl       l,%eax
 {$endif}
-     { this check should be done because a lock takes a lot }
-     { of time!                                             }
-     cmpb       $0,IsMultithread
-     jz         .Linclockednolock
      lock
      incl       (%eax)
-     jmp        .Linclockedend
-.Linclockednolock:
-     incl       (%eax)
-.Linclockedend:
   end;
 
 // inline SMP check and normal lock.