anchor<< ( value object -- )

Vocabulary

accessors

Inputs

value	an object
object	an object

Outputs

None

Definition

IN: accessors

GENERIC: anchor<< ( value object -- )

Methods

USING: accessors alien.c-types classes.struct
classes.struct.private kernel yaml.ffi ;

M: alias_event_data anchor<<
    T{ struct-slot-spec
        { name "anchor" }
        { offset 0 }
        { class object }
        { type c-string }
    } write-struct-slot ; inline


USING: accessors slots.private yaml.private ;

M: factor_mapping_start_event_data anchor<< 2 set-slot ; inline


USING: accessors slots.private yaml.private ;

M: factor_sequence_start_event_data anchor<< 2 set-slot ; inline


USING: accessors alien.c-types classes.struct
classes.struct.private kernel yaml.ffi ;

M: mapping_start_event_data anchor<<
    T{ struct-slot-spec
        { name "anchor" }
        { offset 0 }
        { class object }
        { type c-string }
    } write-struct-slot ; inline


USING: accessors alien.c-types classes.struct
classes.struct.private kernel yaml.ffi ;

M: scalar_event_data anchor<<
    T{ struct-slot-spec
        { name "anchor" }
        { offset 0 }
        { class object }
        { type c-string }
    } write-struct-slot ; inline


USING: accessors alien.c-types classes.struct
classes.struct.private kernel yaml.ffi ;

M: sequence_start_event_data anchor<<
    T{ struct-slot-spec
        { name "anchor" }
        { offset 0 }
        { class object }
        { type c-string }
    } write-struct-slot ; inline


USING: accessors classes.struct classes.struct.private yaml.ffi
;

M: token_data anchor<<
    T{ struct-slot-spec
        { name "anchor" }
        { offset 0 }
        { class anchor_token_data }
        { initial S{ anchor_token_data { value f } } }
        { type anchor_token_data }
    } write-struct-slot ; inline


USING: accessors slots.private urls ;

M: url anchor<< 9 set-slot ; inline


USING: accessors slots.private yaml.private ;

M: yaml-alias anchor<< 2 set-slot ; inline


USING: accessors slots.private yaml.private ;

M: yaml-anchor anchor<< 2 set-slot ; inline


USING: accessors alien.c-types classes.struct
classes.struct.private kernel yaml.ffi ;

M: yaml_alias_data_t anchor<<
    T{ struct-slot-spec
        { name "anchor" }
        { offset 0 }
        { class object }
        { type c-string }
    } write-struct-slot ; inline


USING: accessors alien.c-types classes.struct
classes.struct.private kernel yaml.ffi ;

M: yaml_emitter_anchor_data anchor<<
    T{ struct-slot-spec
        { name "anchor" }
        { offset 0 }
        { class object }
        { type c-string }
    } write-struct-slot ; inline


USING: accessors alien.c-types classes.struct
classes.struct.private math yaml.ffi ;

M: yaml_emitter_anchors anchor<<
    T{ struct-slot-spec
        { name "anchor" }
        { offset 4 }
        { class fixnum }
        { initial 0 }
        { type int }
    } write-struct-slot ; inline