loc>x ( loc editor -- x )

Vocabulary

ui.gadgets.editors

Inputs

loc	an object
editor	an object

Outputs

x

an object

Definition

USING: accessors kernel opengl sequences ui.text ;

IN: ui.gadgets.editors

: loc>x ( loc editor -- x )
    [ first2 swap ] dip [ editor-line ] [ font>> ] bi
    swap offset>x gl-round ;