2 set testname
"quad.s: quadword immediate values"
6 gas_start
"quad.s" "-al"
9 -re
"^ +2\[ \t\]+0000+ 7D8F7856\[ \t\]+movq\[^\n\]*\n" { set x1 1 }
10 -re
"^ +2\[ \t\]+3412DDCC\[^\n\]*\n" { set x2 1 }
11 -re
"^ +2\[ \t\]+BBAA5001\[ \t\]*\r\n" { set x3 1 }
13 timeout
{ perror
"timeout\n"; break }
18 if [all_ones $x1 $x2 $x3
] then { pass $testname
} else { fail $testname
}
21 if [istarget vax
-*-*] then {