git.iko.soy/typeable/xsd-isogen
on master help sign in
33 lines 691 B history raw
1-- This file was generated by xsd-isogen version 0.1.0.0
2-- https://github.com/dredozubov/xsd-isogen
4{-# OPTIONS_GHC -Wno-unused-imports #-}
5module Dummy where
7import Control.DeepSeq
8import Data.Scientific
9import Data.THGen.XML
10import Text.XML.DOM.Parser
11import Text.XML.Writer
12import Text.XML.ParentAttributes
13import Prelude hiding ((*), (+))
16{-|
17Generated from: uri:my:stringtype
18-}
19newtype XmlStringtype
20 = XmlStringtype
21 { unXmlStringtype :: Text
22 } deriving (Show, Eq, NFData, ToXML)
24instance FromDom XmlStringtype where
25 fromDom = XmlStringtype <$> fromDom
27{-|
28Generated from: uri:my1:person
29-}
30"Person" =:= record ParserAndGenerator
31 ! "{uri:my1}name" [t|XmlStringtype|]