hayland-0.1.0.0: Graphics/Wayland/Internal/SpliceClientTypes.hs

{-# LANGUAGE TemplateHaskell, ForeignFunctionInterface #-}

module Graphics.Wayland.Internal.SpliceClientTypes where

import Data.Functor
import Language.Haskell.TH
import Foreign.C.Types

import Graphics.Wayland.Scanner.Protocol
import Graphics.Wayland.Scanner

$(runIO readProtocol >>= generateTypes)
$(runIO $ generateEnums <$> readProtocol)