5076   char tmp_buf[512];  in macho_branch_islands()  local
5092       strcpy (tmp_buf, "\n");  in macho_branch_islands()
5093       strcat (tmp_buf, label);  in macho_branch_islands()
5100 	  strcat (tmp_buf, ":\n\tmflr r0\n\tbcl 20,31,");  in macho_branch_islands()
5101 	  strcat (tmp_buf, label);  in macho_branch_islands()
5102 	  strcat (tmp_buf, "_pic\n");  in macho_branch_islands()
5103 	  strcat (tmp_buf, label);  in macho_branch_islands()
5104 	  strcat (tmp_buf, "_pic:\n\tmflr r11\n");  in macho_branch_islands()
5106 	  strcat (tmp_buf, "\taddis r11,r11,ha16(");  in macho_branch_islands()
5107 	  strcat (tmp_buf, name_buf);  in macho_branch_islands()
5108 	  strcat (tmp_buf, " - ");  in macho_branch_islands()
5109 	  strcat (tmp_buf, label);  in macho_branch_islands()
5110 	  strcat (tmp_buf, "_pic)\n");  in macho_branch_islands()
5112 	  strcat (tmp_buf, "\tmtlr r0\n");  in macho_branch_islands()
5114 	  strcat (tmp_buf, "\taddi r12,r11,lo16(");  in macho_branch_islands()
5115 	  strcat (tmp_buf, name_buf);  in macho_branch_islands()
5116 	  strcat (tmp_buf, " - ");  in macho_branch_islands()
5117 	  strcat (tmp_buf, label);  in macho_branch_islands()
5118 	  strcat (tmp_buf, "_pic)\n");  in macho_branch_islands()
5120 	  strcat (tmp_buf, "\tmtctr r12\n\tbctr\n");  in macho_branch_islands()
5124 	  strcat (tmp_buf, ":\n\tlis r12,hi16(");  in macho_branch_islands()
5125 	  strcat (tmp_buf, name_buf);  in macho_branch_islands()
5126 	  strcat (tmp_buf, ")\n\tori r12,r12,lo16(");  in macho_branch_islands()
5127 	  strcat (tmp_buf, name_buf);  in macho_branch_islands()
5128 	  strcat (tmp_buf, ")\n\tmtctr r12\n\tbctr");  in macho_branch_islands()
5130       output_asm_insn (tmp_buf, 0);  in macho_branch_islands()