Re: strange warning: "return" statement missing following?

[Georg Bauhaus <bauhaus@futureapps.de>]

[-- Attachment #1: Type: text/plain, Size: 1170 bytes --]

On Sun, 2007-01-21 at 10:01 +0100, GNADE proejct account wrote:
> Dear all,
> 
> when i am compiling my code, i get the following error:
> 
> cache.adb:82:04: warning: in instantiation at
> util-dynamic_hashtable.adb:310 cache.adb:82:04: warning: "return"
> statement missing following this statement cache.adb:82:04: warning:
> Program_Error may be raised at run time
> 
> the offending lines in util-dynamic_hash.adb are:
> 
>    function Get_Root(                                 <--- Line 310
>       This : in Object ) return Key_List_Access is Data :
>       Object_Data_Access renames This.Data; I    : Iterator_Type ;
>    begin
>       I.Reset( Get( Data.Root ) );
> 
>       return I.First;
>    end Get_Root ;
> 
> I have no idea what the compiler is complaining about! Any Idea?
> 

The reason for the compiler message appear to have to do
with the Iterator_Type being protected.

When I changed it to be just limited in a local copy,
and modified the protected subprograms accordingly,
a small test program compiles and runs as expected
(I think). Both changes and test file are on the way via
private email.

 -- Georg 


[-- Attachment #2: This is a digitally signed message part --]
[-- Type: application/pgp-signature, Size: 191 bytes --]