Kaynağa Gözat

* initialize dirhint field of created tasmconds

git-svn-id: trunk@20800 -
Jonas Maebe 13 yıl önce
ebeveyn
işleme
23df85e52a

+ 1 - 0
compiler/powerpc/cpubase.pas

@@ -500,6 +500,7 @@ implementation
 
     procedure create_cond_norm(cond: TAsmCondFlag; cr: byte;var r : TasmCond);
       begin
+        r.dirhint := DH_None;
         r.simple := true;
         r.cond := cond;
         case cond of

+ 1 - 0
compiler/powerpc64/cpubase.pas

@@ -499,6 +499,7 @@ end;
 
 procedure create_cond_norm(cond: TAsmCondFlag; cr: byte; var r: TasmCond);
 begin
+  r.dirhint := DH_None;
   r.simple := true;
   r.cond := cond;
   case cond of