 { "dealloc" void { id SEL }
     [
         drop
-        [ unregister-window ]
         [ remove-observer ]
         [ SUPER-> dealloc ]
-        tri
+        bi
     ]
 } ;
 

    ]
}

! "rotateWithEvent:" void { id SEL id }}

{ "acceptsFirstResponder" char { id SEL }
    [ 2drop 1 ]
}

}

: validate-action ( world selector -- ? validated? )
    selector>action at
    [ swap world-focus parents-handle-gesture? t ] [ drop f f ] if* ;

CLASS: {
    { +superclass+ "NSOpenGLView" }
