stream_start>> ( object -- value )

Vocabulary

accessors

Inputs

object

an object

Outputs

value

an object

Definition

IN: accessors

GENERIC: stream_start>> ( object -- value )

Methods

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

M: event_data stream_start>>
    T{ struct-slot-spec
        { name "stream_start" }
        { offset 0 }
        { class stream_start_event_data }
        { initial
            S{ stream_start_event_data
                { encoding YAML_ANY_ENCODING }
            }
        }
        { type stream_start_event_data }
    } read-struct-slot ; inline


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

M: token_data stream_start>>
    T{ struct-slot-spec
        { name "stream_start" }
        { offset 0 }
        { class stream_start_token_data }
        { initial
            S{ stream_start_token_data
                { encoding YAML_ANY_ENCODING }
            }
        }
        { type stream_start_token_data }
    } read-struct-slot ; inline