    {-# LANGUAGE CPP #-}
    module HsColour(hsColourHTML, hsColourConsole) where

    #ifdef GPL_SCARES_ME

    hsColourConsole :: String -> String
    hsColourConsole = id

    hsColourHTML :: String -> String
    hsColourHTML = id

    #else

    import Prelude

    import Language.Haskell.HsColour.TTY as TTY
    import Language.Haskell.HsColour.Colourise
    import Language.Haskell.HsColour.CSS as CSS

    hsColourConsole :: String -> String
    hsColourConsole :: String -> String
    hsColourConsole = ColourPrefs -> String -> String
    TTY.hscolour ColourPrefs
    defaultColourPrefs

    hsColourHTML :: String -> String
    hsColourHTML :: String -> String
    hsColourHTML = Bool -> Int -> String -> String
    CSS.hscolour Bool
    False Int
    1

    #endif