(cache-font-metrics) ( name size traits -- metrics )

Vocabulary

core-text.fonts

Inputs

name	an object
size	an object
traits	an object

Outputs

metrics

an object

Definition

USING: accessors combinators fonts kernel ;

IN: core-text.fonts

MEMO: (cache-font-metrics) ( name size traits -- metrics )
    [ metrics new ] 3dip (cache-font) {
        [ CTFontGetAscent >>ascent ]
        [ CTFontGetDescent >>descent ]
        [ CTFontGetLeading >>leading ]
        [ CTFontGetCapHeight >>cap-height ]
        [ CTFontGetXHeight >>x-height ]
    } cleave compute-height ;