[fpc-devel]Compiler runtime error when using WideString character constant

[Florian Klaempfl]

David Butler wrote:
> Hi
> 
> I am using FreePascal 1.9.0[2003/11/05].
> 
> For the following code, the compiler crashes with "Runtime error 216
> at 0x004467CA".
> 
> type
>   RR = record
>     RA : WideString;
>   end;
> 
> const
>   Z : RR = (RA: 'B');
> 
> The compiler does not crash if the 'B' is changed to a string of more
> than one character, for example 'BB'. Also, if the WideString is
> changed to String, the compiler does not crash.
> Also, it appears to be specific to constant record declarations,
> because the following compiles fine:
> 
> const
>   Z : WideString = 'B';
> 
> So it seems to only happen with constants of single character
> WideStrings as a record field in a constant record declaration.
> 

Fixed; thank you for your reports :)