~alcinnz/rhapsode

ref: b22f65557f1ab3370ba96ad6ef3251a2138a01f2 rhapsode/src/Types.hs -rw-r--r-- 474 bytes
b22f6555 — Adrian Cochrane Improve useragent stylesheet to use counters. 1 year, 5 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)