Receive_Some error

Dmitriy Anisimkov <[email protected]> Wed, 26 May 2004 17:51:11 +0700

Newsgroups	gmane.comp.lang.ada.sockets
Message-ID	<[email protected]>

Samuel,

It is a fix for an error in Receive_Some routine.

-------------------------------------------------------------
*** original/sockets.adb        Wed May 26 17:48:07 2004
--- src/sockets.adb     Wed May 26 17:38:25 2004
***************
*** 495,501 ****
        elsif Count = 0 then
           raise Connection_Closed;
        end if;
!       Last := Data'First + Stream_Element_Count (Count);
     end Receive_Some;

     ------------
--- 495,501 ----
        elsif Count = 0 then
           raise Connection_Closed;
        end if;
!       Last := Data'First + Stream_Element_Count (Count) - 1;
     end Receive_Some;

     ------------
_______________________________________________
AdaSockets mailing list
[email protected]
http://lists.rfc1149.net/mailman/listinfo/adasockets