Accept '-l foo' as library syntax: fixes #4869
authorMax Bolingbroke <batterseapower@hotmail.com>
Sun, 15 May 2011 08:41:57 +0000 (09:41 +0100)
committerMax Bolingbroke <batterseapower@hotmail.com>
Sun, 15 May 2011 08:41:57 +0000 (09:41 +0100)
compiler/main/DynFlags.hs

index 7db0b9a..46f2aff 100644 (file)
@@ -1185,8 +1185,8 @@ dynamic_flags = [
   , Flag "dylib-install-name" (hasArg setDylibInstallName)
 
         ------- Libraries ---------------------------------------------------
-  , Flag "L"   (Prefix    addLibraryPath)
-  , Flag "l"   (AnySuffix (upd . addOptl))
+  , Flag "L"   (Prefix addLibraryPath)
+  , Flag "l"   (hasArg (addOptl . ("-l" ++)))
 
         ------- Frameworks --------------------------------------------------
         -- -framework-path should really be -F ...