On Monday 12 January 2004 14:46, [EMAIL PROTECTED] wrote:
> On Monday 12 January 2004 14:30, Andras Simon wrote:
> > You're messing with the internals:
>
> It is why i define it in a new package. it shouldn't have conflicted.
Ok. as you all said, packages implicitly use the cl package !
thanks.
> > CL-USER(1): (find-class 'method)
> >
> > #<STANDARD-CLASS METHOD {281A3EB5}>
> >
> > Don't do that.
> >
> > Andras
> >
> > On Mon, 12 Jan 2004 [EMAIL PROTECTED] wrote:
> > > CMU Common Lisp 18e, running on ...
> > > Loaded subsystems:
> > > Python 1.1, target Intel x86
> > > CLOS 18e (based on PCL September 16 92 PCL (f))
> > >
> > >
> > > There's a problem when i define a class with name "method" in a new
> > > package.
> > >
> > >
> > > * (defpackage toto)
> > > #<The TOTO package, 0/9 internal, 0/2 external>
> > >
> > > * (in-package toto)
> > > #<The TOTO package, 1/9 internal, 0/2 external>
> > >
> > > * *package*
> > > #<The TOTO package, 1/9 internal, 0/2 external>
> > >
> > > * (defclass titi () ()) ; it's ok
> > > #<STANDARD-CLASS TITI {48137BCD}>
> > >
> > > * (defclass method () ()) ; it's no more ok ?
> > > ; [GC threshold exceeded with 12,012,056 bytes in use. Commencing GC.]
> > > ; [GC completed with 10,818,280 bytes retained and 1,193,776 bytes
> > > freed.] ; [GC will next occur when at least 22,818,280 bytes are in
> > > use.] ; [GC threshold exceeded with 22,829,112 bytes in use.
> > > Commencing GC.] ; [GC completed with 22,831,040 bytes retained and
> > > -1,928 bytes freed.] ; [GC will next occur when at least 34,831,040
> > > bytes are in use.] ; [GC threshold exceeded with 34,844,600 bytes in
> > > use. Commencing GC.] ; [GC completed with 34,846,528 bytes retained
> > > and -1,928 bytes freed.] ; [GC will next occur when at least 46,846,528
> > > bytes are in use.]
> > >
> > > and then it crashes !
