[Openmcl-devel] iSight code?

[Ron Garret]

On Jan 27, 2008, at 7:26 PM, R. Matthew Emerson wrote:

>
> On Jan 27, 2008, at 7:35 PM, Ron Garret wrote:
>
>
> You need to load the appropriate shared libraries, too.
>
> ? (objc:load-framework "Quartz" :quartz)
> NIL
> ? (make-instance 'ns:q-c-view)
> #<Q-C-VIEW <QCView: 0x1845e1e0> (#x1845E1E0)>
> ?

Ah.  But it doesn't work for me:

? (objc:load-framework "Quartz" :quartz)
 > Error: Unknown foreign type: :<CAC>ONSTRAINT<A>TTRIBUTE
 > While executing: CCL::%PARSE-FOREIGN-TYPE, in process Listener(104).
 > Type :POP to abort, :R for a list of available restarts.
 > Type :? for other options.
1>
? (objc:load-framework "QuartzCore" :quartzcore)
 > Error: Unknown foreign type: :<CAC>ONSTRAINT<A>TTRIBUTE
 > While executing: CCL::%PARSE-FOREIGN-TYPE, in process Listener(104).
 > Type :POP to abort, :R for a list of available restarts.
 > Type :? for other options.
1>

I tried doing a CVS update and regenerating all my interface dirs, but  
that didn't help.

It's progress though.  I can do this now:

? (ccl::make-objc-instance "QCView")
#<Q-C-VIEW <QCView: 0x123b0840> (#x123B0840)>
?

But this still doesn't work:

? (make-instance 'ns:q-c-view)

 > Error: Reader error: No external symbol named "Q-C-VIEW" in package  
#<Package "NS"> .

rg