s-commun.adb, [...]: New internal support unit...
authorThomas Quinot <quinot@adacore.com>
Mon, 30 Nov 2009 09:31:28 +0000 (09:31 +0000)
committerArnaud Charlet <charlet@gcc.gnu.org>
Mon, 30 Nov 2009 09:31:28 +0000 (10:31 +0100)
commit5da0f2d96bbf59c8fe666d9e7c3a2983e3003f8a
tree9a67a2e2419bf357e4dd63ff87001bddf3abf00f
parent948bf10686a16b92f8c413bb3f1440f0f770b087
s-commun.adb, [...]: New internal support unit...

2009-11-30  Thomas Quinot  <quinot@adacore.com>

* s-commun.adb, s-commun.ads: New internal support unit,
allowing code sharing between GNAT.Sockets and
GNAT.Serial_Communication.
* g-sercom.ads, g-sercom-mingw.adb, g-sercom-linux.adb,
g-socket.adb (GNAT.Sockets.Last_Index): Move to System.Communication.
(GNAT.Serial_Communication.Read): Handle correctly the case where no
data was read, and Buffer'First = Stream_Element_Offset'First.
* Makefile.rtl: Add entry for s-commun
* g-socthi-vms.adb, g-socthi-vms.ads, g-socthi-vxworks.adb,
g-socthi-vxworks.ads, g-stseme.adb, g-socthi-mingw.ads,
g-socthi.adb, g-socthi.ads (GNAT.Sockets.Thin.Socket_Error_Message):
Reimplement in terms of System.CRTL.strerror.

From-SVN: r154758
16 files changed:
gcc/ada/ChangeLog
gcc/ada/Makefile.rtl
gcc/ada/g-sercom-linux.adb
gcc/ada/g-sercom-mingw.adb
gcc/ada/g-sercom.ads
gcc/ada/g-socket.adb
gcc/ada/g-socthi-mingw.ads
gcc/ada/g-socthi-vms.adb
gcc/ada/g-socthi-vms.ads
gcc/ada/g-socthi-vxworks.adb
gcc/ada/g-socthi-vxworks.ads
gcc/ada/g-socthi.adb
gcc/ada/g-socthi.ads
gcc/ada/g-stseme.adb [new file with mode: 0644]
gcc/ada/s-commun.adb [new file with mode: 0644]
gcc/ada/s-commun.ads [new file with mode: 0644]