From da071e9c2db4cb6dc67911053dd37414ebc3555a Mon Sep 17 00:00:00 2001
From: John van Groningen
Date: Mon, 2 May 2016 12:22:35 +0000
Subject: fix print_record and DtoAC for records (the pointer to the name is
 stored as an absolute address and not a relative address)

---
 armstartup.s | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/armstartup.s b/armstartup.s
index f9868b8..196c3f7 100644
--- a/armstartup.s
+++ b/armstartup.s
@@ -1120,7 +1120,8 @@ printD:	tst	r4,#2
 
 DtoAC_record:
 	ldr	r8,[r4,#-6]
-.ifdef PIC
+@.ifdef PIC
+.if 0
 	add	r12,r4,#-6
 	add	r8,r8,r12
 .endif
@@ -1191,7 +1192,8 @@ printD_:
 
 print_record:
 	ldr	r8,[r4,#-6]
-.ifdef PIC
+@.ifdef PIC
+.if 0
 	add	r12,r4,#-6
 	add	r8,r8,r12
 .endif
-- 
cgit v1.2.3