I believe I identified the problem. It will be one or two days until I can
upload the fix, though -- patch attached to this email.

Juanjo

On Wed, Jan 26, 2011 at 9:00 AM, Marko Kocić <marko.ko...@gmail.com> wrote:

> It still doesn't work.
> Here's the small test:
>
> Top level in: #<process TOP-LEVEL>.
> > (require 'sockets)
>
> NIL
> >
> (defun make-stream (host port element-type)
>  (let*  ((endpoint (sb-bsd-sockets:host-ent-address
> (sb-bsd-sockets:get-host-by-name host)))
>          (socket (make-instance
>                   'sb-bsd-sockets:inet-socket
>                   :protocol :tcp
>                   :type :stream)))
>    (sb-bsd-sockets:socket-connect socket endpoint port)
>    (sb-bsd-sockets:socket-make-stream
>     socket
>     :element-type element-type
>     :input t
>     :output t
>     :buffering :full)))
>
> MAKE-STREAM
> >
> (defun test-it ()
>  (let ((stream (make-stream "lisp.org" 80 '(unsigned-byte 8))))
>    (stream-element-type stream)))
>
> TEST-IT
> > (test-it)
>
> CHARACTER
> >
>
> On Mon, Jan 24, 2011 at 11:04 PM, Juan Jose Garcia-Ripoll
> <juanjose.garciarip...@googlemail.com> wrote:
> > On Mon, Jan 24, 2011 at 2:46 PM, Marko Kocić <marko.ko...@gmail.com>
> wrote:
> >>
> >> I just looked at the source code and it occured to me that
> >> sb-bsd-scokets:socket-make-stream doesn't even have element-type
> >> keyword argument. All it has is :external-format.
> >> However, in SBCL, there are both element-type and external-format
> >> parameters.
> >
> > I just uploaded a fix for this. Could you please check it?
> > Juanjo
> >
> > --
> > Instituto de Física Fundamental, CSIC
> > c/ Serrano, 113b, Madrid 28006 (Spain)
> > http://juanjose.garciaripoll.googlepages.com
> >
>



-- 
Instituto de Física Fundamental, CSIC
c/ Serrano, 113b, Madrid 28006 (Spain)
http://juanjose.garciaripoll.googlepages.com

Attachment: 0001-In-sockets.lisp-the-stream-element-type-was-override.patch
Description: Binary data

------------------------------------------------------------------------------
Special Offer-- Download ArcSight Logger for FREE (a $49 USD value)!
Finally, a world-class log management solution at an even better price-free!
Download using promo code Free_Logger_4_Dev2Dev. Offer expires 
February 28th, so secure your free ArcSight Logger TODAY! 
http://p.sf.net/sfu/arcsight-sfd2d
_______________________________________________
Ecls-list mailing list
Ecls-list@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/ecls-list

Reply via email to