Custom Query (1030 matches)

The macro new-pixel-format from the rubix opengl example code (in rubix/opengl.lisp) has been redefined as a function and does not appear to be functional. Error attached and here's the code which resulted in the error:

(opengl:new-pixel-format #$NSOpenGLPFAMultisample

#$NSOpenGLPFASampleAlpha #$NSOpenGLPFASampleBuffers 2 #$NSOpenGLPFASamples 4)

(it's a minor issue, but I do need the functionality as my non-example code uses it)

I'm attempting to use the GraphX framework (​http://blog.oofn.net/projects/graphx) via the bridge but it doesn't seem to be fully 'registering' as the bridge knows about the class methods but doesn't seem to pick up the classes themselves. As a result, I obviously can't create an instance:

(objc:make-objc-instance "CTScatterPlotView")

ObjC class CTScatterPlotView not found

[Condition of type SIMPLE-ERROR]

Restarts:

0: [ABORT-REQUEST] Abort handling SLIME request. 1: [ABORT-BREAK] Reset this process 2: [ABORT] Kill this process

Backtrace:

0: (CCL::LOOKUP-OBJC-CLASS "CTScatterPlotView" 'T) 1: (CCL::%OBJC-CLASS-CLASSPTR #S(CCL::OBJC-CLASS-DESCRIPTOR :NAME "CTScatterPlotView" :CLASSPTR NIL))

So I confirm that the bridge doesn't see the class:

(objc:@class "CTScatterPlotView")

ObjC class CTScatterPlotView not found

[Condition of type SIMPLE-ERROR]

Restarts:

0: [ABORT-REQUEST] Abort handling SLIME request. 1: [ABORT-BREAK] Reset this process 2: [ABORT] Kill this process

Backtrace:

0: (CCL::LOOKUP-OBJC-CLASS "CTScatterPlotView" 'T) 1: (CCL::%OBJC-CLASS-CLASSPTR #S(CCL::OBJC-CLASS-DESCRIPTOR :NAME "CTScatterPlotView" :CLASSPTR NIL))

But the methods were picked up so it is at least partially loading the interfaces:

(ccl::lookup-objc-message-info "showFill") #S(CCL::OBJC-MESSAGE-INFO :MESSAGE-NAME "showFill" :METHODS (#<OBJC-METHOD-INFO -[CTCurveView showFill] #x9880F1E> #<OBJC-METHOD-INFO -[CTHistogramView showFill] #x9880F8E> #<OBJC-METHOD-INFO -[CTScatterPlotView showFill] #x988100E>) :AMBIGUOUS-METHODS NIL :REQ-ARGS NIL :FLAGS NIL :PROTOCOL-METHODS NIL :LISP-NAME NIL :SELECTOR NIL)

I've also confirmed that class definition is making it into the FFI and then the CDB files. (I only confirmed that there was a class entry in the FFI file and ran 'strings objc-classes.cdb | grep CT')

dixiechicks.isi.edu 50%  ccl -n
Welcome to Clozure Common Lisp Version 1.4-r14334M  (LinuxX8632)!
? (user-homedir-pathname)
#P"/nfs/isd3/philpot/"

so far so good, but...

? (let ((*default-pathname-defaults*
          (make-pathname :directory '(:absolute "tmp")
             :name "dummy"
             :type "txt"
             :version :newest)))
   (user-homedir-pathname))
#P"/"
? (let ((*default-pathname-defaults* #p"/tmp/a.b"))
    (user-homedir-pathname))
#P"/nfs/isd3/philpot/a.b"

Looks like some merging is going on, but why?

As I read the CLHS, user-homedir-pathname is supposed to return either a (presumably constant) pathname sans name, type, and version components -- or NIL.

Is this behavior conformant?

Andrew