mysql-result-set

Vocabulary

db.mysql

Definition

USING: db ;

IN: db.mysql

TUPLE: mysql-result-set < result-set
    #columns has-more? pointers lengths ;

Methods

USING: accessors db db.mysql ;

M: mysql-result-set #columns #columns>> ;


USING: accessors db db.mysql db.mysql.ffi kernel math namespaces
specialized-arrays.instances.alien.c-types.ulong
specialized-arrays.instances.alien.c-types.void* ;

M: mysql-result-set advance-row
    dup handle>> dup mysql_fetch_row [
        swap mysql_fetch_lengths pick #columns>>
        [ <direct-void*-array> >>pointers ]
        [ <direct-ulong-array> >>lengths ] bi-curry bi*
        t >>has-more?
    ] [
        db-connection get handle>> dup mysql_errno zero?
        [ 2drop f >>has-more? f >>pointers f >>lengths ]
        [ mysql_error throw ] if
    ] if* drop ;


USING: accessors db.mysql db.mysql.ffi destructors kernel ;

M: mysql-result-set dispose
    [ mysql_free_result f ] change-handle drop ;


USING: accessors db db.mysql ;

M: mysql-result-set more-rows? has-more?>> ;


USING: accessors byte-arrays db db.mysql io.encodings.string
io.encodings.utf8 kernel sequences
specialized-arrays.instances.alien.c-types.char ;

M: mysql-result-set row-column
    swap [ pointers>> ] [ lengths>> ] bi [ nth ] bi-curry@ bi
    <direct-char-array> >byte-array utf8 decode ;