git.iko.soy/typeable/credit-card
on master help sign in
Fix the conditional compilation
b5ef718Ville Tirronen
credit-card.cabal+1
@@ -31,6 +31,7 @@ library
31 , time
31 , time
32 if !impl(ghcjs) && flag(postgres)
32 if !impl(ghcjs) && flag(postgres)
33 build-depends: postgresql-simple
33 build-depends: postgresql-simple
34+ cpp-options: -DUSE_POSTGRES
34 if flag(store)
35 if flag(store)
35 build-depends:
36 build-depends:
36 store
37 store
src/Data/CreditCard.hs+1−1
@@ -229,7 +229,7 @@ panToBogusNumber (CreditCardPAN txt) = do
229 return $ CreditCardNumber $ sconcat $ NE.fromList [leading, middle, trailing]
229 return $ CreditCardNumber $ sconcat $ NE.fromList [leading, middle, trailing]
230
230
231#ifndef ghcjs_HOST_OS
231#ifndef ghcjs_HOST_OS
232−#ifdef USE_CASSAVA
232+#ifdef USE_POSTGRES
233deriving instance FromField CreditCardPAN
233deriving instance FromField CreditCardPAN
234deriving instance ToField CreditCardPAN
234deriving instance ToField CreditCardPAN
235#endif
235#endif