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 {