diff options
| author | panne <unknown> | 1999-12-07 13:04:31 +0000 |
|---|---|---|
| committer | panne <unknown> | 1999-12-07 13:04:31 +0000 |
| commit | 60464668bbff6c222b769c9c82bf1cff05fce3ec (patch) | |
| tree | fd07a2311b85e5ece2abdd4fa7f8dbc831854a16 /ghc/utils | |
| parent | dbce0191fabbc86b5cf7256f4e63e20a759a0206 (diff) | |
| download | haskell-60464668bbff6c222b769c9c82bf1cff05fce3ec.tar.gz | |
[project @ 1999-12-07 13:04:31 by panne]
OK, don't say you haven't been warned: Sven "Larry W." Panne waved his
Perl-wand and changed a / / into /\s+/. This fixes the problem with
multiple spaces between {-# OPTIONS ... -#}, but still fails miserably
when quotes are used, e.g. {-# OPTIONS -#include "My Own Header.h" #-}.
Diffstat (limited to 'ghc/utils')
| -rw-r--r-- | ghc/utils/mkdependHS/mkdependHS.prl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ghc/utils/mkdependHS/mkdependHS.prl b/ghc/utils/mkdependHS/mkdependHS.prl index c27fd179dc..13052dbb8d 100644 --- a/ghc/utils/mkdependHS/mkdependHS.prl +++ b/ghc/utils/mkdependHS/mkdependHS.prl @@ -434,7 +434,7 @@ sub slurp_file_for_imports { if ($options ne "") { @Old_Syslibs=@Syslibs; $ProcessingOptions=1; - &mangle_command_line_args(split(/ /,$options)); + &mangle_command_line_args(split(/\s+/,$options)); if (@Old_Syslibs ne @Syslibs) { $found_options=1; @Old_Ignore_dirs = @Ignore_dirs; |