IN: accessors

GENERIC: class>> ( object -- value )

USING: accessors compiler.tree slots.private ;

M: #call class>> 7 slot ; inline

USING: accessors alien.c-types classes.struct
classes.struct.private math x11.xlib ;

M: XVisualInfo class>>
T{ struct-slot-spec
{ name "class" }
{ offset 24 }
{ class fixnum }
{ initial 0 }
{ type int }
} read-struct-slot ; inline

USING: accessors alien.c-types classes.struct
classes.struct.private math x11.xlib ;

M: XWindowAttributes class>>
T{ struct-slot-spec
{ name "class" }
{ offset 40 }
{ class fixnum }
{ initial 0 }
{ type int }
} read-struct-slot ; inline

USING: accessors alien.c-types classes kernel.private
slots.private ;

M: abstract-c-type class>> 2 slot { class } declare ; inline

USING: accessors db.queries slots.private ;

M: all-slots-ignored class>> 2 slot ; inline

USING: accessors classes.algebra.private slots.private ;

M: anonymous-complement class>> 2 slot ; inline

USING: accessors kernel.private slots.private smalltalk.ast
strings ;

M: ast-foreign class>> 2 slot { string } declare ; inline

USING: accessors classes slots.private ;

M: bad-inheritance class>> 2 slot ; inline

USING: accessors slots slots.private ;

M: bad-initial-value class>> 4 slot ; inline

USING: accessors classes.tuple.parser slots.private ;

M: bad-slot-name class>> 2 slot ; inline

USING: accessors slots slots.private ;

M: bad-slot-value class>> 3 slot ; inline

USING: accessors classes.tuple slots.private ;

M: bad-superclass class>> 2 slot ; inline

USING: accessors classes.union.private slots.private ;

M: cannot-reference-self class>> 2 slot ; inline

USING: accessors generic slots.private ;

M: check-method-error class>> 2 slot ; inline

USING: accessors classes.mixin slots.private ;

M: check-mixin-class-error class>> 2 slot ; inline

USING: accessors compiler.tree.propagation.constraints
slots.private ;

M: class-constraint class>> 3 slot ; inline

USING: accessors delegate.private slots.private ;

M: consultation class>> 3 slot ; inline

USING: accessors slots.private stack-checker.dependencies ;

M: depends-on-final class>> 2 slot ; inline

USING: accessors slots.private stack-checker.dependencies ;

M: depends-on-instance-predicate class>> 3 slot ; inline

USING: accessors slots.private stack-checker.dependencies ;

M: depends-on-method class>> 2 slot ; inline

USING: accessors slots.private stack-checker.dependencies ;

M: depends-on-next-method class>> 2 slot ; inline

USING: accessors slots.private stack-checker.dependencies ;

M: depends-on-tuple-layout class>> 2 slot ; inline

USING: accessors generic.single slots.private ;

M: inconsistent-next-method class>> 2 slot ; inline

USING: accessors compiler.codegen.labels kernel.private math
slots.private ;

M: label-fixup-state class>> 3 slot { integer } declare ;
inline

USING: accessors slots.private smalltalk.compiler.lexenv ;

M: lexenv class>> 6 slot ; inline

USING: accessors classes classes.maybe kernel.private
slots.private words ;

M: maybe class>> 2 slot { union{ word classoid } } declare
; inline

USING: accessors generic slots.private ;

M: method-lookup-failed class>> 2 slot ; inline

USING: accessors classes.mixin slots.private ;

M: mixin-instance class>> 2 slot ; inline

USING: accessors db.tuples slots.private ;

M: no-slots-named class>> 2 slot ; inline

USING: accessors images.tiff slots.private ;

M: no-tag class>> 2 slot ; inline

USING: accessors regexp.classes slots.private ;

M: not-class class>> 2 slot ; inline

USING: accessors slots.private tuple-arrays ;

M: not-final class>> 2 slot ; inline

USING: accessors db.types slots.private ;

M: not-persistent class>> 2 slot ; inline

USING: accessors generic.single slots.private ;

M: predicate-engine class>> 2 slot ; inline

USING: accessors regexp.classes slots.private ;

M: primitive-class class>> 2 slot ; inline

USING: accessors dns slots.private ;

M: query class>> 4 slot ; inline

USING: accessors constructors slots.private ;

M: repeated-constructor-parameters class>> 2 slot ; inline

USING: accessors roles slots.private ;

M: role-slot-overlap class>> 2 slot ; inline

USING: accessors dns slots.private ;

M: rr class>> 4 slot ; inline

USING: accessors slots slots.private ;

M: slot-spec class>> 4 slot ; inline

USING: accessors db.types slots.private ;

M: sql-spec class>> 2 slot ; inline

USING: accessors bootstrap.image.private slots.private ;

M: tuple-removed class>> 2 slot ; inline

USING: accessors constructors slots.private ;

M: unknown-constructor-parameters class>> 2 slot ; inline

USING: accessors compiler.tree.propagation.info slots.private ;

M: value-info-state class>> 2 slot ; inline