log-euler-op ( class def inputs -- quot )

Vocabulary

gml.macros

Inputs

class	an object
def	an object
inputs	an object

Outputs

quot

an object

Definition

USING: generalizations kernel namespaces ;

IN: gml.macros

MACRO:: log-euler-op ( class def inputs -- quot )
    class inputs def inputs '[
        [
            current-macro get
            [ _ boa save-euler-op ] [ _ ndrop ] if
        ] _ _ nbi
    ] ;