yet another ccl/x86 issue

Cyrus Harmon — 2008-12-01T18:47:03

The combination of ccl and my code seems to be quite good at picking up subtle "issues" in both systems. Here's the latest: Bug (probably): can't determine class of # #x8F1F7B6> [Condition of type SIMPLE-ERROR] Restarts: 0: [LOAD-SOURCE] Load "home:projects;git.cyrusharmon.org;clem;src;subtr.lisp" instead of "/ Users/sly/projects/git.cyrusharmon.org/clem/src/ccl-1.3-darwin-x86/ subtr.dx32fsl" 1: [RECOMPILE] Compile "home:projects;git.cyrusharmon.org;clem;src;subtr.lisp" into "/Users/ sly/projects/git.cyrusharmon.org/clem/src/ccl-1.3-darwin-x86/ subtr.dx32fsl" then load "/Users/sly/projects/git.cyrusharmon.org/clem/ src/ccl-1.3-darwin-x86/subtr.dx32fsl" again 2: [RETRY-LOAD] Retry loading #P"/Users/sly/projects/ git.cyrusharmon.org/clem/src/ccl-1.3-darwin-x86/subtr.dx32fsl" 3: [SKIP-LOAD] Skip loading #P"/Users/sly/projects/ git.cyrusharmon.org/clem/src/ccl-1.3-darwin-x86/subtr.dx32fsl" 4: [LOAD-OTHER] Load other file instead of #P"/Users/sly/projects/ git.cyrushar

Unprintable CCL::IMMEDIATE : #xEB

Cyrus Harmon — 2008-12-01T05:07:19

Ok, so my latest issue in trying to port my stuff to ccl is the error shown below. Not sure where to begin with this one. thanks, Cyrus value # is not of the expected type CCL::UVECTOR. [Condition of type TYPE-ERROR] Restarts: 0: [RETRY] Retry SLIME REPL evaluation request. 1: [ABORT] Return to SLIME's top level. 2: [ABORT-BREAK] Reset this thread 3: [ABORT] Kill this thread Backtrace: 0: ((:INTERNAL CCL::%XERR-DISP)) 1: (CCL::FUNCALL-WITH-ERROR-REENTRY-DETECTION #) 2: (CCL::%XERR-DISP -334757490) 3: (CCL::%PASCAL-FUNCTIONS% 2 -334757490) 4: (CCL::%PR-INTEGER # 10 # T NIL) 5: (CCL::%RSC-STRING #) 6: (CCL::%ERR-DISP-INTERNAL # (# \M #(0 0)) 1564382) 7: (READ-SEQUENCE #(0 0) #

(setf (find-class ...) ...) problem

Cyrus Harmon — 2008-11-30T21:40:14

I'm trying to use david lichteblau's cxml-stp with ccl and am getting errors about undefined types. It seems that ccl doesn't like the following: (setf (find-class 'document-type) (find-class 'cxml-stp:document-type)) a similar problem was discussed a while back where this problem arose with GSharp, but I'm not sure what the resolution was. Any suggestions? thanks, Cyrus

International Lisp Conference 2009

Andrew Shalit — 2008-11-26T21:13:18

The 2009 ILC will be held in Cambridge, Mass. Many Clozurites will be in attendance. If you have something you'd like to share, please consider submitting a paper. Regardless of that, we hope that you'll attend. ---- CALL FOR SUBMISSIONS INTERNATIONAL LISP CONFERENCE 2009 Lisp: The Next 50 Years http://www.international-lisp-conference.org Massachusetts Institute of Technology Cambridge, Massachusetts, USA March 22-25, 2009 Sponsored by the Association of Lisp Users General Information: The Association of Lisp Users is pleased to announce the 2009 International Lisp Conference will be held in Cambridge, Massachusetts, at the Massachusetts Institute of Technology, Sunday through Wednesday, March 22-25, 2009. The emphasis will be on present and future applications of technologies that have been or might soon be associated with the Lisp programming language and/or related languages and software. We encourage

defclass initform issue

Zach Beane — 2008-11-26T12:51:22

I didn't expect the following result: ? (defclass foo () ((data :initform (make-array 1 :element-type '(signed-byte 16) :initial-element -1)))) # ? (make-instance 'foo) > Error: value -1 is not of the expected type (UNSIGNED-BYTE 16). Startup says: Welcome to Clozure Common Lisp Version 1.2-r10552 (LinuxX8664)! Is that a bug in CCL, or in my expectations? Zach

Running out of file descriptors with run-program

Daniel Dickison — 2008-11-25T21:24:22

I have a program that uses run-program to call out to ImageMagick many times (on the order of hundreds of calls). Eventually, I run into a "Too many open files" error inside a call to (pipe) in run-program. I specify :wait t so it shouldn't leave FDs open after the call exits. I don't specify an :input; however, I do specify stream objects for :output and :error, and my hunch is that FDs are left open when these two streams are different. If I change *error-output* to :output below, then the error goes away: (multiple-value-bind (status-key exit-code) (ccl:external-process-status (ccl:run-program "convert" (list (path "svg") (path "gif")) :wait t :output *verbose-output* :error *error-output*)) (assert (not (eq status-key :running))) (unless (= exit-code 0) (error "ImageMagick returned non-zero on exit: ~D" exit- code)))) *verbose-output*

sharing in external-process streams

Osei Poku — 2008-11-20T15:00:48

Hi, The attached diff was my solution for allowing customization of the :sharing keyword when creating input and output streams for external processes. The problem I was trying to solve was not being able to read and/or write on the streams that are created for external-processes when using :stream for the :input and :output keyword arguments. In particular, any reading and writing from threads that did not create the external-process failed due the the streams defaulting as :private to the creating thread. Comments? Osei Index: level-1/linux-files.lisp =================================================================== --- level-1/linux-files.lisp (revision 10465) +++ level-1/linux-files.lisp (working copy) < at >< at > -766,6 +766,8 < at >< at > (format stream " : ~d" (external-process-%exit-code p))) (format stream ")")))) +(defvar *external-process-sharing* :private) + (defun get-descriptor-for (object proc close-in-parent close-on-error &rest

Pledge Drive and University / Corporate Support

Andrew Shalit — 2008-11-19T03:09:02

We've heard from a bunch of people who would like to support CCL financially but can't get their purchasing departments to give money to a "pledge drive." I'm happy to say that we have a solution to that problem. We've recently begun selling supported copies of Clozure CL. Pricing is as follows: Clozure CL + 1 support incident = $250 Clozure CL + 2 support incidents = $500 Clozure CL + 5 support incidents = $1,000 etc. We're happy to generate an invoice or fill a purchase order for a supported copy of CCL for anyone who wants one. Just let us know the number of support incidents you want, or the amount you want to spend, and let us know the organization, department, etc that we should be invoicing. Once the purchase is complete, you can use the support incidents to get direct support for your work, or you can direct us to use them for improvements to the CCL IDE. Please contact me if you'd like to make such a purchase. Yours, Andrew Shalit Clozure Associates

"internal" functions and xref

Takehiko Abe — 2008-11-18T08:25:06

(while trying to fix slime's who-calls for ccl-1.3, I noticed) ccl::make-xref-entry returns bogus xrefs when it is given "internal" functions. Example: $ ccl -n Welcome to Clozure Common Lisp Version 1.3-dev-r (LinuxX8664)! ? (require 'xref) XREF ("XREF") ? (ccl::callers 'print-object) (# # CCL::WRITE-A-FROB # (:INTERNAL (PRINT-OBJECT (CLASS T))) (:INTERNAL (PRINT-OBJECT (STANDARD-OBJECT T))) (:INTERNAL CCL::WRITE-AN-ISTRUCT)) ? (car (last *)) (:INTERNAL CCL::WRITE-AN-ISTRUCT) ? (ccl::make-xref-entry * :direct-calls) # ? A simple fix I came up with was to add a new CASE clause for :internal: (defun make-xref-entry (input relation) (etypecase input (symbol ...) (method ...) (cons

CCL IDE Pledge Drive Update

Andrew Shalit — 2008-11-14T20:10:20

Hello CCL Users -- The Clozure CL Development Environment Pledge Drive is going well! We have received pledges totaling $19,150. That brings us over 90% of the way to our goal of $20,000. [Imagine thermometer graphic here, with red bar reaching almost to the top.] Please help us reach our goal, so we can get down to work building the best Common Lisp IDE anywhere. When we announced the Pledge Drive, we requested pledges of $500 or more. At this time, we'd like to open it up to contributions of any amount. Every little bit will help us reach our goal of $20,000. You can contribute directly through PayPal: just direct your payment "payments< at >clozure.com ". To make a pledge or payment another way, please contact me at alms< at >clozure.com . Please make your pledge today. To recap: Our goal is to raise $20,000 to support two months of development on the CCL IDE, running on Mac OS X. This will allow us to greatly improve the quality and reliability of the CCL IDE. Specific work will

About lispbuilder on win32

sky sea — 2008-11-14T12:55:51

_______________________________________________ Openmcl-devel mailing list Openmcl-devel< at >clozure.com http://clozure.com/mailman/listinfo/openmcl-devel

logical pathnames not working with alias

Alexander Repenning — 2008-11-14T00:43:11

_______________________________________________ Openmcl-devel mailing list Openmcl-devel< at >clozure.com http://clozure.com/mailman/listinfo/openmcl-devel

NSNormalWindowLevel

Arthur W Cater — 2008-11-06T10:01:41

_______________________________________________ Openmcl-devel mailing list Openmcl-devel< at >clozure.com http://clozure.com/mailman/listinfo/openmcl-devel

Cockpit Error using SAVE-APPLICATION?

2008-11-05T19:44:19

Hi, I am creating an application via save-application. On start with the created image (at this point is w/o the kernel appended so is started with ccl -I ), I am blowing off with an error which makes me think I am doing something wrong, which is likely obvious to those who've done this with CCL before (I've done this all the time with ACL). Anyway, here is the very simple example: $ ccl Welcome to Clozure Common Lisp Version 1.2-r10552 (LinuxX8664)! ? (defun apri-toplevel () (format t "~%Persistence starts") (dotimes (i 10) (sleep 5) (format t "."))) APRI-TOPLEVEL ? (save-application "/var/aprigo/Persistence/persistence.lx64" :toplevel-function 'apri-toplevel) $ $ ccl -I /var/aprigo/Persistence/persistence.lx64 Error during early application initialization: Fault during write to memory address #x165CE9F8 ? for help [31383] OpenMCL kernel debugger: (K) [31383] OpenMCL kernel debugger: Killed $ If I change the toplevel to: (defun apri-toplevel () :apri-done) then it seems to work.

NSFontAttributeName

Arthur W Cater — 2008-11-03T11:36:50

_______________________________________________ Openmcl-devel mailing list Openmcl-devel< at >clozure.com http://clozure.com/mailman/listinfo/openmcl-devel

Pledge Drive to Support the CCL DevelopmentEnvironment

Andrew Shalit — 2008-10-28T19:41:39

Hello CCL Users - I'm happy to officially announce our pledge drive to raise funds to improve the CCL IDE. Now is your chance to help us build a development environment that is worthy of the great CCL compiler and runtime that we already have. Our goal is to raise $20,000 in pledges. This will allow us to put substantial dedicated effort into the CCL IDE. We want to take it from its current wobbly alpha state and turn it into a solid stable development environment for Common Lisp. The priorities for our work will be set by the people who fund the project. So far these priorities include: 1. Improving and stabilizing the editor. (Think Fred.) 2. Completing the other existing IDE tools (Processes, Apropos, Inspect, Search Files). 3. Adding additional features and tools to the editor and the IDE (e.g. multiple-font support). 4. Simplifying the installation and build process to make CCL available to more users, including Lisp newbies. 5. Reorganizing the source code to encourage futu

Using ccl as a #! scripting language

John McAleely — 2008-10-26T12:07:06

Hi, I've been learning lisp recently, and I've wanted to use it for 'casual' scripting in order to become more familiar with it. As such, I wanted to find a way to use it on my mac as a scripting language from the terminal in #! scripts. The script below is my attempt at making this practical, that I've used on 10.5 with a recent version (just before 1.2) of ccl Presented here in the hope others find it useful. John ---/usr/local/bin/ccl-script--- #!/bin/bash # ccl-script # # Placed in the public domain by the author John McAleely mcaleely.com > # # A front end for ccl to be used to create #! executable text scripts on # unix like operating systems. # Start your text script with: # #!/usr/bin/env /path/to/ccl-script *command-line* # # *command-line* is defined in the script as a list of the # command line arguments used to invoke the script # #! causes the remainder of the line to be ignored. # # eg # ##!/usr/bin/env /path/to/ccl-script *command-line* #(format t "Hello Worl

Typing #

Stephen Parker — 2008-10-25T12:14:18

I'm sure this is very obvious, but I can't work out how to type a # symbol into Clozure using my UK macbook. Normally this would be Alt-3. Using "Special Characters ..." is getting tiresome. Advice welcome. Thanks, stephen

Slime problem on windows

Marko Kocić — 2008-10-22T08:28:03

First, great work on win32 port. I tried to use slime with it but got the following error when tried: (progn (load "c:/dev/cvstree/lisp/slime/swank-loader.lisp" :verbose t) (funcall (read-from-string "swank-loader:init")) (funcall (read-from-string "swank:start-server") "c:/DOCUME~1/markko/LOCALS~1/Temp/slime.932" :coding-system "iso-latin-1-unix")) ; loading system definition from c:/lisp/lib/asdf-binary-locations/asdf-binary-locations.asd into # ; registering # as ASDF-BINARY-LOCATIONS Welcome to Clozure Common Lisp Version 1.3-dev-r11178M-trunk (WindowsX8632)! ? ;Loading #P"c:/dev/cvstree/lisp/slime/swank-loader.lisp"... ;Loading #P"C:/Documents and Settings/markko/.slime/fasl/2008-10-21/openmcl-version_1.3-dev-r11178m-trunk__(windowsx8632)-windows-x86/swank-backend.wx32fsl"... ;Loading #P"C:/Documents and Settings/markko/.slime/fasl/2008-10-21/openmcl-version_1.3-dev-r11178m-trunk__(windowsx8632)-windows-x86/metering.wx32fsl"... ;Compiling "c:/de

AppleScript'ing equivalents in Lisp?

Christian Lynbech — 2008-10-20T18:00:35

Being an utter newbie at this Mac thing, I wondered if there where an relatively easy way to access application functionality as I understand one can with AppleScript? I have the dual problem of finding out which objects to access and how to access them. AppleScript does not look that frightening but I would rather access the information from an environment that I know and love :-) My first target project is to sanitize some track information in iTunes. Sometimes what should have been the track title, ends up in the composer field and handling that one track at a time is frustratingly laborious when I just want to shuffle some existing fields in some one-of fashion. ------------------------+----------------------------------------------------- Christian Lynbech | christian #\< at > defun #\. dk ------------------------+----------------------------------------------------- Hit the philistines three times over the head with the Elisp reference manual. - petonic< at >hal.

SLIME and ccl on win32

Gary Byers — 2008-10-20T10:06:31

The win32 port of CCL seems to be far enough along to run under SLIME. (It's actually been able to run under SLIME for a week or so; quitting reliably when running under SLIME is a relatively recent development ...) Some notes: - I've tried this with a relatively recent CVS SLIME (the version I've been using announces itself as "SLIME 2008-10-10".) - There are several different versions of [X]Emacs for Windows;they may or may not differ in functionality (socket/subprocess support). I was able to get things working with the official FSF binaries from ftp.gnu.org (currently or very recently available as 'emacs-22.2-bin-i386.zip'. I have no idea why that Emacs wants to make its initial window (er, 'frame') taller than my monitor. It's probably quite a bit harder to get a Cygwin version of Emacs or XEmacs to work; Cygwin programs tend to have different view of the filesystem than that seen by native programs, and this can cause confusion. That particular Emacs considers the user's home directory to be "c:/D

gmane.lisp.openmcl.devel

yet another ccl/x86 issue

Unprintable CCL::IMMEDIATE : #xEB

(setf (find-class ...) ...) problem

International Lisp Conference 2009

defclass initform issue

Running out of file descriptors with run-program

sharing in external-process streams

Pledge Drive and University / Corporate Support

"internal" functions and xref

CCL IDE Pledge Drive Update

About lispbuilder on win32

logical pathnames not working with alias

NSNormalWindowLevel

Cockpit Error using SAVE-APPLICATION?

NSFontAttributeName

Pledge Drive to Support the CCL DevelopmentEnvironment

Using ccl as a #! scripting language

Typing #

Slime problem on windows

AppleScript'ing equivalents in Lisp?

SLIME and ccl on win32