0

I am using ghcjs-dom. How can I filter the elements out of an array of nodes?

import GHCJS.DOM.Types

nodesToElements :: [Node] -> [Element]
nodesToElements = ??

or

nodesToElements :: [Node] -> IO [Element]
nodesToElements = ??
michaelmesser
  • 3,601
  • 2
  • 19
  • 42

1 Answers1

1
import GHCJS.DOM.Types
import Data.Maybe (mapMaybe)

nodeToElement :: Node -> Maybe Element
nodeToElement node = if node `isA` gTypeElement
                     then Just $ castToElement node
                     else Nothing

nodesToElements :: [Node] -> [Element]
nodesToElements = mapMaybe nodeToElement
Cactus
  • 27,075
  • 9
  • 69
  • 149
michaelmesser
  • 3,601
  • 2
  • 19
  • 42