{-# LINE 1 "src/Graphics/Cairo/Surfaces/SvgSurfaces/Template.hsc" #-}
{-# LANGUAGE TemplateHaskell #-}
{-# OPTIONS_GHC -Wall -fno-warn-tabs #-}

module Graphics.Cairo.Surfaces.SvgSurfaces.Template where

import Language.Haskell.TH
import Data.Word
import Graphics.Cairo.Template



newtype CairoSvgUnitT = CairoSvgUnitT Word32 deriving Int -> CairoSvgUnitT -> ShowS
[CairoSvgUnitT] -> ShowS
CairoSvgUnitT -> String
(Int -> CairoSvgUnitT -> ShowS)
-> (CairoSvgUnitT -> String)
-> ([CairoSvgUnitT] -> ShowS)
-> Show CairoSvgUnitT
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> CairoSvgUnitT -> ShowS
showsPrec :: Int -> CairoSvgUnitT -> ShowS
$cshow :: CairoSvgUnitT -> String
show :: CairoSvgUnitT -> String
$cshowList :: [CairoSvgUnitT] -> ShowS
showList :: [CairoSvgUnitT] -> ShowS
Show
{-# LINE 13 "src/Graphics/Cairo/Surfaces/SvgSurfaces/Template.hsc" #-}

mkUnitMember :: String -> Integer -> DecsQ
mkUnitMember :: String -> Integer -> DecsQ
mkUnitMember = Name -> Name -> String -> Integer -> DecsQ
mkMemberGen ''CairoSvgUnitT 'CairoSvgUnitT

newtype CairoSvgVersionT = CairoSvgVersionT Word32
{-# LINE 18 "src/Graphics/Cairo/Surfaces/SvgSurfaces/Template.hsc" #-}
	deriving Int -> CairoSvgVersionT -> ShowS
[CairoSvgVersionT] -> ShowS
CairoSvgVersionT -> String
(Int -> CairoSvgVersionT -> ShowS)
-> (CairoSvgVersionT -> String)
-> ([CairoSvgVersionT] -> ShowS)
-> Show CairoSvgVersionT
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> CairoSvgVersionT -> ShowS
showsPrec :: Int -> CairoSvgVersionT -> ShowS
$cshow :: CairoSvgVersionT -> String
show :: CairoSvgVersionT -> String
$cshowList :: [CairoSvgVersionT] -> ShowS
showList :: [CairoSvgVersionT] -> ShowS
Show

mkVersionMember :: String -> Integer -> DecsQ
mkVersionMember :: String -> Integer -> DecsQ
mkVersionMember = Name -> Name -> String -> Integer -> DecsQ
mkMemberGen ''CairoSvgVersionT 'CairoSvgVersionT