Added CloseEvent properties

Author: eskimor

src/DOM/Event/CloseEvent.js

@@ -0,0 +1,15 @@
+"use strict";
+
+// module DOM.Event.CloseEvent
+
+exports.code = function (e) {
+  e.code;
+};
+
+exports.reason = function (e) {
+  e.reason;
+};
+
+exports.wasClean = function (e) {
+  e.wasClean;
+};

src/DOM/Event/CloseEvent.purs

@@ -0,0 +1,21 @@
+module DOM.Event.CloseEvent
+  ( code
+  , reason
+  , wasClean
+  ) where
+
+import Prelude
+
+import Control.Monad.Eff (Eff())
+
+import Data.Enum (toEnum)
+import qualified Data.Maybe.Unsafe as U
+
+import DOM
+import DOM.Event.EventPhase
+import DOM.Event.Types
+import DOM.Node.Types
+
+foreign import code :: CloseEvent -> Int
+foreign import reason :: CloseEvent -> String
+foreign import wasClean :: CloseEvent -> Boolean