add new option to avxtestgenerator to list opcodes-memrefsize-state

git-svn-id: branches/tg74/avx512-0037785@47764 -

tests/utils/avx/avxopcodes.pas

@@ -10,6 +10,8 @@ type
 
   TTestFileTyp = (tfNasm, tfFPC, tfFasm, tfFPCInc, tfFPCMRef);
 
+  { TAVXTestGenerator }
+
   TAVXTestGenerator = class(TObject)
   private
     FOpCodeList: TStringList;
@@ -23,6 +25,7 @@ type
     destructor Destroy; override;
 
     function MakeTestFiles(aTyp: TTestFileTyp; aX64, aAVX512, aSAE: boolean; aDestPath: String): boolean;
+    procedure ListMemRefState;
 //    function MakeTestFilesMREF(aTyp: TTestFileTyp; aX64, aAVX512, aSAE: boolean; aDestPath: String): boolean;
 
     property OpCodeList: TStringList read FOpCodeList write FOpCodeList;
@@ -3588,5 +3591,10 @@ begin
   end;
 end;
 
+procedure TAVXTestGenerator.ListMemRefState;
+begin
+  TAsmTestGenerator.ListMemRefState;
+end;
+
 end.
 

tests/utils/avx/avxtestgenerator.lpi

@@ -1,7 +1,7 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <CONFIG>
   <ProjectOptions>
-    <Version Value="9"/>
+    <Version Value="11"/>
     <PathDelim Value="\"/>
     <General>
       <Flags>
@@ -22,9 +22,16 @@
     </PublishOptions>
     <RunParams>
       <local>
-        <FormatVersion Value="1"/>
-        <CommandLineParams Value="-ffpcmref -px8664 -o\home\torsten\tmp\fpc\fpc"/>
+        <CommandLineParams Value="-l"/>
       </local>
+      <FormatVersion Value="2"/>
+      <Modes Count="1">
+        <Mode0 Name="default">
+          <local>
+            <CommandLineParams Value="-l"/>
+          </local>
+        </Mode0>
+      </Modes>
     </RunParams>
     <Units Count="4">
       <Unit0>

tests/utils/avx/avxtestgenerator.pp

@@ -42,10 +42,12 @@ begin
         writeln('make avx assembler-testfiles');
         writeln('');
         writeln('-h  help');
-        writeln('-f  [fpc,nasm,fasm,fpcinc] outputformat');
-        writeln('-p  [x8664] codegenerator for x86_64 platform');
+        writeln('-f  [fpc,fpcmref,nasm,fasm,fpcinc] outputformat');
+        writeln('-l  list opcode-memrefsize-states');
         writeln('-o  destination path');
+        writeln('-p  [x8664] codegenerator for x86_64 platform');
         writeln('-z  avx512');
+
         writeln('');
       end
       else
@@ -59,6 +61,7 @@ begin
           'n': MakeTestFiles(tfNasm, x64, AVX512, false, Path);
           'I': MakeTestFiles(tfFPCInc, x64, AVX512, false, Path);
           'm': MakeTestFiles(tfFPCMRef, x64, AVX512, false, Path);
+          'l': ListMemRefState;
         end;
       end;
     finally

tests/utils/avx/options.pas

@@ -101,6 +101,7 @@ begin
                 Fx64 := true;
               end
               else IsInvalidParam := true;
+         'l': FOutputFormat := 'l';
          'z': FAVX512 := true;
          'o': if sValue <> '' then
               begin