[Haskell-cafe] What is a Haskell way to implement flags?