slot-named-checked ( class initials name slots -- class initials slot-spec )

Vocabulary

classes.tuple.parser

Inputs

class	an object
initials	an object
name	an object
slots	an object

Outputs

class	an object
initials	an object
slot-spec	an object

Definition

USING: kernel slots ;

IN: classes.tuple.parser

: slot-named-checked
    ( class initials name slots -- class initials slot-spec )
    over [ slot-named* ] dip check-slot-exists drop ;