This test appears to work for both quicklisp, drakma and my tests. Thanks, Marko
On Wed, Jan 26, 2011 at 2:35 PM, Juan Jose Garcia-Ripoll <juanjose.garciarip...@googlemail.com> wrote: > 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 > ------------------------------------------------------------------------------ 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
