Re: [fpc-pascal] AnsiStrupper Error

2014-05-26 Thread Jonas Maebe 

On 26 May 2014, at 01:59, Daniel Gaspary wrote:

 The code bellow is throwing an exception and I don't know why. It used to 
 work.
 
 program Project1;
 uses
sysutils;
 var
s : AnsiString;
 begin
 s := 'a';
 AnsiStrupper(PAnsiChar(s));
 end.
 
 It works fine with FPC 2.6.4 (Linux x86-64 bits).

No, it corrupts your string constant.

 I'm using FPC trunk (Revision 27818):
 
 An unhandled exception occurred at $00428E4D:
 EAccessViolation: Access violation
  $00428E4D

And that corruption is now caught: 
http://wiki.freepascal.org/User_Changes_Trunk#Literal_storage_memory_has_been_made_read-only


Jonas

___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] AnsiStrupper Error

2014-05-26 Thread Daniel Gaspary 
On Mon, May 26, 2014 at 3:04 AM, Jonas Maebe jonas.ma...@elis.ugent.be wrote:
 And that corruption is now caught: 
 http://wiki.freepascal.org/User_Changes_Trunk#Literal_storage_memory_has_been_made_read-only

Thank You, Jonas.
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal