re PR ada/22255 (Reset on shared file causes Use_Error.)
authorSamuel Tardieu <sam@rfc1149.net>
Wed, 27 Feb 2008 12:12:14 +0000 (12:12 +0000)
committerSamuel Tardieu <sam@gcc.gnu.org>
Wed, 27 Feb 2008 12:12:14 +0000 (12:12 +0000)
commitacf6b7ab30dceb969bf30ab966ea22acdd06aca6
treedea6ecdd948269cf4c4c4ca2fd972c247c37c153
parentf5c064ab04a306a571f36b1d59db2c0337433f3e
re PR ada/22255 (Reset on shared file causes Use_Error.)

    gcc/ada/
PR ada/22255
* s-fileio.adb (Reset): Do not raise Use_Error if mode isn't changed.

    gcc/testsuite/
PR ada/22255
* gnat.dg/test_direct_io.adb: New file.

From-SVN: r132708
gcc/ada/ChangeLog
gcc/ada/s-fileio.adb
gcc/testsuite/ChangeLog
gcc/testsuite/gnat.dg/test_direct_io.adb [new file with mode: 0644]