Lines Matching refs:Printf
76 Printf.sprintf "(match_dup %d)" (nregs + 1)
78 Printf.sprintf ("(match_operand:SI %d \"s_register_operand\" \"%s%s\")")
86 Printf.printf "%s" (if first then " [" else indent);
87 Printf.printf "(set (match_operand:SI %d \"%s\" \"\")\n" opnr (reg_predicate thumb);
88 Printf.printf "%s (mem:SI " indent;
89 begin if offset != 0 then Printf.printf "(plus:SI " end;
90 Printf.printf "%s" (destreg nregs first IN thumb);
91 begin if offset != 0 then Printf.printf "\n%s (const_int %d))" indent offset end;
92 Printf.printf "))"
96 Printf.printf "%s" (if first then " [" else indent);
97 Printf.printf "(set (mem:SI ";
98 begin if offset != 0 then Printf.printf "(plus:SI " end;
99 Printf.printf "%s" (destreg nregs first IN thumb);
100 begin if offset != 0 then Printf.printf " (const_int %d))" offset end;
101 Printf.printf ")\n%s (match_operand:SI %d \"%s\" \"\"))" indent opnr (reg_predicate thumb)
105 Printf.printf "%s" (if first then extra_indent ^ " [" else indent);
106 Printf.printf "(set (match_operand:SI %d \"s_register_operand\" \"\")\n" opnr;
107 Printf.printf "%s (match_operand:SI %d \"memory_operand\" \"\"))" indent (nregs + opnr)
111 Printf.printf "%s" (if first then extra_indent ^ " [" else indent);
112 Printf.printf "(set (match_operand:SI %d \"memory_operand\" \"\")\n" (nregs + opnr);
113 Printf.printf "%s (match_operand:SI %d \"s_register_operand\" \"\"))" indent opnr
117 Printf.printf "%s" (if first then " [" else indent);
118 Printf.printf "(set (match_operand:SI %d \"s_register_operand\" \"\")\n" opnr;
119 Printf.printf "%s (match_operand:SI %d \"%s\" \"\"))" indent (nregs * 2 + opnr) optype
123 Printf.printf "%s(set (match_operand:SI %d \"memory_operand\" \"\")\n" indent (nregs + opnr);
124 Printf.printf "%s (match_dup %d))" indent opnr
128 Printf.printf "\n";
136 Printf.printf "\n";
139 Printf.printf "]"
146 Printf.printf "\n";
175 Printf.printf "(define_insn \"*%s%s%d_%s%s\"\n"
178 Printf.printf " [(match_parallel 0 \"%s_multiple_operation\"\n" ls;
181 Printf.printf " [(set %s\n (plus:SI %s"
183 Printf.printf " (const_int %d)))\n"
191 Printf.printf ")]\n \"%s && XVECLEN (operands[0], 0) == %d\"\n"
195 Printf.printf " \"%s%s\\t%%%d%s, {" name astr (nregs + 1) (if update then "!" else "")
197 Printf.printf " \"%s%s%%?\\t%%%d%s, {" name astr (nregs + 1) (if update then "!" else "");
199 Printf.printf "%%%d%s" n (if n < nregs then ", " else "")
201 Printf.printf "}\"\n";
202 Printf.printf " [(set_attr \"type\" \"%s%d\")" ls nregs;
204 Printf.printf "\n (set_attr \"predicable\" \"yes\")";
206 Printf.printf "\n (set_attr \"predicable_short_it\" \"no\")";
208 Printf.printf "])\n\n"
224 Printf.printf "(define_peephole2\n";
228 Printf.printf "\n%s(set (match_operand:SI %d \"s_register_operand\" \"\")\n" indent (nregs * 2);
229 Printf.printf "%s (match_operator:SI %d \"commutative_binary_operator\"\n" indent (nregs * 2 + 1);
230 Printf.printf "%s [(match_operand:SI %d \"s_register_operand\" \"\")\n" indent (nregs * 2 + 2);
231 Printf.printf "%s (match_operand:SI %d \"s_register_operand\" \"\")]))]\n" indent (nregs * 2 + 3)
233 Printf.printf "\n%s(parallel\n" indent;
234 Printf.printf "%s [(set (match_operand:SI %d \"s_register_operand\" \"\")\n" indent (nregs * 2);
235 Printf.printf "%s (match_operator:SI %d \"commutative_binary_operator\"\n" indent (nregs * 2 + 1);
236 Printf.printf "%s [(match_operand:SI %d \"s_register_operand\" \"\")\n" indent (nregs * 2 + 2);
237 Printf.printf "%s (match_operand:SI %d \"s_register_operand\" \"\")]))\n" indent (nregs * 2 + 3);
238 Printf.printf "%s (clobber (reg:CC CC_REGNUM))])]\n" indent
240 Printf.printf " \"((((REGNO (operands[%d]) == REGNO (operands[0]))\n" (nregs * 2 + 2);
241 Printf.printf " && (REGNO (operands[%d]) == REGNO (operands[1])))\n" (nregs * 2 + 3);
242 Printf.printf " || ((REGNO (operands[%d]) == REGNO (operands[0]))\n" (nregs * 2 + 3);
243 Printf.printf " && (REGNO (operands[%d]) == REGNO (operands[1]))))\n" (nregs * 2 + 2);
244 Printf.printf " && (peep2_regno_dead_p (%d, REGNO (operands[0]))\n" (nregs + 1);
245 Printf.printf " || (REGNO (operands[0]) == REGNO (operands[%d])))\n" (nregs * 2);
246 Printf.printf " && (peep2_regno_dead_p (%d, REGNO (operands[1]))\n" (nregs + 1);
247 Printf.printf " || (REGNO (operands[1]) == REGNO (operands[%d]))))\"\n" (nregs * 2);
250 Printf.printf " [(set (match_dup %d) (match_op_dup %d [(match_dup %d) (match_dup %d)]))]\n"
253 Printf.printf " [(parallel\n";
254 Printf.printf " [(set (match_dup %d) (match_op_dup %d [(match_dup %d) (match_dup %d)]))\n"
256 Printf.printf " (clobber (reg:CC CC_REGNUM))])]\n"
259 Printf.printf "{\n if (!gen_ldm_seq (operands, %d, true))\n FAIL;\n" nregs;
260 Printf.printf "})\n\n"
263 Printf.printf "(define_peephole2\n";
265 Printf.printf "]\n \"\"\n [(const_int 0)]\n{\n";
266 Printf.printf " if (gen_ldm_seq (operands, %d, false))\n DONE;\n else\n FAIL;\n})\n\n" nregs
270 Printf.printf "(define_peephole2\n";
272 Printf.printf "\n (parallel\n";
274 Printf.printf "])]\n \"\"\n [(const_int 0)]\n{\n";
275 Printf.printf " if (gen_ldm_seq (operands, %d, false))\n DONE;\n else\n FAIL;\n})\n\n" nregs
279 Printf.printf "(define_peephole2\n";
281 Printf.printf "]\n \"\"\n [(const_int 0)]\n{\n";
282 Printf.printf " if (gen_stm_seq (operands, %d))\n DONE;\n else\n FAIL;\n})\n\n" nregs
286 Printf.printf "(define_peephole2\n";
288 Printf.printf "\n (parallel\n";
290 Printf.printf "]\n \"\"\n [(const_int 0)]\n{\n";
291 Printf.printf " if (gen_stm_seq (operands, %d))\n DONE;\n else\n FAIL;\n})\n\n" nregs
295 Printf.printf "(define_peephole2\n";
297 Printf.printf "]\n \"\"\n [(const_int 0)]\n{\n";
298 Printf.printf " if (gen_const_stm_seq (operands, %d))\n DONE;\n else\n FAIL;\n})\n\n" nregs
301 Printf.printf "(define_peephole2\n";
303 Printf.printf "\n";
305 Printf.printf "]\n \"\"\n [(const_int 0)]\n{\n";
306 Printf.printf " if (gen_const_stm_seq (operands, %d))\n DONE;\n else\n FAIL;\n})\n\n" nregs
329 let print_lines = List.iter (fun s -> Format.printf "%s@\n" s)
Indexes created Thu Jul 30 00:24:59 UTC 2026