still is obscure to me ...

[David Pirotte]

Hi,

can I expect that the following code WILL produce a NEW defclass-form
at every dbu/build-db-class-1 evaluation ?

if not, what should be a 'good' code ?


(define (dbu/build-db-class-1 class-name slot-defs slot-idts)
  (let ((defclass-form (eval `(define-class ,class-name () ,@slot-defs)))
        (export-form (eval `(export ,class-name ,@slot-idts))))
    defclass-form
    export-form
    ))


thanks,
david