attrs

Vocabulary

xml.data

Definition

USING: sequences ;

IN: xml.data

TUPLE: attrs { alist sequence initial: f } ;

Methods

USING: accessors assocs xml.data ;

M: attrs >alist alist>> ;


USING: assocs kernel xml.data ;

M: attrs assoc-like drop dup attrs? [ >attrs ] unless ;


USING: accessors assocs sequences xml.data ;

M: attrs assoc-size alist>> length ;


USING: assocs kernel sequences xml.data ;

M: attrs at* attr@ nip [ second t ] [ f f ] if* ;


USING: accessors assocs kernel xml.data ;

M: attrs clear-assoc f >>alist drop ;


USING: accessors kernel xml.data ;

M: attrs clone alist>> clone <attrs> ;


USING: accessors assocs kernel sequences xml.data ;

M: attrs delete-at
    [ nip ] [ attr@ drop ] 2bi
    [ swap alist>> remove-nth! drop ] [ drop ] if* ;


USING: assocs kernel vectors xml.data ;

M: attrs new-assoc drop <vector> <attrs> ;


USING: accessors arrays assocs kernel sequences vectors xml.data
;

M: attrs set-at
    2dup attr@ nip
    [ 2nip set-second ] [
        [ assure-name swap 2array ] dip [ alist>> ?push ] keep
        alist<<
    ] if* ;