utf16>line-index ( index line -- n )

Vocabulary

core-text

Inputs

index	an object
line	an object

Outputs

n

an object

Definition

USING: math math.order sequences ;

IN: core-text

:: utf16>line-index ( index line -- n )
    index 0 max
    :> clamped clamped clamped line line-index-map second
    indices-before - line line-string length min ;