Custom Query (1030 matches)

The following results in a bad error under CCL 1.10 / Win64. it does work as expected under Win32 :

(defun define-char (character &rest data)
  (let ((chardata (make-array (list (length data) (length (car data)))
                              :element-type 'bit
                              )))
    (loop for m from 0
       for item in data
       do (loop for n from 0
             for bit in (coerce item 'list)
             do (setf (aref chardata m n) (if (zerop bit) 0 1))
               ))))


(define-char #\Space
    #(0 0 0 0 0 0 0 0)
  #(0 0 0 0 0 0 0 0)
  #(0 0 0 0 0 0 0 0)
  #(0 0 0 0 0 0 0 0)
  #(0 0 0 0 0 0 0 0)
  #(0 0 0 0 0 0 0 0)
  #(0 0 0 0 0 0 0 0)
  #(0 0 0 0 0 0 0 0))

? (load "c:/temp/foo.lisp")
;Compiler warnings for "c:/temp/foo.lisp" :
;   In DEFINE-CHAR: Unused lexical variable CHARACTER
> Error: Fault during read of memory address #xB
> While executing: DEFINE-CHAR, in process listener(1).
> Type :POP to abort, :R for a list of available restarts.
> Type :? for other options.}}}

on osx 10.7.5.

when attempting to call send-to on a socket that already has remote-port/host or local-port set, ccl reports "socket is already connected (error #56) during send-to"

code example to tickle this problem ​http://paste.lisp.org/display/144678

after evaluating the defparameters calls to create the test vector and the socket, all three of the send-to calls fail with the same problem

Similar problems are encountered in python apparently. see ​https://github.com/zerovm/zerocloud/issues/86

Since HEAP-IVECTOR instances are ignored by the GC, one has to wrap them in some other object to which a finalizer is attached, which is inconvenient. It would be better if HEAP-IVECTORs were automatically disposed while, at the same time, still allowing for manual disposal.