http://gcc.gnu.org/bugzilla/show_bug.cgi?id=58128
--- Comment #2 from Ellis N. Thomas <ExtraLeveLInSoftware at ntlworld dot com>
---
Further Information about the Exception
Added extra "others" handler for Unexpected exceptions to TryStdIP3.
Compiled:
bash> gnatmake TryStdIP3.ada
gcc -c -x ada trystdip3.ada
gnatbind -x trystdip3.ali
gnatlink trystdip3.ali
Ran:
bash> trystdip3
TryStdIP3 from SiRiL Issue 0.22 21-Apr-1989
Copyright (c) 2013 E.N. Thomas
Started at : 12:45:57 14/ 8/13
Try to get NAME (STANDARD_INPUT)
Try to open CommandFile using: <*stdin>
raised PROGRAM_ERROR : unhandled signal
So the "others" handler has failed to handle this PROGRAM_ERROR!
Although it is reported as an exception, it is not able to be handled in the
normal Ada way, so this seriously compromises the ability to work around this
error.
Consequently, a work-round such as a new version of s-fileio.adb
(system__file_io__open) and/or a-textio.adb (ada__text_io__open) would be
appreciated.
E.N. Thomas/14-Aug-2013
