///--------------------------------------------------------------------------
/// General definitions.
+// Some useful variables.
+ .L$_subsec = 0
+
+// Literal pools done the hard way.
+#define _LIT .text .L$_subsec + 1
+#define _ENDLIT .text .L$_subsec
+
// Announcing an external function.
#define FUNC(name) \
.globl F(name); \
#define _ENDFUNC(name) \
.purgem ENDFUNC; \
SIZE_OBJ(name); \
- ENDFUNC_HOOK(name)
+ ENDFUNC_HOOK(name); \
+ .L$_subsec = .L$_subsec + 2; \
+ .text .L$_subsec
///--------------------------------------------------------------------------
/// ELF-specific hacking.
// Maybe load GOT address into GOT.
.macro ldgot cond=, got=GOTREG
#if WANT_PIC
- ldr\cond \got, =_GLOBAL_OFFSET_TABLE_ - . - 12
+ ldr\cond \got, .L$_ldgot$\@
+.L$_ldgot_pc$\@:
add\cond \got, pc, \got
+ _LIT
+ .balign 4
+.L$_ldgot$\@:
+ .word _GLOBAL_OFFSET_TABLE_ - .L$_ldgot_pc$\@ - 8
+ _ENDLIT
#endif
.endm
// Load address of external symbol ADDR into REG, maybe using GOT.
.macro leaext reg, addr, cond=, got=GOTREG
#if WANT_PIC
- ldr\cond \reg, =\addr(GOT)
+ ldr\cond \reg, .L$_leaext$\@
ldr\cond \reg, [\got, \reg]
+ _LIT
+ .balign 4
+.L$_leaext$\@:
+ .word \addr(GOT)
+ _ENDLIT
#else
ldr\cond \reg, =\addr
#endif