match: Check the number of elements in broadcasting operands
[nasm/avx512.git] / test / riprel.pl
blob61af72399a34ffd5837192449f2f2410d6b67a8e
1 #!/usr/bin/perl
3 print ";Testname=unoptimized; Arguments=-fbin -oriprel.bin -O0; Files=stdout stderr riprel.bin\n";
4 print ";Testname=optimized; Arguments=-fbin -oriprel.bin -Ox; Files=stdout stderr riprel.bin\n";
7 print "\tbits 64\n";
9 foreach $mode ('abs', 'rel') {
10 print "\n\tdefault $mode\n\n";
12 foreach $so ('', 'fs:', 'es:') {
13 foreach $rq ('', 'abs ', 'rel ') {
14 foreach $ao ('', 'a64 ', 'a32 ') {
15 foreach $sq ('', 'dword ', 'qword ') {
16 foreach $v ('foo', '0xaaaaaaaaaaaaaaaa', '0xbbbbbbbb',
17 '0xffffffffcccccccc') {
18 foreach $r ( 'al', 'bl', 'ax', 'bx', 'eax', 'ebx', 'rax', 'rbx') {
19 print "\tmov $r,[$ao$rq$sq$so$v]\n";
22 print "\n";
29 print "\nfoo:\n";