Re: Creating classes and slots

Peter Robisch wrote:
> "Michael Erdmann" <michael.erdmann@snafu.de> wrote in message
> news:67l882-ok3.ln1@boavista.mydomain.de
>
> 
>
>
> Fun-O offers a Persistent Storage Library Pack (1625K, $24.95).
> I expect you can find it also in one of OpenDylan subversion
> directories.
> So far I know it only defines the interface level not containing
> an implementation.
> If you need further information I can try to search the module
> names. Tomorrow. Currently I have to switch to another task.
>
> Peter

I have come to a concept. I will constract classes from the
information stored in the data base by means of make( <class>.
My only problem now is to figure out how the specify the slot information.
The DRM states a sequence with keyword/value pairs, what does
it mean?

#[ type: <integer>, ....]

This does not work! Is there some where an example?



---------------------
define class <root-type> ( <object> )
slot id :: <integer> ;
end class;

......
let slots = #[ ];

let cls = make( <class>,
superclasses: make( <simple-object-vector>, size: 1, fill:
<root-type> ),
all-superclasses: make( <simple-object-vector>, size: 1, fill:
<root-type> ),
closest-primary-superclass: <root-type>,
slots: slots,
slot-overrides: #[],
class-bucket: 2000
);

But i



>
>