Custom Query (1030 matches)

The paste function simply does not function in the Clozure IDE. Text cut or copied within the IDE can be pasted to other applications, however.

I'm trying to rewrite a shebang in a CLISP script for CCL.

​http://www.assembla.com/code/mcandre/subversion/nodes/common-lisp/problem.lisp

#!/bin/bash
#|
exec clisp -q -q $0 $0 ${1+"$@"}
exit
|#

#!/bin/bash
#|
exec ccl -Q -l $0 $0 ${1+"$@"}
exit
|#

But when I try to run my script, CCL interprets the script's arguments as CCL arguments.

$ ./problem.lisp --code "Hey" --jeer "Yo" ~/Downloads/problem.png
Unknown option: --code
usage: dx86cl64 <options>
	 or dx86cl64 <image-name>
	 where <options> are one or more of:
        -h, --help : this text
        -V, --version : print (LISP-IMPLEMENTATION-VERSION) and exit
        -K, --terminal-encoding : specify character encoding to use for *TERMINAL-IO*
        -n, --no-init : suppress loading of init file
        -e, --eval : evaluate <form> (may need to quote <form> in shell)
        -l, --load : load <file>
        -T, --set-lisp-heap-gc-threshold : set lisp-heap-gc-threshold to <n>
        -Q, --quiet : if --batch, also suppress printing of heralds, prompts
	-R, --heap-reserve <n>: reserve <n> (default: 549755813888)
		 bytes for heap expansion
	-S, --stack-size <n>: set  size of initial thread's control stack to <n>
	-Z, --thread-stack-size <n>: set default size of first (listener)  thread's stacks based on <n>
	-b, --batch: exit when EOF on *STANDARD-INPUT*
	--no-sigtrap : obscure option for running under GDB
	-I, --image-name <image-name>
	 and <image-name> defaults to dx86cl64.image

Open a unconnected UDP (datagram, internet) socket failed on CCL trunk darwinX8632. (darwinX8664 is OK)

Welcome to Clozure Common Lisp Version 1.3-dev-r11173M-trunk  (DarwinX8632)!
? (openmcl-socket:make-socket :address-family :internet
					  :type :datagram)
> Error: value NIL is not of the expected type (OR INTEGER STRING).
> While executing: CCL::HOST-AS-INET-HOST, in process listener(1).
> Type :POP to abort, :R for a list of available restarts.
> Type :? for other options.
1 > :b  
 (454C2C) : 0 (HOST-AS-INET-HOST NIL) 1199
 (454C38) : 1 (MAKE-TCP-STREAM-SOCKET
                4
                :ADDRESS-FAMILY
                :INTERNET
                :TYPE
                :DATAGRAM) 359
 (454C78) : 2 (MAKE-TCP-SOCKET :ADDRESS-FAMILY :INTERNET :TYPE :DATAGRAM) 503
 (454CAC) : 3 (MAKE-SOCKET :ADDRESS-FAMILY :INTERNET :TYPE :DATAGRAM) 695
 (454DA0) : 4 (CALL-CHECK-REGS
                MAKE-SOCKET
                :ADDRESS-FAMILY
                :INTERNET
                :TYPE
                :DATAGRAM) 247
 (454DBC) : 5 (TOPLEVEL-EVAL
                (MAKE-SOCKET :ADDRESS-FAMILY :INTERNET :TYPE :DATAGRAM)
                NIL) 759
 (454DFC) : 6 (READ-LOOP :INPUT-STREAM
                         #<SYNONYM-STREAM to *TERMINAL-IO* #x891D4C6>
                         :OUTPUT-STREAM
                         #<SYNONYM-STREAM to *TERMINAL-IO* #x891D3EE>
                         :BREAK-LEVEL
                         0
                         :PROMPT-FUNCTION
                         #<Compiled-function (:INTERNAL CCL::READ-LOOP) (Non-Global)  #x834F0CE>) 1567
 (454F00) : 7 (TOPLEVEL-LOOP) 79
 (454F08) : 8 (FUNCALL #'#<(:INTERNAL (TOPLEVEL-FUNCTION (CCL::LISP-DEVELOPMENT-SYSTEM T)))>) 87
 (454F14) : 9 (FUNCALL #'#<(:INTERNAL CCL::MAKE-MCL-LISTENER-PROCESS)>) 583
 (454F60) : 10 (RUN-PROCESS-INITIAL-FORM
                 #<TTY-LISTENER listener(1) [Active] #x891C886>
                 (#<COMPILED-LEXICAL-CLOSURE # #x891C5A6>)) 671
 (454FA4) : 11 (FUNCALL #'#<(:INTERNAL CCL::%PROCESS-PRESET-INTERNAL)>
                        #<TTY-LISTENER listener(1) [Active] #x891C886>
                        (#<COMPILED-LEXICAL-CLOSURE # #x891C5A6>)) 335
 (454FCC) : 12 (FUNCALL #'#<(:INTERNAL CCL::THREAD-MAKE-STARTUP-FUNCTION)>) 279