[cells-devel] Re: Cells: metaclass option not handled correctly ?

Kenny Tilton ktilton at nyc.rr.com
Tue Jan 10 22:11:47 UTC 2006


Frank Goenninger - PRION Consulting wrote:

> Kenny,
>
> before posting to cells-devel I wanted to ask if it's only in my  
> cells 2.0 version that I have difficulties with something like:
>
> (defpackage :net.goenninger.sw.core
>   (:nicknames "NG.CORE")
>   (:use :common-lisp
>     :db.allegrocache
>     :cells)
>   (:export #:core))
>
> (in-package :ng.core)
>
> (defmodel mvc-base ()
>   ((model      :cell :ephemeral :accessor model      :initform nil)
>    (view       :cell :ephemeral :accessor view       :initform nil)
>    (controller :cell :ephemeral :accessor controller :initform nil))
>   (:metaclass persistent-class)                               ;;  <<-- 
> HERE !!!
> )
>
> Without modifying the defmodel macro I get some undefined generic  
> function error. With this modification
>
> .... in the defclass part of defmodel ....
>
>  (:metaclass ,(or (cadr (find :metaclass options :key #'car))  ;;  
> Need to take the cadr of the find result !!!
>                               'standard-class)))


Your fix looks right, thanks.

btw, I started to look at AllegroCache and especially (+ Cells acache) 
but got sidetracked. Acache also sounded a little raw and pre-alpha 
based on exchanges with Foderaro.

Let me know if you need help.

kt




More information about the cells-devel mailing list