diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-08-20 12:07:36 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-08-20 12:07:36 +0000 |
| commit | 60e7c9857d31b808a103a071a58bd24cd21e4016 (patch) | |
| tree | b07eac2d5517848e1ec4687e2557b02a009027d2 /gcc/ada/g-socthi-mingw.adb | |
| parent | 62bc73c24215ed5469c19de2a416da00971bfeab (diff) | |
| download | gcc-60e7c9857d31b808a103a071a58bd24cd21e4016.tar.gz | |
2008-08-20 Robert Dewar <dewar@adacore.com>
* g-socthi-mingw.adb: Minor reformatting
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@139275 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/g-socthi-mingw.adb')
| -rw-r--r-- | gcc/ada/g-socthi-mingw.adb | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/ada/g-socthi-mingw.adb b/gcc/ada/g-socthi-mingw.adb index 8c048eef132..c853ce41eb5 100644 --- a/gcc/ada/g-socthi-mingw.adb +++ b/gcc/ada/g-socthi-mingw.adb @@ -488,6 +488,7 @@ package body GNAT.Sockets.Thin is (Errno : Integer) return C.Strings.chars_ptr is use GNAT.Sockets.SOSC; + begin case Errno is when EINTR => return Error_Messages (N_EINTR); |