Add support for pointer events (#30)

Co-authored-by: Thomas Honeyman <hello@thomashoneyman.com>

Author: gbagan

bower.json

@@ -18,6 +18,7 @@
     "purescript-media-types": "^6.0.0",
     "purescript-prelude": "^6.0.0",
     "purescript-web-clipboard": "^4.0.0",
-    "purescript-web-touchevents": "^4.0.0"
+    "purescript-web-touchevents": "^4.0.0",
+    "purescript-web-pointerevents": "https://github.com/purescript-web/purescript-web-pointerevents.git#^1.0.0"
   }
 }

src/DOM/HTML/Indexed.purs

@@ -24,6 +24,7 @@ import Web.TouchEvent (TouchEvent)
 import Web.UIEvent.FocusEvent (FocusEvent)
 import Web.UIEvent.KeyboardEvent (KeyboardEvent)
 import Web.UIEvent.MouseEvent (MouseEvent)
+import Web.PointerEvent (PointerEvent)
 import Web.UIEvent.WheelEvent (WheelEvent)
 
 type CSSPixel = Int
@@ -87,16 +88,16 @@ type TouchEvents r =
   )
 
 type PointerEvents r =
-  ( onPointerOver :: Event
-  , onPointerEnter :: Event
-  , onPointerDown :: Event
-  , onPointerMove :: Event
-  , onPointerUp :: Event
-  , onPointerCancel :: Event
-  , onPointerOut :: Event
-  , onPointerLeave :: Event
-  , gotPointerCapture :: Event
-  , lostPointerCapture :: Event
+  ( onPointerOver :: PointerEvent
+  , onPointerEnter :: PointerEvent
+  , onPointerDown :: PointerEvent
+  , onPointerMove :: PointerEvent
+  , onPointerUp :: PointerEvent
+  , onPointerCancel :: PointerEvent
+  , onPointerOut :: PointerEvent
+  , onPointerLeave :: PointerEvent
+  , onGotPointerCapture :: PointerEvent
+  , onLostPointerCapture :: PointerEvent
   | r
   )