Re: [fpc-devel] Possible error in generated code for arm?

2020-04-22 Thread Alexander Grotewohl
same.. lol -- Alexander Grotewohl https://dcclost.com From: fpc-devel on behalf of Michael Ring via fpc-devel Sent: Wednesday, April 22, 2020 8:21:55 AM To: fpc-devel@lists.freepascal.org Cc: Michael Ring Subject: Re: [fpc-devel] Possible error in generated

Re: [fpc-devel] Possible error in generated code for arm?

2020-04-22 Thread Michael Ring via fpc-devel
Arg... I feel completely stupid! Thank you for the Hint Jonas, using pxBuffer^ did the trick! Michael Am 22.04.20 um 11:15 schrieb Jonas Maebe: On 22/04/2020 00:09, Michael Ring via fpc-devel wrote: function memset(pxBuffer:pointer; value : byte; count :

Re: [fpc-devel] Possible error in generated code for arm?

2020-04-22 Thread Jonas Maebe
On 22/04/2020 00:09, Michael Ring via fpc-devel wrote: > function memset(pxBuffer:pointer; value : byte; count : Tsize):pointer; > cdecl; > begin >   FillChar(pxBuffer,count,value); >   Result := pxBuffer; > end; You need pxBuffer^ instead of pxBuffer (you want to fill the block to which pxBuffer

Re: [fpc-devel] Possible error in generated code for arm?

2020-04-22 Thread Michael Ring via fpc-devel
Grotewohl https://dcclost.com *From:* fpc-devel on behalf of Michael Ring via fpc-devel *Sent:* Tuesday, April 21, 2020 6:09:57 PM *To:* fpc-devel@lists.freepascal.org *Cc:* Michael Ring *Subject:* [fpc-devel] Possible error

Re: [fpc-devel] Possible error in generated code for arm?

2020-04-21 Thread Alexander Grotewohl
From: fpc-devel on behalf of Michael Ring via fpc-devel Sent: Tuesday, April 21, 2020 6:09:57 PM To: fpc-devel@lists.freepascal.org Cc: Michael Ring Subject: [fpc-devel] Possible error in generated code for arm? I have the following code in a unit (I need to provide a memset

[fpc-devel] Possible error in generated code for arm?

2020-04-21 Thread Michael Ring via fpc-devel
I have the following code in a unit (I need to provide a memset function to be able to link to freertos): function memset(pxBuffer:pointer; value : byte; count : Tsize):pointer; cdecl; begin   FillChar(pxBuffer,count,value);   Result := pxBuffer; end; When I look at the assembler code