[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>:
>> 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.
>

yes, this works for me.  luca, can you try?

> henry
>