> This should be *(.text, .text.*)

I corrected this and compiled again. I could not register any deference in 
output.

If I view the output obj file from the assembler it looks like this

led.o: ELF 32-bit LSB relocatable, ARM, version 1 (SYSV), not stripped
00000000 t $a
0000016c t $d
00000000 d $d
00000000 d $d
00000000 d $d
00000000 d $d
00000000 d $d
00000000 d $d
00000000 d $d
         U FPC_DO_EXIT
         U FPC_INITIALIZEUNITS
00000000 D FPC_RESOURCESTRINGTABLES
00000000 D FPC_THREADVARTABLES
         U INIT$_SYSTEM
00000000 D INITFINAL
00000000 T PASCALMAIN
00000000 D THREADVARLIST_P$LED
         U THREADVARLIST_SYSTEM
00000000 B U_P$LED_I
00000000 B U_P$LED_P
00000000 B U_P$LED_Q
00000000 B U_P$LED_W
00000000 D __fpc_valgrind
00000000 D __heapsize
00000000 D __stklen
         U fpc_div_longint
00000000 T main

If I compile to Linux it looks like this

led.o: ELF 32-bit LSB relocatable, ARM, version 1, not stripped
00000000 t $a
0000016c t $d
00000000 d $d
00000000 d $d
00000000 d $d
00000000 d $d
00000000 d $d
00000000 d $d
00000000 d $d
00000000 d $d
         U FPC_DO_EXIT
         U FPC_INITIALIZEUNITS
00000000 D FPC_RESLOCATION
00000000 D FPC_RESOURCESTRINGTABLES
00000000 D FPC_THREADVARTABLES
         U INIT$_SYSTEM
00000000 D INITFINAL
00000000 T PASCALMAIN
00000000 D THREADVARLIST_P$LED
         U THREADVARLIST_SYSTEM
00000000 B U_P$LED_I
00000002 B U_P$LED_P
00000004 B U_P$LED_Q
00000006 B U_P$LED_W
00000000 D __fpc_valgrind
00000000 D __heapsize
00000000 D __stklen
         U fpc_div_longint
00000000 T main




_______________________________________________
fpc-devel maillist  -  fpc-devel@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-devel

Reply via email to