- ptext SLIT(".section __TEXT,__picsymbolstub1,")
- <> ptext SLIT("symbol_stubs,pure_instructions,32"),
- ptext SLIT("\t.align 2"),
- ptext SLIT("L") <> pprCLabel_asm lbl <> ptext SLIT("$stub:"),
- ptext SLIT("\t.indirect_symbol") <+> pprCLabel_asm lbl,
- ptext SLIT("\tmflr r0"),
- ptext SLIT("\tbcl 20,31,L0$") <> pprCLabel_asm lbl,
- ptext SLIT("L0$") <> pprCLabel_asm lbl <> char ':',
- ptext SLIT("\tmflr r11"),
- ptext SLIT("\taddis r11,r11,ha16(L") <> pprCLabel_asm lbl
- <> ptext SLIT("$lazy_ptr-L0$") <> pprCLabel_asm lbl <> char ')',
- ptext SLIT("\tmtlr r0"),
- ptext SLIT("\tlwzu r12,lo16(L") <> pprCLabel_asm lbl
- <> ptext SLIT("$lazy_ptr-L0$") <> pprCLabel_asm lbl
- <> ptext SLIT(")(r11)"),
- ptext SLIT("\tmtctr r12"),
- ptext SLIT("\tbctr")
+ ptext (sLit ".section __TEXT,__picsymbolstub1,")
+ <> ptext (sLit "symbol_stubs,pure_instructions,32"),
+ ptext (sLit "\t.align 2"),
+ ptext (sLit "L") <> pprCLabel_asm lbl <> ptext (sLit "$stub:"),
+ ptext (sLit "\t.indirect_symbol") <+> pprCLabel_asm lbl,
+ ptext (sLit "\tmflr r0"),
+ ptext (sLit "\tbcl 20,31,L0$") <> pprCLabel_asm lbl,
+ ptext (sLit "L0$") <> pprCLabel_asm lbl <> char ':',
+ ptext (sLit "\tmflr r11"),
+ ptext (sLit "\taddis r11,r11,ha16(L") <> pprCLabel_asm lbl
+ <> ptext (sLit "$lazy_ptr-L0$") <> pprCLabel_asm lbl <> char ')',
+ ptext (sLit "\tmtlr r0"),
+ ptext (sLit "\tlwzu r12,lo16(L") <> pprCLabel_asm lbl
+ <> ptext (sLit "$lazy_ptr-L0$") <> pprCLabel_asm lbl
+ <> ptext (sLit ")(r11)"),
+ ptext (sLit "\tmtctr r12"),
+ ptext (sLit "\tbctr")