Re: Can anyone help with GNAT.Perfect_Hash_Generators ? (Possible memory corruption)

["J-P. Rosen" <rosen@adalog.fr>]

Le 09/09/2016 à 08:04, Natasha Kerensikova a écrit :
> Since the first thing it does with the input is to copy it internally
> using the function New_Word, I would propose a fix along the line of
> replacing it from
> 
>    function New_Word (S : String) return Word_Type is
>    begin
>       return new String'(S);
>    end New_Word;
> 
> to
> 
>    function New_Word (S : String) return Word_Type is
>       Result : Word_Type := new String (1 .. S'Length);
>    begin
>       Result.all := S;
>       return Result;
>    end New_Word;
> 
Or even (avoids one copy):
   function New_Word (S : String) return Word_Type is
      subtype Slide is String (1 .. S'Length);
   begin
      return new String'(Slide(S));
   end New_Word;

-- 
J-P. Rosen
Adalog
2 rue du Docteur Lombard, 92441 Issy-les-Moulineaux CEDEX
Tel: +33 1 45 29 21 52, Fax: +33 1 45 29 25 00
http://www.adalog.fr