* Florian Weimer:
> This patch fixes GNAT.Perfect_Hash_Generators for strings which are
> not 1-based. It does this by introducing its own storage type which
> fixes the first index as 1. This is also a minor optimization because
> it avoids the need to store the index.
> Okay for trunk?
> Should I try to construct a new test case for this? I don't see any
> existing tests for this package.
> 2016-09-08 Florian Weimer <f...@deneb.enyo.de>
> PR ada/77535
> Make all word strings start with 1.
> * g-pehage.adb (Word_Storage): New type.
> (Word_Type): Use Word_Storage.
> (Free_Word): Instantiate Unchecked_Deallocation.
> (Apply_Position_Selection, Put_Initial_Keys, Put_Reduced_Keys)
> (Resize_Word, Select_Char_Position, Select_Character_Set): Adjust
> indirection through Word_Type.
> (New_Word): Allocate Word_Storage instead of String.