working on new testmethods avx512-memref-operands - 'compressed disp8*N'

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

tests/utils/avx/avxopcodes.pas

@@ -3701,13 +3701,15 @@ begin
 
                   slHeader.Add('procedure writelnK7(aVal: dword);');
                   slHeader.Add('begin');
-                  slHeader.Add('  writeln(''K7: '' + ' + 'inttostr(aVal));');
+                  slHeader.Add('  write(''K7: '' + ' + 'inttostr(aVal));');
                   slHeader.Add('end;');
 
                   slHeader.Add('begin');
                   slHeader.Add('  for i := 0 to high(DataBlock) do');
                   slHeader.Add('   DataBlock[i] := cDataBlockByte[i mod 256];');
 
+                  slHeader.Add('  write(Paramstr(0) + '': '');');
+
                   slHeader.Add('  asm');
 
                   slHeader.Add('      vpxord   zmm0,  zmm0,  zmm0');
@@ -3747,6 +3749,7 @@ begin
 
 
                   slFooter.Add('  end;');
+                  slFooter.Add('  writeln(ParamStr(0));');
                   slFooter.Add('end.');
 
                 end;