matches-slots? ( actual requested -- ? )


Vocabulary
foogle.private

Inputs
actualan object
requestedan object


Outputs
?an object


Definition
USING: kernel sequences ;

IN: foogle.private

:: matches-slots? ( actual requested -- ? )
actual requested
[ [ H{ } slot-type ] bi@ matches-slot? ] 2all? ;