-/*
- * Add a number to a prefix. This number will not be used a second time.
- */
-static char *get_unique_label(char *buf, size_t buflen, const char *prefix) {
- static unsigned long id = 0;
- snprintf(buf, buflen, "%s%lu", prefix, ++id);
- return buf;
-}
-
-
{
lc_efprintf(ppc32_get_arg_env(), F, "\tmr %1D, %1S\t\t\t/* Move register */\n",n,n);
}
{
lc_efprintf(ppc32_get_arg_env(), F, "\tmr %1D, %1S\t\t\t/* Move register */\n",n,n);
}
{
lc_efprintf(ppc32_get_arg_env(), F, "\tfmr %1D, %1S\t\t\t/* Move register */\n",n,n);
}
{
lc_efprintf(ppc32_get_arg_env(), F, "\tfmr %1D, %1S\t\t\t/* Move register */\n",n,n);
}
{
lc_efprintf(ppc32_get_arg_env(), F, "\txor %1S, %1S, %2S\t\t\t/* Swap %1S, %2S with XOR */\n",n,n,n,n,n);
lc_efprintf(ppc32_get_arg_env(), F, "\txor %2S, %1S, %2S\t\t\t/* (continued) */\n",n,n,n);
lc_efprintf(ppc32_get_arg_env(), F, "\txor %1S, %1S, %2S\t\t\t/* (continued) */\n",n,n,n);
}
{
lc_efprintf(ppc32_get_arg_env(), F, "\txor %1S, %1S, %2S\t\t\t/* Swap %1S, %2S with XOR */\n",n,n,n,n,n);
lc_efprintf(ppc32_get_arg_env(), F, "\txor %2S, %1S, %2S\t\t\t/* (continued) */\n",n,n,n);
lc_efprintf(ppc32_get_arg_env(), F, "\txor %1S, %1S, %2S\t\t\t/* (continued) */\n",n,n,n);
}
{
lc_efprintf(ppc32_get_arg_env(), F, "\tfmr f0, %1S\t\t\t/* Swap %1S, %2S with moves */\n",n,n,n);
lc_efprintf(ppc32_get_arg_env(), F, "\tfmr %1S, %2S\t\t\t/* (continued) */\n",n,n);
{
lc_efprintf(ppc32_get_arg_env(), F, "\tfmr f0, %1S\t\t\t/* Swap %1S, %2S with moves */\n",n,n,n);
lc_efprintf(ppc32_get_arg_env(), F, "\tfmr %1S, %2S\t\t\t/* (continued) */\n",n,n);
- fprintf(F, "\t\t\t\t\t/* ignored IncSP with %c%i */\n", dir==be_stack_dir_expand ? '-' : ' ', offs);
+ fprintf(F, "\t\t\t\t\t/* ignored IncSP with %d */\n", -offs);
-// lc_efprintf(ppc32_get_arg_env(), F, "\taddi %1S, %1S,%s%u\t\t\t/* %+F (IncSP) */\n", irn, irn,
-// (dir == be_stack_dir_expand) ? " -" : " ", offs, irn);
+// lc_efprintf(ppc32_get_arg_env(), F, "\taddi %1S, %1S, %d\t\t\t/* %+F (IncSP) */\n", irn, irn,
+// -offs, irn);
/*static void emit_Spill(const ir_node *irn, ppc32_emit_env_t *emit_env) {
ir_node *context = be_get_Spill_context(irn);
/*static void emit_Spill(const ir_node *irn, ppc32_emit_env_t *emit_env) {
ir_node *context = be_get_Spill_context(irn);
- ppc32_emit_env_t *emit_env = env;
- firm_dbg_module_t *mod = emit_env->mod;
- FILE *F = emit_env->out;
- ir_op *op = get_irn_op(irn);
+ ppc32_emit_env_t *emit_env = env;
+ FILE *F = emit_env->out;
+ ir_op *op = get_irn_op(irn);
+ DEBUG_ONLY(firm_dbg_module_t *mod = emit_env->mod;)
DBG((mod, LEVEL_1, "emitting code for %+F\n", irn));
DBG((mod, LEVEL_1, "emitting code for %+F\n", irn));
* Emits code for function start.
*/
void ppc32_emit_start(FILE *F, ir_graph *irg, ppc32_emit_env_t *env) {
* Emits code for function start.
*/
void ppc32_emit_start(FILE *F, ir_graph *irg, ppc32_emit_env_t *env) {
- const char *irg_name = get_entity_ld_name(get_irg_entity(irg));
- int framesize = get_type_size_bytes(get_irg_frame_type(env->cg->irg));
+ const char *irg_name = get_entity_ld_name(get_irg_entity(irg));
+ int framesize = get_type_size_bytes(get_irg_frame_type(env->cg->irg));
{
fprintf(F, "\tmflr r0\n");
fprintf(F, "\tstw r0, 8(r1)\n");
{
fprintf(F, "\tmflr r0\n");
fprintf(F, "\tstw r0, 8(r1)\n");
* Emits code for function end
*/
void ppc32_emit_end(FILE *F, ir_graph *irg, ppc32_emit_env_t *env) {
* Emits code for function end
*/
void ppc32_emit_end(FILE *F, ir_graph *irg, ppc32_emit_env_t *env) {
fprintf(F, "\taddi r1, r1, 4\n");
fprintf(F, "\tmtlr r0\n");
}*/
fprintf(F, "\taddi r1, r1, 4\n");
fprintf(F, "\tmtlr r0\n");
}*/
{
fprintf(F, "\tlwz r1, 0(r1)\n");
fprintf(F, "\tlwz r0, 8(r1)\n");
{
fprintf(F, "\tlwz r1, 0(r1)\n");
fprintf(F, "\tlwz r0, 8(r1)\n");