update-models ( gml-editor -- )

Vocabulary

gml.ui

Inputs

gml-editor

an object

Outputs

None

Definition

USING: accessors euler.b-rep kernel models ;

IN: gml.ui

: update-models ( gml-editor -- )
    [
        [ b-rep>> dup finish-b-rep ] [ b-rep-model>> ] bi
        set-model
    ]
    [ [ gml>> operand-stack>> ] [ stack-model>> ] bi set-model ]
    bi ;