diff options
| author | simonpj <unknown> | 2003-02-24 12:39:27 +0000 |
|---|---|---|
| committer | simonpj <unknown> | 2003-02-24 12:39:27 +0000 |
| commit | 395917a05328e935f40abd080b169aa25546b083 (patch) | |
| tree | ac80055ad5babbee9632343f1ac1ac88140416bb /ghc/compiler/main/DriverFlags.hs | |
| parent | 384d5bcf83b6e7ee103fca364ca1ab6ef831834a (diff) | |
| download | haskell-395917a05328e935f40abd080b169aa25546b083.tar.gz | |
[project @ 2003-02-24 12:39:24 by simonpj]
Three Template Haskell improvements
a) Add type synonyms to THSyntax (and DsMeta, Convert)
b) Make Q into a newtype instead of a type synonym
c) Eliminate tiresome and error prone argument to DsMeta.wrapGenSyms
and similarly addTyVarBinds
Diffstat (limited to 'ghc/compiler/main/DriverFlags.hs')
| -rw-r--r-- | ghc/compiler/main/DriverFlags.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ghc/compiler/main/DriverFlags.hs b/ghc/compiler/main/DriverFlags.hs index a015de2328..e66f718ae5 100644 --- a/ghc/compiler/main/DriverFlags.hs +++ b/ghc/compiler/main/DriverFlags.hs @@ -1,5 +1,5 @@ ----------------------------------------------------------------------------- --- $Id: DriverFlags.hs,v 1.113 2003/02/21 13:26:58 simonpj Exp $ +-- $Id: DriverFlags.hs,v 1.114 2003/02/24 12:39:26 simonpj Exp $ -- -- Driver flags -- @@ -362,7 +362,7 @@ dynamic_flags = [ -- on all other systems, quoting is necessary, to avoid interpretation -- of shell metacharacters in the arguments (e.g. green-card's -- -DBEGIN_GHC_ONLY='}-' trick). -#ifndef mingw32_TARGET_OS +#ifndef mingw32_HOST_OS , ( "D", Prefix (\s -> addOpt_P ("-D'"++s++"'") ) ) , ( "U", Prefix (\s -> addOpt_P ("-U'"++s++"'") ) ) #else |