Module Data.DOM.Simple.Events
class Read s where
read :: String -> s
instance mouseEventTypeRead :: Read MouseEventType
instance keyboardEventTypeRead :: Read KeyboardEventType
instance uiEventTypeRead :: Read UIEventType
class Event e where
eventTarget :: forall eff a . e -> Eff (dom :: DOM | eff ) a
stopPropagation :: forall eff . e -> Eff (dom :: DOM | eff ) Unit
preventDefault :: forall eff . e -> Eff (dom :: DOM | eff ) Unit
instance eventDOMEvent :: Event DOMEvent
data MouseEventType
= MouseMoveEvent
| MouseOverEvent
| MouseEnterEvent
| MouseOutEvent
| MouseLeaveEvent
| MouseClickEvent
| MouseDblClickEvent
| MouseUpEvent
| MouseDownEvent
| MouseUnknownEvent String
instance mouseEventTypeShow :: Show MouseEventType
instance mouseEventTypeRead :: Read MouseEventType
class (Event e ) <= MouseEvent e where
mouseEventType :: forall eff . e -> Eff (dom :: DOM | eff ) MouseEventType
screenX :: forall eff . e -> Eff (dom :: DOM | eff ) Int
screenY :: forall eff . e -> Eff (dom :: DOM | eff ) Int
clientX :: forall eff . e -> Eff (dom :: DOM | eff ) Int
clientY :: forall eff . e -> Eff (dom :: DOM | eff ) Int
instance mouseEventDOMEvent :: MouseEvent DOMEvent
class MouseEventTarget b where
addMouseEventListener :: forall e t ta . (MouseEvent e ) => MouseEventType -> (e -> Eff (dom :: DOM | t ) Unit ) -> b -> Eff (dom :: DOM | ta ) Unit
removeMouseEventListener :: forall e t ta . (MouseEvent e ) => MouseEventType -> (e -> Eff (dom :: DOM | t ) Unit ) -> b -> Eff (dom :: DOM | ta ) Unit
instance mouseEventTargetHTMLWindow :: MouseEventTarget HTMLWindow
instance mouseEventTargetHTMLDocument :: MouseEventTarget HTMLDocument
instance mouseEventTargetHTMLElement :: MouseEventTarget HTMLElement
data KeyboardEventType
= KeydownEvent
| KeypressEvent
| KeyupEvent
| KeyUnknownEvent String
instance keyboardEventTypeShow :: Show KeyboardEventType
instance keyboardEventTypeRead :: Read KeyboardEventType
data KeyLocation
= KeyLocationStandard
| KeyLocationLeft
| KeyLocationRight
| KeyLocationNumpad
| KeyLocationUnknown Int
toKeyLocation :: Int -> KeyLocation
class (Event e ) <= KeyboardEvent e where
keyboardEventType :: forall eff . e -> Eff (dom :: DOM | eff ) KeyboardEventType
key :: forall eff . e -> Eff (dom :: DOM | eff ) String
keyCode :: forall eff . e -> Eff (dom :: DOM | eff ) Int
keyLocation :: forall eff . e -> Eff (dom :: DOM | eff ) KeyLocation
altKey :: forall eff . e -> Eff (dom :: DOM | eff ) Boolean
ctrlKey :: forall eff . e -> Eff (dom :: DOM | eff ) Boolean
metaKey :: forall eff . e -> Eff (dom :: DOM | eff ) Boolean
shiftKey :: forall eff . e -> Eff (dom :: DOM | eff ) Boolean
instance keyboardEventDOMEvent :: KeyboardEvent DOMEvent
class KeyboardEventTarget b where
addKeyboardEventListener :: forall e t ta . (KeyboardEvent e ) => KeyboardEventType -> (e -> Eff (dom :: DOM | t ) Unit ) -> b -> Eff (dom :: DOM | ta ) Unit
removeKeyboardEventListener :: forall e t ta . (KeyboardEvent e ) => KeyboardEventType -> (e -> Eff (dom :: DOM | t ) Unit ) -> b -> Eff (dom :: DOM | ta ) Unit
instance keyboardEventTargetHTMLWindow :: KeyboardEventTarget HTMLWindow
instance keyboardEventTargetHTMLDocument :: KeyboardEventTarget HTMLDocument
instance keyboardEventTargetHTMLElement :: KeyboardEventTarget HTMLElement
data UIEventType
= LoadEvent
| UnloadEvent
| AbortEvent
| ErrorEvent
| SelectEvent
| ResizeEvent
| ScrollEvent
| UnknownEvent String
instance uiEventTypeShow :: Show UIEventType
instance uiEventTypeRead :: Read UIEventType
class (Event e ) <= UIEvent e where
view :: forall eff . e -> Eff (dom :: DOM | eff ) HTMLWindow
detail :: forall eff . e -> Eff (dom :: DOM | eff ) Int
instance uiEventDOMEvent :: UIEvent DOMEvent
class UIEventTarget b where
addUIEventListener :: forall e t ta . (UIEvent e ) => UIEventType -> (e -> Eff (dom :: DOM | t ) Unit ) -> b -> Eff (dom :: DOM | ta ) Unit
removeUIEventListener :: forall e t ta . (UIEvent e ) => UIEventType -> (e -> Eff (dom :: DOM | t ) Unit ) -> b -> Eff (dom :: DOM | ta ) Unit
instance uiEventTargetHTMLWindow :: UIEventTarget HTMLWindow