[fpc-pascal] FPC_ARMEL system calls

[Henry Vermaak]

2008/6/3 Henry Vermaak <henry.vermaak at gmail.com>:
> 2008/6/3 Henry Vermaak <henry.vermaak at gmail.com>:
>>
>> more info (everything compiled with -dFPC_ARMEL -O- -gl):
>>
>> hcv at technical02:~/source/armtest$ qemu-arm armtest
>> Error: Bad syscall: 90004c
>> qemu: unhandled CPU exception 0x2 - aborting
>> R00=ffffffda R01=4007f750 R02=4007f758 R03=00000000
>> R04=00018ed0 R05=00000000 R06=00000000 R07=0090004c

ah, it shouldn't add the base number.  this might fix it:

Index: sysnr.inc
===================================================================
--- sysnr.inc	(revision 11178)
+++ sysnr.inc	(working copy)
@@ -21,7 +21,11 @@
 }

 Const
+{$ifdef FPC_ABI_EABI}
+  syscall_nr_base = $0;
+{$else FPC_ABI_EABI}
   syscall_nr_base = $900000;
+{$endif FPC_ABI_EABI}

but i'll confirm in a while.

henry