@@ -1,5 +1,7 @@
11{-# LANGUAGE CPP, DeriveGeneric, OverloadedStrings, ScopedTypeVariables, TemplateHaskell #-}
22
3+{-# OPTIONS_GHC -fno-warn-deprecations #-}
4+
35module UnitTests (ioTests, tests) where
46
57import Control.Monad (forM)
@@ -59,7 +61,7 @@ camelFrom :: Char -> String -> String
5961camelFrom c s = let (p:ps) = split c s
6062 in concat $ p : map capitalize ps
6163 where
62− split c s = map L.unpack $ L.split c $ L.pack s
64+ split c' s' = map L.unpack $ L.split c' $ L.pack s'
6365 capitalize t = toUpper (head t) : tail t
6466
6567data Wibble = Wibble {