Made extensions explicit

darcs-hash:20071229003551-a4fee-f01193be732b8f3f5085232f922490cd5b48706a
This commit is contained in:
Henning Guenther 2007-12-28 16:35:51 -08:00
parent 49a11ab4f9
commit 971927c91f
30 changed files with 30 additions and 3 deletions

View File

@ -1,3 +1,4 @@
{-# LANGUAGE ExistentialQuantification #-}
module Data.Encoding
(Encoding(..)
,EncodingException(..)

View File

@ -1,4 +1,4 @@
{-# OPTIONS -fglasgow-exts #-}
{-# LANGUAGE CPP,TemplateHaskell,DeriveDataTypeable #-}
module Data.Encoding.Base
(Encoding(..)

View File

@ -1,3 +1,4 @@
{-# LANGUAGE CPP,TemplateHaskell #-}
module Data.Encoding.CP1250
(CP1250(..)) where

View File

@ -1,3 +1,4 @@
{-# LANGUAGE CPP,TemplateHaskell #-}
module Data.Encoding.CP1251
(CP1251(..)) where

View File

@ -1,3 +1,4 @@
{-# LANGUAGE CPP,TemplateHaskell #-}
module Data.Encoding.CP1252
(CP1252(..)) where

View File

@ -1,3 +1,4 @@
{-# LANGUAGE CPP,TemplateHaskell #-}
module Data.Encoding.CP1253
(CP1253(..)) where

View File

@ -1,3 +1,4 @@
{-# LANGUAGE CPP,TemplateHaskell #-}
module Data.Encoding.CP1254
(CP1254(..)) where

View File

@ -1,3 +1,4 @@
{-# LANGUAGE CPP,TemplateHaskell #-}
module Data.Encoding.CP1255
(CP1255(..)) where

View File

@ -1,3 +1,4 @@
{-# LANGUAGE CPP,TemplateHaskell #-}
module Data.Encoding.CP1256
(CP1256(..)) where

View File

@ -1,3 +1,4 @@
{-# LANGUAGE CPP,TemplateHaskell #-}
module Data.Encoding.CP1257
(CP1257(..)) where

View File

@ -1,3 +1,4 @@
{-# LANGUAGE CPP,TemplateHaskell #-}
module Data.Encoding.CP1258
(CP1258(..)) where

View File

@ -1,3 +1,4 @@
{-# LANGUAGE CPP #-}
{- | GB18030 is a chinese character encoding that is mandatory in china (if you
- don\'t implement it, you\'re not allowed to sell your software there).
-}

View File

@ -1,4 +1,4 @@
{-# OPTIONS -fglasgow-exts #-}
{-# LANGUAGE CPP, MagicHash #-}
module Data.Encoding.GB18030Data where
import Data.ByteString(ByteString)

View File

@ -63,7 +63,7 @@ createModuleFromFile name str = createModule (readDecodeTable name str)
createModule :: [(Char,[Word8])] -> [(Char,Char)] -> [(Int,Int)] -> String
createModule mp ranges rranges = unlines $
["{-# OPTIONS -fglasgow-exts #-}"
["{-# LANGUAGE CPP,MagicHash #-}"
,"module Data.Encoding.GB18030Data where"
,""
,"import Data.ByteString(ByteString)"

View File

@ -1,3 +1,4 @@
{-# LANGUAGE CPP,TemplateHaskell #-}
{- This module is used to create arrays from lists in template haskell -}
module Data.Encoding.Helper.Template where

View File

@ -1,3 +1,4 @@
{-# LANGUAGE CPP,TemplateHaskell #-}
{- | Implements ISO\/IEC 8859-1 alias latin-1 encoding. See
<http://en.wikipedia.org/wiki/ISO/IEC_8859-1> for further informations.
-}

View File

@ -1,3 +1,4 @@
{-# LANGUAGE CPP,TemplateHaskell #-}
module Data.Encoding.ISO885910
(ISO885910(..)) where

View File

@ -1,3 +1,4 @@
{-# LANGUAGE CPP,TemplateHaskell #-}
module Data.Encoding.ISO885911
(ISO885911(..)) where

View File

@ -1,3 +1,4 @@
{-# LANGUAGE CPP,TemplateHaskell #-}
module Data.Encoding.ISO885913
(ISO885913(..)) where

View File

@ -1,3 +1,4 @@
{-# LANGUAGE CPP,TemplateHaskell #-}
module Data.Encoding.ISO885914
(ISO885914(..)) where

View File

@ -1,3 +1,4 @@
{-# LANGUAGE CPP,TemplateHaskell #-}
module Data.Encoding.ISO885915
(ISO885915(..)) where

View File

@ -1,3 +1,4 @@
{-# LANGUAGE CPP,TemplateHaskell #-}
module Data.Encoding.ISO885916
(ISO885916(..)) where

View File

@ -1,3 +1,4 @@
{-# LANGUAGE CPP,TemplateHaskell #-}
{- | Implements ISO\/IEC 8859-2 alias latin-2 encoding. See
<http://en.wikipedia.org/wiki/ISO/IEC_8859-2> for further informations.
-}

View File

@ -1,3 +1,4 @@
{-# LANGUAGE CPP,TemplateHaskell #-}
{- | Implements ISO 8859-3 encoding, alias latin-3, alias south european
-}
module Data.Encoding.ISO88593

View File

@ -1,3 +1,4 @@
{-# LANGUAGE CPP,TemplateHaskell #-}
module Data.Encoding.ISO88594
(ISO88594(..)) where

View File

@ -1,3 +1,4 @@
{-# LANGUAGE CPP,TemplateHaskell #-}
module Data.Encoding.ISO88595
(ISO88595(..)) where

View File

@ -1,3 +1,4 @@
{-# LANGUAGE CPP,TemplateHaskell #-}
module Data.Encoding.ISO88596
(ISO88596(..)) where

View File

@ -1,3 +1,4 @@
{-# LANGUAGE CPP,TemplateHaskell #-}
module Data.Encoding.ISO88597
(ISO88597(..)) where

View File

@ -1,3 +1,4 @@
{-# LANGUAGE CPP,TemplateHaskell #-}
module Data.Encoding.ISO88598
(ISO88598(..)) where

View File

@ -1,3 +1,4 @@
{-# LANGUAGE CPP,TemplateHaskell #-}
module Data.Encoding.ISO88599
(ISO88599(..)) where