Lines Matching refs:qq
192 print qq|static void $test(void)\n|;
193 print qq|\{\n|;
233 print qq| $ArgTypes{$type} $name = \{ .$subtype = \{|;
239 print qq|,| if $valuec > 0;
240 print qq| $value$SubTypeSuffixes{$subtype}|;
244 print qq| \} \};\n|;
270 print qq| $ArgTypes{$type} $name = \{ .$subtype = \{|;
276 print qq|,| if $valuec > 0;
277 print qq| $value$SubTypeSuffixes{$subtype}|;
281 print qq| \} \};\n|;
355 print qq| $ArgTypes{$type} $name = \{ .$subtype = \{|;
361 print qq|,| if $valuec > 0;
362 print qq| $value$SubTypeSuffixes{$subtype}|;
366 print qq| \} \};\n|;
392 print qq| $ArgTypes{$type} $name = \{ .$subtype = \{|;
398 print qq|,| if $valuec > 0;
399 print qq| $value$SubTypeSuffixes{$subtype}|;
403 print qq| \} \};\n|;
480 print qq| $ArgTypes{$type} $name|;
481 print qq| = arg$index| if $type =~ /^m(8|16|32|64|128)$/;
482 print qq|;\n|;
503 print qq| $ArgTypes{$type} $name;\n|;
522 print qq| $ArgTypes{$type} $name;\n|;
540 print qq| $ArgTypes{eflags} $name;\n|;
564 print qq| $ArgTypes{fpucw} $name;\n|;
588 print qq| $ArgTypes{fpusw} $name;\n|;
637 print qq| char state\[108\];\n|;
638 print qq|\n|;
639 print qq| if (sigsetjmp(catchpoint, 1) == 0)\n|;
640 print qq| \{\n|;
641 print qq| asm\(\n|;
642 print qq| \"fsave %$stateargnum\\n\"\n|;
650 print qq| \"movb %$arg->{argnum}, %%$arg->{register}\\n\"\n|;
654 print qq| \"movw %$arg->{argnum}, %%$arg->{register}\\n\"\n|;
658 print qq| \"movl %$arg->{argnum}, %%$arg->{register}\\n\"\n|;
662 print qq| \"movq %$arg->{argnum}, %%$arg->{register}\\n\"\n|;
666 print qq| \"movlps %$arg->{argnuml}, %%$arg->{register}\\n\"\n|;
667 print qq| \"movhps %$arg->{argnumh}, %%$arg->{register}\\n\"\n|;
681 print qq| \"flds %$arg->{argnum}\\n\"\n|;
685 print qq| \"fldl %$arg->{argnum}\\n\"\n|;
690 print qq| \"fldz\\n\"\n|;
696 print qq| \"pushfl\\n\"\n|;
697 print qq| \"andl \$$eflagsmask, (%%esp)\\n\"\n| if defined($eflagsmask);
698 print qq| \"orl \$$eflagsset, (%%esp)\\n\"\n| if defined($eflagsset);
699 print qq| \"popfl\\n\"\n|;
704 print qq| \"subl \$2, %%esp\\n\"\n|;
705 print qq| \"fstcw (%%esp)\\n\"\n|;
706 print qq| \"andw \$$fpucwmask, (%%esp)\\n\"\n| if defined($fpucwmask);
707 print qq| \"orw \$$fpucwset, (%%esp)\\n\"\n| if defined($fpucwset);
708 print qq| \"fldcw (%%esp)\\n\"\n|;
709 print qq| \"addl \$2, %%esp\\n\"\n|;
712 print qq| \"$insn|;
722 print qq|$prefix%%$arg->{register}|;
730 print qq|$prefix%%$register|;
736 print qq|$prefix%$arg->{result}->{argnum}|;
740 print qq|$prefix%$arg->{argnum}|;
745 print qq|$prefix\$$arg->{value}|;
751 print qq|\\n\"\n|;
759 print qq| \"movb %%$result->{register}, %$result->{argnum}\\n\"\n|;
763 print qq| \"movw %%$result->{register}, %$result->{argnum}\\n\"\n|;
767 print qq| \"movl %%$result->{register}, %$result->{argnum}\\n\"\n|;
771 print qq| \"movq %%$result->{register}, %$result->{argnum}\\n\"\n|;
775 print qq| \"movlps %%$result->{register}, %$result->{argnuml}\\n\"\n|;
776 print qq| \"movhps %%$result->{register}, %$result->{argnumh}\\n\"\n|;
784 print qq| \"pushfl\\n\"\n|;
785 print qq| \"popl %$result->{argnum}\\n\"\n|;
789 print qq| \"fstcw %$result->{argnum}\\n\"\n|;
793 print qq| \"fstsw %$result->{argnum}\\n\"\n|;
803 print qq| \"fstps %$result->{argnum}\\n\"\n|;
807 print qq| \"fstpl %$result->{argnum}\\n\"\n|;
812 print qq| \"fincstp\\n\"\n|;
816 print qq| \"frstor %$stateargnum\\n\"\n|;
817 print qq| \"cld\\n\"\n|;
819 print qq| :|;
827 print qq|$prefix\"=m\" \($result->{name}.uq[0]\), \"=m\" \($result->{name}.uq[1]\)|;
831 print qq|$prefix\"=m\" \($result->{name}\)|;
837 print qq|\n|;
847 print qq|$prefix\"m\" \($arg->{name}.uq[0]\), \"m\" \($arg->{name}.uq[1]\)|;
851 print qq|$prefix\"m\" \($arg->{name}\)|;
858 print qq|$prefix\"m\" \(state[0]\)\n|;
866 print qq|$prefix\"$arg->{register}\"|;
871 print qq|\n|;
873 print qq| \);\n|;
874 print qq|\n|;
878 print qq| if \(|;
891 print qq|${prefix}\($result->{name}.ud[0] & $values[0]UL\) == $values[1]UL|;
895 print qq|${prefix}\($result->{name}.uw[0] & $values[0]\) == $values[1]|;
903 print qq|${prefix}eq_float($result->{name}.$subtype\[$value\], $values[$value]$suffix)|;
907 print qq|${prefix}eq_double($result->{name}.$subtype\[$value\], $values[$value]$suffix)|;
911 print qq|${prefix}$result->{name}.$subtype\[$value\] == $values[$value]$suffix|;
921 print qq| \)\n|;
922 print qq| \{\n|;
923 print qq| printf("$test ... ok\\n");\n|;
924 print qq| \}\n|;
925 print qq| else\n|;
926 print qq| \{\n|;
927 print qq| printf("$test ... not ok\\n");\n|;
938 print qq| printf(" eflags & 0x%lx = 0x%lx (expected 0x%lx)\\n", $values[0]UL, $result->{name}.ud\[0\] & $values[0]UL, $values[1]UL);\n|;
942 print qq| printf(" $type & 0x%x = 0x%x (expected 0x%x)\\n", $values[0], $result->{name}.uw\[0\] & $values[0], $values[1]);\n|;
948 print qq| printf(" $result->{name}.$subtype\[$value\] = $SubTypeFormats{$subtype} (expected $SubTypeFormats{$subtype})\\n", $result->{name}.$subtype\[$value\], $values[$value]$suffix);\n|;
953 print qq| \}\n|;
957 print qq| printf("$test ... ok\\n");\n|;
960 print qq| \}\n|;
961 print qq| else\n|;
962 print qq| \{\n|;
963 print qq| printf("$test ... failed\\n");\n|;
964 print qq| \}\n|;
965 print qq|\n|;
966 print qq| return;\n|;
967 print qq|\}\n|;
968 print qq|\n|;
971 print qq|int main(int argc, char **argv)\n|;
972 print qq|\{\n|;
973 print qq| signal(SIGILL, handle_sigill);\n|;
974 print qq|\n|;
978 print qq| $test();\n|;
981 print qq|\n|;
982 print qq| exit(0);\n|;
983 print qq|\}\n|;
