{- This file has been auto-generated. Do not edit it. -} {-# LANGUAGE MagicHash,DeriveDataTypeable #-} {- | 0 = � (0) 1 =  (1) 2 =  (2) 3 =  (3) 4 =  (4) 5 =  (5) 6 =  (6) 7 =  (7) 8 =  (8) 9 = (9) 10 = (10) 11 = (11) 12 = (12) 13 = (13) 14 =  (14) 15 =  (15) 16 =  (16) 17 =  (17) 18 =  (18) 19 =  (19) 20 =  (20) 21 =  (21) 22 =  (22) 23 =  (23) 24 =  (24) 25 =  (25) 26 =  (26) 27 =  (27) 28 =  (28) 29 =  (29) 30 =  (30) 31 =  (31) 32 = (32) 33 = ! (33) 34 = " (34) 35 = # (35) 36 = $ (36) 37 = % (37) 38 = & (38) 39 = ' (39) 40 = ( (40) 41 = ) (41) 42 = * (42) 43 = + (43) 44 = , (44) 45 = - (45) 46 = . (46) 47 = / (47) 48 = 0 (48) 49 = 1 (49) 50 = 2 (50) 51 = 3 (51) 52 = 4 (52) 53 = 5 (53) 54 = 6 (54) 55 = 7 (55) 56 = 8 (56) 57 = 9 (57) 58 = : (58) 59 = ; (59) 60 = < (60) 61 = = (61) 62 = > (62) 63 = ? (63) 64 = @ (64) 65 = A (65) 66 = B (66) 67 = C (67) 68 = D (68) 69 = E (69) 70 = F (70) 71 = G (71) 72 = H (72) 73 = I (73) 74 = J (74) 75 = K (75) 76 = L (76) 77 = M (77) 78 = N (78) 79 = O (79) 80 = P (80) 81 = Q (81) 82 = R (82) 83 = S (83) 84 = T (84) 85 = U (85) 86 = V (86) 87 = W (87) 88 = X (88) 89 = Y (89) 90 = Z (90) 91 = [ (91) 92 = \ (92) 93 = ] (93) 94 = ^ (94) 95 = _ (95) 96 = ` (96) 97 = a (97) 98 = b (98) 99 = c (99) 100 = d (100) 101 = e (101) 102 = f (102) 103 = g (103) 104 = h (104) 105 = i (105) 106 = j (106) 107 = k (107) 108 = l (108) 109 = m (109) 110 = n (110) 111 = o (111) 112 = p (112) 113 = q (113) 114 = r (114) 115 = s (115) 116 = t (116) 117 = u (117) 118 = v (118) 119 = w (119) 120 = x (120) 121 = y (121) 122 = z (122) 123 = { (123) 124 = | (124) 125 = } (125) 126 = ~ (126) 127 =  (127) 128 = € (128) 129 =  (129) 130 = ‚ (130) 131 = ƒ (131) 132 = „ (132) 133 = … (133) 134 = † (134) 135 = ‡ (135) 136 = ˆ (136) 137 = ‰ (137) 138 = Š (138) 139 = ‹ (139) 140 = Œ (140) 141 =  (141) 142 = Ž (142) 143 =  (143) 144 =  (144) 145 = ‘ (145) 146 = ’ (146) 147 = “ (147) 148 = ” (148) 149 = • (149) 150 = – (150) 151 = — (151) 152 = ˜ (152) 153 = ™ (153) 154 = š (154) 155 = › (155) 156 = œ (156) 157 =  (157) 158 = ž (158) 159 = Ÿ (159) 160 =   (160) 161 = ‘ (8216) 162 = ’ (8217) 163 = £ (163) 164 = € (8364) 165 = ₯ (8367) 166 = ¦ (166) 167 = § (167) 168 = ¨ (168) 169 = © (169) 170 = ͺ (890) 171 = « (171) 172 = ¬ (172) 173 = ­ (173) 175 = ― (8213) 176 = ° (176) 177 = ± (177) 178 = ² (178) 179 = ³ (179) 180 = ΄ (900) 181 = ΅ (901) 182 = Ά (902) 183 = · (183) 184 = Έ (904) 185 = Ή (905) 186 = Ί (906) 187 = » (187) 188 = Ό (908) 189 = ½ (189) 190 = Ύ (910) 191 = Ώ (911) 192 = ΐ (912) 193 = Α (913) 194 = Β (914) 195 = Γ (915) 196 = Δ (916) 197 = Ε (917) 198 = Ζ (918) 199 = Η (919) 200 = Θ (920) 201 = Ι (921) 202 = Κ (922) 203 = Λ (923) 204 = Μ (924) 205 = Ν (925) 206 = Ξ (926) 207 = Ο (927) 208 = Π (928) 209 = Ρ (929) 211 = Σ (931) 212 = Τ (932) 213 = Υ (933) 214 = Φ (934) 215 = Χ (935) 216 = Ψ (936) 217 = Ω (937) 218 = Ϊ (938) 219 = Ϋ (939) 220 = ά (940) 221 = έ (941) 222 = ή (942) 223 = ί (943) 224 = ΰ (944) 225 = α (945) 226 = β (946) 227 = γ (947) 228 = δ (948) 229 = ε (949) 230 = ζ (950) 231 = η (951) 232 = θ (952) 233 = ι (953) 234 = κ (954) 235 = λ (955) 236 = μ (956) 237 = ν (957) 238 = ξ (958) 239 = ο (959) 240 = π (960) 241 = ρ (961) 242 = ς (962) 243 = σ (963) 244 = τ (964) 245 = υ (965) 246 = φ (966) 247 = χ (967) 248 = ψ (968) 249 = ω (969) 250 = ϊ (970) 251 = ϋ (971) 252 = ό (972) 253 = ύ (973) 254 = ώ (974) -} module Data.Encoding.ISO88597(ISO88597(..)) where import Data.Encoding.Base import Data.Encoding.ByteSource import Data.Encoding.ByteSink import Data.Encoding.Exception import Data.CharMap import Data.Array.Static import Data.Map.Static import Control.Throws import Prelude hiding (lookup) import Data.Word import Data.Typeable data ISO88597 = ISO88597 deriving (Show,Eq,Typeable) decoding_array_ISO88597 = StaticArray (0) (254) "\0\0\0\0\1\0\0\0\2\0\0\0\3\0\0\0\4\0\0\0\5\0\0\0\6\0\0\0\7\0\0\0\8\0\0\0\9\0\0\0\10\0\0\0\11\0\0\0\12\0\0\0\13\0\0\0\14\0\0\0\15\0\0\0\16\0\0\0\17\0\0\0\18\0\0\0\19\0\0\0\20\0\0\0\21\0\0\0\22\0\0\0\23\0\0\0\24\0\0\0\25\0\0\0\26\0\0\0\27\0\0\0\28\0\0\0\29\0\0\0\30\0\0\0\31\0\0\0\32\0\0\0\33\0\0\0\34\0\0\0\35\0\0\0\36\0\0\0\37\0\0\0\38\0\0\0\39\0\0\0\40\0\0\0\41\0\0\0\42\0\0\0\43\0\0\0\44\0\0\0\45\0\0\0\46\0\0\0\47\0\0\0\48\0\0\0\49\0\0\0\50\0\0\0\51\0\0\0\52\0\0\0\53\0\0\0\54\0\0\0\55\0\0\0\56\0\0\0\57\0\0\0\58\0\0\0\59\0\0\0\60\0\0\0\61\0\0\0\62\0\0\0\63\0\0\0\64\0\0\0\65\0\0\0\66\0\0\0\67\0\0\0\68\0\0\0\69\0\0\0\70\0\0\0\71\0\0\0\72\0\0\0\73\0\0\0\74\0\0\0\75\0\0\0\76\0\0\0\77\0\0\0\78\0\0\0\79\0\0\0\80\0\0\0\81\0\0\0\82\0\0\0\83\0\0\0\84\0\0\0\85\0\0\0\86\0\0\0\87\0\0\0\88\0\0\0\89\0\0\0\90\0\0\0\91\0\0\0\92\0\0\0\93\0\0\0\94\0\0\0\95\0\0\0\96\0\0\0\97\0\0\0\98\0\0\0\99\0\0\0\100\0\0\0\101\0\0\0\102\0\0\0\103\0\0\0\104\0\0\0\105\0\0\0\106\0\0\0\107\0\0\0\108\0\0\0\109\0\0\0\110\0\0\0\111\0\0\0\112\0\0\0\113\0\0\0\114\0\0\0\115\0\0\0\116\0\0\0\117\0\0\0\118\0\0\0\119\0\0\0\120\0\0\0\121\0\0\0\122\0\0\0\123\0\0\0\124\0\0\0\125\0\0\0\126\0\0\0\127\0\0\0\128\0\0\0\129\0\0\0\130\0\0\0\131\0\0\0\132\0\0\0\133\0\0\0\134\0\0\0\135\0\0\0\136\0\0\0\137\0\0\0\138\0\0\0\139\0\0\0\140\0\0\0\141\0\0\0\142\0\0\0\143\0\0\0\144\0\0\0\145\0\0\0\146\0\0\0\147\0\0\0\148\0\0\0\149\0\0\0\150\0\0\0\151\0\0\0\152\0\0\0\153\0\0\0\154\0\0\0\155\0\0\0\156\0\0\0\157\0\0\0\158\0\0\0\159\0\0\0\160\0\0\0\24\32\0\0\25\32\0\0\163\0\0\0\172\32\0\0\175\32\0\0\166\0\0\0\167\0\0\0\168\0\0\0\169\0\0\0\122\3\0\0\171\0\0\0\172\0\0\0\173\0\0\0\255\255\255\255\21\32\0\0\176\0\0\0\177\0\0\0\178\0\0\0\179\0\0\0\132\3\0\0\133\3\0\0\134\3\0\0\183\0\0\0\136\3\0\0\137\3\0\0\138\3\0\0\187\0\0\0\140\3\0\0\189\0\0\0\142\3\0\0\143\3\0\0\144\3\0\0\145\3\0\0\146\3\0\0\147\3\0\0\148\3\0\0\149\3\0\0\150\3\0\0\151\3\0\0\152\3\0\0\153\3\0\0\154\3\0\0\155\3\0\0\156\3\0\0\157\3\0\0\158\3\0\0\159\3\0\0\160\3\0\0\161\3\0\0\255\255\255\255\163\3\0\0\164\3\0\0\165\3\0\0\166\3\0\0\167\3\0\0\168\3\0\0\169\3\0\0\170\3\0\0\171\3\0\0\172\3\0\0\173\3\0\0\174\3\0\0\175\3\0\0\176\3\0\0\177\3\0\0\178\3\0\0\179\3\0\0\180\3\0\0\181\3\0\0\182\3\0\0\183\3\0\0\184\3\0\0\185\3\0\0\186\3\0\0\187\3\0\0\188\3\0\0\189\3\0\0\190\3\0\0\191\3\0\0\192\3\0\0\193\3\0\0\194\3\0\0\195\3\0\0\196\3\0\0\197\3\0\0\198\3\0\0\199\3\0\0\200\3\0\0\201\3\0\0\202\3\0\0\203\3\0\0\204\3\0\0\205\3\0\0\206\3\0\0"# encoding_map_ISO88597 :: CharMap encoding_map_ISO88597 = LeafMap1 (StaticMap (StaticArray (1) (253) "\127\0\0\0\63\0\0\0\149\3\0\0\31\0\0\0\95\0\0\0\159\0\0\0\182\3\0\0\15\0\0\0\47\0\0\0\79\0\0\0\111\0\0\0\143\0\0\0\189\0\0\0\166\3\0\0\198\3\0\0\7\0\0\0\23\0\0\0\39\0\0\0\55\0\0\0\71\0\0\0\87\0\0\0\103\0\0\0\119\0\0\0\135\0\0\0\151\0\0\0\172\0\0\0\140\3\0\0\157\3\0\0\174\3\0\0\190\3\0\0\206\3\0\0\3\0\0\0\11\0\0\0\19\0\0\0\27\0\0\0\35\0\0\0\43\0\0\0\51\0\0\0\59\0\0\0\67\0\0\0\75\0\0\0\83\0\0\0\91\0\0\0\99\0\0\0\107\0\0\0\115\0\0\0\123\0\0\0\131\0\0\0\139\0\0\0\147\0\0\0\155\0\0\0\167\0\0\0\178\0\0\0\134\3\0\0\145\3\0\0\153\3\0\0\161\3\0\0\170\3\0\0\178\3\0\0\186\3\0\0\194\3\0\0\202\3\0\0\172\32\0\0\1\0\0\0\5\0\0\0\9\0\0\0\13\0\0\0\17\0\0\0\21\0\0\0\25\0\0\0\29\0\0\0\33\0\0\0\37\0\0\0\41\0\0\0\45\0\0\0\49\0\0\0\53\0\0\0\57\0\0\0\61\0\0\0\65\0\0\0\69\0\0\0\73\0\0\0\77\0\0\0\81\0\0\0\85\0\0\0\89\0\0\0\93\0\0\0\97\0\0\0\101\0\0\0\105\0\0\0\109\0\0\0\113\0\0\0\117\0\0\0\121\0\0\0\125\0\0\0\129\0\0\0\133\0\0\0\137\0\0\0\141\0\0\0\145\0\0\0\149\0\0\0\153\0\0\0\157\0\0\0\163\0\0\0\169\0\0\0\176\0\0\0\183\0\0\0\132\3\0\0\137\3\0\0\143\3\0\0\147\3\0\0\151\3\0\0\155\3\0\0\159\3\0\0\164\3\0\0\168\3\0\0\172\3\0\0\176\3\0\0\180\3\0\0\184\3\0\0\188\3\0\0\192\3\0\0\196\3\0\0\200\3\0\0\204\3\0\0\24\32\0\0\175\32\0\0\0\0\0\0\2\0\0\0\4\0\0\0\6\0\0\0\8\0\0\0\10\0\0\0\12\0\0\0\14\0\0\0\16\0\0\0\18\0\0\0\20\0\0\0\22\0\0\0\24\0\0\0\26\0\0\0\28\0\0\0\30\0\0\0\32\0\0\0\34\0\0\0\36\0\0\0\38\0\0\0\40\0\0\0\42\0\0\0\44\0\0\0\46\0\0\0\48\0\0\0\50\0\0\0\52\0\0\0\54\0\0\0\56\0\0\0\58\0\0\0\60\0\0\0\62\0\0\0\64\0\0\0\66\0\0\0\68\0\0\0\70\0\0\0\72\0\0\0\74\0\0\0\76\0\0\0\78\0\0\0\80\0\0\0\82\0\0\0\84\0\0\0\86\0\0\0\88\0\0\0\90\0\0\0\92\0\0\0\94\0\0\0\96\0\0\0\98\0\0\0\100\0\0\0\102\0\0\0\104\0\0\0\106\0\0\0\108\0\0\0\110\0\0\0\112\0\0\0\114\0\0\0\116\0\0\0\118\0\0\0\120\0\0\0\122\0\0\0\124\0\0\0\126\0\0\0\128\0\0\0\130\0\0\0\132\0\0\0\134\0\0\0\136\0\0\0\138\0\0\0\140\0\0\0\142\0\0\0\144\0\0\0\146\0\0\0\148\0\0\0\150\0\0\0\152\0\0\0\154\0\0\0\156\0\0\0\158\0\0\0\160\0\0\0\166\0\0\0\168\0\0\0\171\0\0\0\173\0\0\0\177\0\0\0\179\0\0\0\187\0\0\0\122\3\0\0\133\3\0\0\136\3\0\0\138\3\0\0\142\3\0\0\144\3\0\0\146\3\0\0\148\3\0\0\150\3\0\0\152\3\0\0\154\3\0\0\156\3\0\0\158\3\0\0\160\3\0\0\163\3\0\0\165\3\0\0\167\3\0\0\169\3\0\0\171\3\0\0\173\3\0\0\175\3\0\0\177\3\0\0\179\3\0\0\181\3\0\0\183\3\0\0\185\3\0\0\187\3\0\0\189\3\0\0\191\3\0\0\193\3\0\0\195\3\0\0\197\3\0\0\199\3\0\0\201\3\0\0\203\3\0\0\205\3\0\0\21\32\0\0\25\32\0\0"#) (StaticArray (1) (253) "\127\63\197\31\95\159\230\15\47\79\111\143\189\214\246\7\23\39\55\71\87\103\119\135\151\172\188\205\222\238\254\3\11\19\27\35\43\51\59\67\75\83\91\99\107\115\123\131\139\147\155\167\178\182\193\201\209\218\226\234\242\250\164\1\5\9\13\17\21\25\29\33\37\41\45\49\53\57\61\65\69\73\77\81\85\89\93\97\101\105\109\113\117\121\125\129\133\137\141\145\149\153\157\163\169\176\183\180\185\191\195\199\203\207\212\216\220\224\228\232\236\240\244\248\252\161\165\0\2\4\6\8\10\12\14\16\18\20\22\24\26\28\30\32\34\36\38\40\42\44\46\48\50\52\54\56\58\60\62\64\66\68\70\72\74\76\78\80\82\84\86\88\90\92\94\96\98\100\102\104\106\108\110\112\114\116\118\120\122\124\126\128\130\132\134\136\138\140\142\144\146\148\150\152\154\156\158\160\166\168\171\173\177\179\187\170\181\184\186\190\192\194\196\198\200\202\204\206\208\211\213\215\217\219\221\223\225\227\229\231\233\235\237\239\241\243\245\247\249\251\253\175\162"#)) instance Encoding ISO88597 where decodeChar _ = do w <- fetchWord8 (if w>254 then throwException $ IllegalCharacter $ fromIntegral w else return ()) case decoding_array_ISO88597!w of Nothing -> throwException $ IllegalCharacter $ fromIntegral w Just c -> return c encodeChar _ c = mapEncode c encoding_map_ISO88597 encodeable _ c = mapMember c encoding_map_ISO88597