From 3ebd889775714f8ad3bae8d9cc7a4790ef04614f Mon Sep 17 00:00:00 2001 From: "benl@ouroborus.net" Date: Thu, 27 May 2010 04:56:29 +0000 Subject: [PATCH] Whitespace only --- compiler/main/StaticFlags.hs | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/compiler/main/StaticFlags.hs b/compiler/main/StaticFlags.hs index 8de8611..95740c6 100644 --- a/compiler/main/StaticFlags.hs +++ b/compiler/main/StaticFlags.hs @@ -184,14 +184,19 @@ opt_IgnoreDotGhci = lookUp (fsLit "-ignore-dot-ghci") -- debugging opts opt_SuppressUniques :: Bool opt_SuppressUniques = lookUp (fsLit "-dsuppress-uniques") + opt_SuppressCoercions :: Bool opt_SuppressCoercions = lookUp (fsLit "-dsuppress-coercions") + opt_PprStyle_Debug :: Bool opt_PprStyle_Debug = lookUp (fsLit "-dppr-debug") + opt_PprUserLength :: Int opt_PprUserLength = lookup_def_int "-dppr-user-length" 5 --ToDo: give this a name + opt_Fuel :: Int opt_Fuel = lookup_def_int "-dopt-fuel" maxBound + opt_NoDebugOutput :: Bool opt_NoDebugOutput = lookUp (fsLit "-dno-debug-output") -- 1.7.10.4