CVS Head: libada build fails

[Richard Kenner]

    On Linux/AMD64 with current CVS building of Ada fails for me when
    building the shared libada with the following error.  Any ideas on who
    to fix this?

    s-fileio.adb: In function 'System.File_Io.Finalize':
    s-fileio.adb:372: warning: '<anonymous>' is used uninitialized in this function
    | 4.0.0 20041220 (experimental) (x86_64-suse-linux-gnu) GCC error: 
    | in make_decl_rtl, at varasm.c:867 

I saw this last night, but didn't get a chance to investigate before I went
to sleep.   If it still happens with this morning's sources, I'll do so this
afternoon.