dbref-assoc? ( assoc -- ? )

Vocabulary

bson.constants

Inputs

assoc

an object

Outputs

?

an object

Definition

USING: assocs combinators.short-circuit kernel ;

IN: bson.constants

: dbref-assoc? ( assoc -- ? )
    { [ "$ref" swap key? ] [ "$id" swap key? ] } 1&& ; inline