Browse Source

cleanup

git-svn-id: branches/tg74/avx512-0037785@47352 -
tg74 4 years ago
parent
commit
7eb20b88a9
2 changed files with 5 additions and 11 deletions
  1. 0 5
      compiler/x86/aasmcpu.pas
  2. 5 6
      compiler/x86/rax86.pas

+ 0 - 5
compiler/x86/aasmcpu.pas

@@ -2186,11 +2186,6 @@ implementation
           begin
           begin
             if aInput.typ = top_ref then
             if aInput.typ = top_ref then
             begin
             begin
-              
-	      // TODO delete
-              Message1(asmr_w_segment_override_ignored_in_64bit_mode, '  "top_ref: " ' + generic_regname(aInput.ref^.base));
-
-
 	      if aInput.ref^.base <> NR_NO then
 	      if aInput.ref^.base <> NR_NO then
 	      begin	      
 	      begin	      
 	        if (aInput.ref^.offset <> 0) and
 	        if (aInput.ref^.offset <> 0) and

+ 5 - 6
compiler/x86/rax86.pas

@@ -1446,7 +1446,6 @@ procedure Tx86Instruction.SetInstructionOpsize;
   end;
   end;
 
 
 var
 var
-  iops: topsize;
   isBCastMemRef: boolean;
   isBCastMemRef: boolean;
 begin
 begin
   if opsize<>S_NO then
   if opsize<>S_NO then
@@ -1484,10 +1483,10 @@ begin
                   S_W :
                   S_W :
                     case tx86operand(operands[2]).opsize of
                     case tx86operand(operands[2]).opsize of
                       S_L :
                       S_L :
-                        iops:=S_WL;
+                        opsize:=S_WL;
   {$ifdef x86_64}
   {$ifdef x86_64}
                       S_Q :
                       S_Q :
-                        iops:=S_WQ;
+                        opsize:=S_WQ;
   {$endif}
   {$endif}
                       else
                       else
                         ;
                         ;
@@ -1496,12 +1495,12 @@ begin
                     begin
                     begin
                       case tx86operand(operands[2]).opsize of
                       case tx86operand(operands[2]).opsize of
                         S_W :
                         S_W :
-                          iops:=S_BW;
+                          opsize:=S_BW;
                         S_L :
                         S_L :
-                          iops:=S_BL;
+                          opsize:=S_BL;
   {$ifdef x86_64}
   {$ifdef x86_64}
                         S_Q :
                         S_Q :
-                          iops:=S_BQ;
+                          opsize:=S_BQ;
   {$endif}
   {$endif}
                         else
                         else
                           ;
                           ;