GHC-6.0: Open with ... bug (again!)

Calle Lejdfors calle.lejdfors@cs.lth.se
Mon, 2 Jun 2003 15:44:49 +0200


This is a multi-part message in MIME format.

------=_NextPart_000_003D_01C3291D.E6C3FC20
Content-Type: multipart/alternative;
	boundary="----=_NextPart_001_003E_01C3291D.E6C3FC20"


------=_NextPart_001_003E_01C3291D.E6C3FC20
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable

Hi.

The problem with open files contained in directories whose name contain =
white space is still present under Windows (Win XP Pro at least). It =
apparently works under Linux but not under windows.

Opening a file in a directory called "Test dir" via one of=20

$ ghci Test\ dir/Test.lhs
$ ghci "Test dir/Test.lhs"
$ ghci Test\ dir\\Test.lhs
$ ghci "Test\ dir\\Test.lhs"

gives the error

Test\:
    Can't find module `Test\'
    (use -v to see a list of the files searched for)

The output from running ghci with the -v flag is attached to this mail. =
As usual ghc works perfectly.

Please, please, please fix this bug (so that I can build a CVS version) =
as we need it in our functional programming course.

Thanks, Calle
------=_NextPart_001_003E_01C3291D.E6C3FC20
Content-Type: text/html;
	charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=3DContent-Type content=3D"text/html; =
charset=3Diso-8859-1">
<META content=3D"MSHTML 6.00.2800.1170" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=3D#ffffff>
<DIV><FONT face=3DArial size=3D2>Hi.</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>&nbsp;</DIV>
<DIV><FONT face=3DArial size=3D2>The problem with open files contained =
in=20
directories whose name contain white space is still present under =
Windows (Win=20
XP Pro at least). It apparently works under Linux but not under=20
windows.</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>&nbsp;</DIV>
<DIV><FONT face=3DArial size=3D2>Opening a file in a directory called =
"Test dir" via=20
one of </FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>&nbsp;</DIV>
<DIV><FONT face=3DArial size=3D2>$ ghci Test\ dir/Test.lhs</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>$ ghci "Test dir/Test.lhs"</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>$ ghci Test\ dir\\Test.lhs</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>$ ghci "Test\ =
dir\\Test.lhs"</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>&nbsp;</DIV>
<DIV><FONT face=3DArial size=3D2>gives the error</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>&nbsp;</DIV>
<DIV><FONT face=3DArial size=3D2>Test\:<BR>&nbsp;&nbsp;&nbsp; Can't find =
module=20
`Test\'<BR>&nbsp;&nbsp;&nbsp; (use -v to see a list of the files =
searched=20
for)</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>&nbsp;</DIV>
<DIV><FONT face=3DArial size=3D2>The output from running ghci with the =
-v flag is=20
attached to this mail. As usual ghc works perfectly.</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>&nbsp;</DIV>
<DIV><FONT face=3DArial size=3D2>Please, please, please fix this bug (so =
that I can=20
build a CVS version) as we need it in our functional programming=20
course.</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>&nbsp;</DIV>
<DIV><FONT face=3DArial size=3D2>Thanks, =
Calle</FONT></DIV></BODY></HTML>

------=_NextPart_001_003E_01C3291D.E6C3FC20--

------=_NextPart_000_003D_01C3291D.E6C3FC20
Content-Type: text/plain;
	name="ghci.log.txt"
Content-Transfer-Encoding: 7bit
Content-Disposition: attachment;
	filename="ghci.log.txt"

   ___         ___ _
  / _ \ /\  /\/ __(_)
 / /_\// /_/ / /  | |      GHC Interactive, version 6.0, for Haskell 98.
/ /_\\/ __  / /___| |      http://www.haskell.org/ghc/
\____/\/ /_/\____/|_|      Type :? for help.


==================== Packages ====================
Package
   {name = "data",
    auto = False,
    import_dirs = ["c:/ghc/ghc-6.0/hslibs-imports/data"],
    source_dirs = [],
    library_dirs = ["c:/ghc/ghc-6.0"],
    hs_libraries = ["HSdata"],
    extra_libraries = [],
    include_dirs = [],
    c_includes = [],
    package_deps = ["haskell98", "lang", "util"],
    extra_ghc_opts = [],
    extra_cc_opts = [],
    extra_ld_opts = [],
    framework_dirs = [],
    extra_frameworks = []}
Package
   {name = "rts",
    auto = False,
    import_dirs = [],
    source_dirs = [],
    library_dirs = ["c:/ghc/ghc-6.0", "c:/ghc/ghc-6.0/gcc-lib"],
    hs_libraries = ["HSrts"],
    extra_libraries = ["m", "gmp", "wsock32"],
    include_dirs =
      ["c:/ghc/ghc-6.0/include", "c:/ghc/ghc-6.0/include/mingw"],
    c_includes = ["Stg.h"],
    package_deps = [],
    extra_ghc_opts = [],
    extra_cc_opts = [],
    extra_ld_opts =
      ["-u",
       "_GHCziBase_Izh_static_info",
       "-u",
       "_GHCziBase_Czh_static_info",
       "-u",
       "_GHCziFloat_Fzh_static_info",
       "-u",
       "_GHCziFloat_Dzh_static_info",
       "-u",
       "_GHCziPtr_Ptr_static_info",
       "-u",
       "_GHCziWord_Wzh_static_info",
       "-u",
       "_GHCziInt_I8zh_static_info",
       "-u",
       "_GHCziInt_I16zh_static_info",
       "-u",
       "_GHCziInt_I32zh_static_info",
       "-u",
       "_GHCziInt_I64zh_static_info",
       "-u",
       "_GHCziWord_W8zh_static_info",
       "-u",
       "_GHCziWord_W16zh_static_info",
       "-u",
       "_GHCziWord_W32zh_static_info",
       "-u",
       "_GHCziWord_W64zh_static_info",
       "-u",
       "_GHCziStable_StablePtr_static_info",
       "-u",
       "_GHCziBase_Izh_con_info",
       "-u",
       "_GHCziBase_Czh_con_info",
       "-u",
       "_GHCziFloat_Fzh_con_info",
       "-u",
       "_GHCziFloat_Dzh_con_info",
       "-u",
       "_GHCziPtr_Ptr_con_info",
       "-u",
       "_GHCziPtr_FunPtr_con_info",
       "-u",
       "_GHCziStable_StablePtr_con_info",
       "-u",
       "_GHCziBase_False_closure",
       "-u",
       "_GHCziBase_True_closure",
       "-u",
       "_GHCziPack_unpackCString_closure",
       "-u",
       "_GHCziIOBase_stackOverflow_closure",
       "-u",
       "_GHCziIOBase_heapOverflow_closure",
       "-u",
       "_GHCziIOBase_NonTermination_closure",
       "-u",
       "_GHCziIOBase_BlockedOnDeadMVar_closure",
       "-u",
       "_GHCziIOBase_Deadlock_closure",
       "-u",
       "_GHCziWeak_runFinalizzerBatch_closure",
       "-u",
       "___stginit_Prelude"],
    framework_dirs = [],
    extra_frameworks = []}
Package
   {name = "base",
    auto = True,
    import_dirs = ["c:/ghc/ghc-6.0/imports"],
    source_dirs = [],
    library_dirs = ["c:/ghc/ghc-6.0"],
    hs_libraries = ["HSbase1", "HSbase2", "HSbase3"],
    extra_libraries =
      ["HSbase_cbits", "wsock32", "msvcrt", "kernel32", "user32"],
    include_dirs = [],
    c_includes = ["HsBase.h"],
    package_deps = ["rts"],
    extra_ghc_opts = [],
    extra_cc_opts = [],
    extra_ld_opts = [],
    framework_dirs = [],
    extra_frameworks = []}
Package
   {name = "haskell98",
    auto = True,
    import_dirs = ["c:/ghc/ghc-6.0/imports"],
    source_dirs = [],
    library_dirs = ["c:/ghc/ghc-6.0"],
    hs_libraries = ["HShaskell98"],
    extra_libraries = [],
    include_dirs = [],
    c_includes = [],
    package_deps = ["base"],
    extra_ghc_opts = [],
    extra_cc_opts = [],
    extra_ld_opts = [],
    framework_dirs = [],
    extra_frameworks = []}
Package
   {name = "network",
    auto = True,
    import_dirs = ["c:/ghc/ghc-6.0/imports"],
    source_dirs = [],
    library_dirs = ["c:/ghc/ghc-6.0"],
    hs_libraries = ["HSnetwork"],
    extra_libraries = [],
    include_dirs = [],
    c_includes = ["HsNet.h"],
    package_deps = ["base"],
    extra_ghc_opts = [],
    extra_cc_opts = [],
    extra_ld_opts = [],
    framework_dirs = [],
    extra_frameworks = []}
Package
   {name = "haskell-src",
    auto = True,
    import_dirs = ["c:/ghc/ghc-6.0/imports"],
    source_dirs = [],
    library_dirs = ["c:/ghc/ghc-6.0"],
    hs_libraries = ["HShaskell-src"],
    extra_libraries = [],
    include_dirs = [],
    c_includes = [],
    package_deps = ["base", "haskell98"],
    extra_ghc_opts = [],
    extra_cc_opts = [],
    extra_ld_opts = [],
    framework_dirs = [],
    extra_frameworks = []}
Package
   {name = "objectio",
    auto = False,
    import_dirs = ["c:/ghc/ghc-6.0/imports"],
    source_dirs = [],
    library_dirs = ["c:/ghc/ghc-6.0"],
    hs_libraries =
      ["HSobjectio1", "HSobjectio2", "HSobjectio3", "HSobjectio4"],
    extra_libraries =
      ["user32",
       "gdi32",
       "kernel32",
       "comctl32",
       "comdlg32",
       "shell32",
       "winmm",
       "winspool",
       "ole32"],
    include_dirs = [],
    c_includes = [],
    package_deps = ["base"],
    extra_ghc_opts = [],
    extra_cc_opts = [],
    extra_ld_opts = [],
    framework_dirs = [],
    extra_frameworks = []}
Package
   {name = "lang",
    auto = False,
    import_dirs = ["c:/ghc/ghc-6.0/hslibs-imports/lang"],
    source_dirs = [],
    library_dirs = ["c:/ghc/ghc-6.0"],
    hs_libraries = ["HSlang"],
    extra_libraries = ["HSlang_cbits"],
    include_dirs = [],
    c_includes = ["HsLang.h"],
    package_deps = ["base"],
    extra_ghc_opts = [],
    extra_cc_opts = [],
    extra_ld_opts = [],
    framework_dirs = [],
    extra_frameworks = []}
Package
   {name = "concurrent",
    auto = False,
    import_dirs = ["c:/ghc/ghc-6.0/hslibs-imports/concurrent"],
    source_dirs = [],
    library_dirs = ["c:/ghc/ghc-6.0"],
    hs_libraries = ["HSconcurrent"],
    extra_libraries = [],
    include_dirs = [],
    c_includes = [],
    package_deps = ["base"],
    extra_ghc_opts = [],
    extra_cc_opts = [],
    extra_ld_opts = [],
    framework_dirs = [],
    extra_frameworks = []}
Package
   {name = "util",
    auto = False,
    import_dirs = ["c:/ghc/ghc-6.0/hslibs-imports/util"],
    source_dirs = [],
    library_dirs = ["c:/ghc/ghc-6.0"],
    hs_libraries = ["HSutil"],
    extra_libraries = ["HSutil_cbits"],
    include_dirs = [],
    c_includes = ["HsUtil.h"],
    package_deps = ["lang", "concurrent"],
    extra_ghc_opts = [],
    extra_cc_opts = [],
    extra_ld_opts = [],
    framework_dirs = [],
    extra_frameworks = []}
Package
   {name = "text",
    auto = False,
    import_dirs = ["c:/ghc/ghc-6.0/hslibs-imports/text"],
    source_dirs = [],
    library_dirs = ["c:/ghc/ghc-6.0"],
    hs_libraries = ["HStext"],
    extra_libraries = ["HStext_cbits"],
    include_dirs = [],
    c_includes = ["HsText.h"],
    package_deps = ["lang"],
    extra_ghc_opts = [],
    extra_cc_opts = [],
    extra_ld_opts = [],
    framework_dirs = [],
    extra_frameworks = []}
Package
   {name = "net",
    auto = False,
    import_dirs = ["c:/ghc/ghc-6.0/hslibs-imports/net"],
    source_dirs = [],
    library_dirs = ["c:/ghc/ghc-6.0"],
    hs_libraries = ["HSnet"],
    extra_libraries = [],
    include_dirs = [],
    c_includes = [],
    package_deps = ["network"],
    extra_ghc_opts = [],
    extra_cc_opts = [],
    extra_ld_opts = [],
    framework_dirs = [],
    extra_frameworks = []}
Package
   {name = "hssource",
    auto = False,
    import_dirs = ["c:/ghc/ghc-6.0/hslibs-imports/hssource"],
    source_dirs = [],
    library_dirs = ["c:/ghc/ghc-6.0"],
    hs_libraries = ["HShssource"],
    extra_libraries = [],
    include_dirs = [],
    c_includes = [],
    package_deps = ["haskell-src"],
    extra_ghc_opts = [],
    extra_cc_opts = [],
    extra_ld_opts = [],
    framework_dirs = [],
    extra_frameworks = []}
Package
   {name = "win32",
    auto = False,
    import_dirs = ["c:/ghc/ghc-6.0/hslibs-imports/win32"],
    source_dirs = [],
    library_dirs = ["c:/ghc/ghc-6.0"],
    hs_libraries = ["HSwin321", "HSwin322"],
    extra_libraries =
      ["user32", "gdi32", "winmm", "kernel32", "advapi32"],
    include_dirs = [],
    c_includes = [],
    package_deps = ["haskell98", "lang"],
    extra_ghc_opts = [],
    extra_cc_opts = [],
    extra_ld_opts = [],
    framework_dirs = [],
    extra_frameworks = []}


Loading package base ... linking ... done.
Test\:
    Can't find module `Test\'
    locations searched:
	Test\.hs
	Test\.lhs
	c:/ghc/ghc-6.0/imports/Test\.hi
Prelude> Prelude> 
------=_NextPart_000_003D_01C3291D.E6C3FC20--