tilia-0.1.0.0: corpora/vendored/other/cpp/macro-on-a-line-of-its-own-out.hs

{-# LANGUAGE CPP #-}

module Survey.Result where

#ifdef WITH_TRACE
#define TRACE(a) , trace a
#else
#define TRACE(a)
#endif

data Result = Result
  { passed :: Bool,
    message :: String
    TRACE(:: [String])
  }

done :: Result
done =
  Result
    { passed = True,
      message = ""
      TRACE(= [])
    }