NSRect>rect ( NSRect world -- rect )

Vocabulary

ui.backend.cocoa.views

Inputs

NSRect	an object
world	an object

Outputs

rect

an object

Definition

USING: accessors arrays core-graphics.types kernel math
math.rectangles sequences ;

IN: ui.backend.cocoa.views

: NSRect>rect ( NSRect world -- rect )
    [
        [ [ CGRect-x ] [ CGRect-y ] bi ] [ dim>> second ] bi*
        swap - 2array
    ] [ drop [ CGRect-w ] [ CGRect-h ] bi 2array ] 2bi <rect> ;