Custom Query (1030 matches)

From #ccl on irc, user ecyrb:

(defmacro mk-arr (type init &optional len)
  "Make array with elements of TYPE, initializing."
  (if len `(make-array ,len :element-type ,type :initial-element ,init)
      `(make-array (length ,init) :element-type ,type
        :initial-contents ,init)))

(eval '(the (simple-array simple-string (2))
            (mk-arr 'simple-string '("Jan" "Feb"))))

;Compiler warnings : 
;   In an anonymous lambda form: Undefined function MK-ARR 
> Error: Special operator or global macro-function MK-ARR can't be FUNCALLed or APPLYed 
> While executing: #<Anonymous Function #x30004112FDDF>, in process listener(1). 

The contents of an instance of gui:ns-lisp-string always prints as the empty string. This seems to be because gui:ns-lisp-strings answer NIL to initialized-nsobject-p, which results in their nsobject-description being the empty string.

Probably should change the nsobject-description of uninitialized objects to "[uninitialized]" or something like that while you're at it.

in the definitions of .... window you can select a item with the arrows. but then you have take the mouse and double click to go the source. it shold be possible to do that with return and/or cmd-arrowdown/rightarrow.