#5322: Windows build broken
---------------------------------+------------------------------------------
Reporter: igloo | Owner:
Type: bug | Status: new
Priority: highest | Milestone: 7.2.1
Component: Compiler | Version: 7.1
Keywords: | Testcase:
Blockedby: | Difficulty:
Os: Unknown/Multiple | Blocking:
Architecture: Unknown/Multiple | Failure: None/Unknown
---------------------------------+------------------------------------------
Description changed by igloo:
Old description:
> Some time between the 17th June:
> http://darcs.haskell.org/ghcBuilder/builders/simonmar-
> win32-head/331/7.html
> and the 8th July: http://darcs.haskell.org/ghcBuilder/builders/simonmar-
> win32-head/331.html
> the Windows build broke.
>
> {{{
> $ cat q.hs
>
> module Main (main) where
>
> import Foreign
>
> foreign import ccall "wrapper" wrap_f_io :: IO () -> IO (FunPtr (IO ()))
> foreign import ccall "dynamic" call_io :: FunPtr (IO ()) -> IO ()
>
> fun :: IO ()
> fun = putStrLn "Foo"
>
> main :: IO ()
> main = do f <- wrap_f_io fun
> call_io f
> }}}
>
> {{{
> $ ../../../../../../inplace/bin/ghc-stage1.exe --make q -debug -rtsopts
> -Wall -dcore-lint -dcmm-lint -fforce-recomp
> [1 of 1] Compiling Main ( q.hs, q.o )
> Linking q.exe ...
>
> $ gdb q.exe
> GNU gdb 6.8.0.20080328-cvs (cygwin-special)
> Copyright (C) 2008 Free Software Foundation, Inc.
> License GPLv3+: GNU GPL version 3 or later
> <http://gnu.org/licenses/gpl.html>
> This is free software: you are free to change and redistribute it.
> There is NO WARRANTY, to the extent permitted by law. Type "show
> copying"
> and "show warranty" for details.
> This GDB was configured as "i686-pc-cygwin"...
> (gdb) r +RTS -DS
> Starting program: /cygdrive/c/msys/1.0/home/ian/ghc/testsuite/tests/ghc-
> regress/ffi/should_run/q/q.exe +RTS -DS
> [New thread 208.0xd8]
> created capset 0 of type 2
> assigned cap 0 to capset 0
>
> Program received signal SIGSEGV, Segmentation fault.
> 0x005a87fc in stg_ap_p_info ()
> (gdb)
> }}}
New description:
Some time between the 17th June:
http://darcs.haskell.org/ghcBuilder/builders/simonmar-win32-head/323.html
and the 8th July: http://darcs.haskell.org/ghcBuilder/builders/simonmar-
win32-head/331.html
the Windows build broke.
{{{
$ cat q.hs
module Main (main) where
import Foreign
foreign import ccall "wrapper" wrap_f_io :: IO () -> IO (FunPtr (IO ()))
foreign import ccall "dynamic" call_io :: FunPtr (IO ()) -> IO ()
fun :: IO ()
fun = putStrLn "Foo"
main :: IO ()
main = do f <- wrap_f_io fun
call_io f
}}}
{{{
$ ../../../../../../inplace/bin/ghc-stage1.exe --make q -debug -rtsopts
-Wall -dcore-lint -dcmm-lint -fforce-recomp
[1 of 1] Compiling Main ( q.hs, q.o )
Linking q.exe ...
$ gdb q.exe
GNU gdb 6.8.0.20080328-cvs (cygwin-special)
Copyright (C) 2008 Free Software Foundation, Inc.
License GPLv3+: GNU GPL version 3 or later
<http://gnu.org/licenses/gpl.html>
This is free software: you are free to change and redistribute it.
There is NO WARRANTY, to the extent permitted by law. Type "show copying"
and "show warranty" for details.
This GDB was configured as "i686-pc-cygwin"...
(gdb) r +RTS -DS
Starting program: /cygdrive/c/msys/1.0/home/ian/ghc/testsuite/tests/ghc-
regress/ffi/should_run/q/q.exe +RTS -DS
[New thread 208.0xd8]
created capset 0 of type 2
assigned cap 0 to capset 0
Program received signal SIGSEGV, Segmentation fault.
0x005a87fc in stg_ap_p_info ()
(gdb)
}}}
--
--
Ticket URL: <http://hackage.haskell.org/trac/ghc/ticket/5322#comment:1>
GHC <http://www.haskell.org/ghc/>
The Glasgow Haskell Compiler
_______________________________________________
Glasgow-haskell-bugs mailing list
Glasgow-haskell-bugs@haskell.org
http://www.haskell.org/mailman/listinfo/glasgow-haskell-bugs
