~alcinnz/rhapsode

ref: a891e46d393927b63f81af8fafe6f357f8f13431 rhapsode/src/Types.hs -rw-r--r-- 474 bytes
a891e46d — Adrian Cochrane Use newer styling APIs. 1 year, 4 months ago
                                                                                
1
2
3
4
5
6
7
8
9
10
11
12
13
14
module Types(CArray, Page(..), Application(..), RhapsodeCSS, readStrict) where

import SpeechStyle (SpeechStyle)
import Data.CSS.Preprocessor.Conditions (ConditionalStyles, conditionalStyles)
import Data.CSS.Preprocessor.Text (TextStyle)

import Network.URI.Fetch (Application(..), url)
import Network.URI.Fetch.XML (Page(..), readStrict)

import System.FilePath ((</>))
import Foreign.Ptr

type CArray a = Ptr a
type RhapsodeCSS = ConditionalStyles (TextStyle SpeechStyle)