#3313: Uncertain bug report (panic!)
-------------------------------+--------------------------------------------
Reporter: semanticprecision | Owner:
Type: bug | Status: new
Priority: normal | Milestone:
Component: Compiler | Version: 6.10.2
Severity: normal | Resolution:
Keywords: | Testcase:
Os: Unknown/Multiple | Architecture: x86
-------------------------------+--------------------------------------------
Comment (by semanticprecision):
Replying to [comment:1 semanticprecision]:
More more info: bug was fixed by replacing
{{{
bytesToGrayscaleImage bytes 1 dimensions = Just ( listToImage (
byteStringToPixels bytes 1 color1 ) dimensions )
bytesToGrayscaleImage bytes 2 dimensions = Just ( listToImage (
byteStringToPixels bytes 2 color2 ) dimensions )
bytesToGrayscaleImage bytes 3 dimensions = Just ( listToImage (
byteStringToPixels bytes 3 color3 ) dimensions )
bytesToGrayscaleImage bytes 4 dimensions = Just ( listToImage (
byteStringToPixels bytes 4 color4 ) dimensions )
bytesToGrayscaleImage _ _ _ = Nothing
}}}
with
{{{
bytesToGrayscaleImage bytes depth dimensions
| depth == 1 = Just ( listToImage ( byteStringToPixels bytes 1
color1 ) dimensions )
| depth == 2 = Just ( listToImage ( byteStringToPixels bytes 2
color2 ) dimensions )
| depth == 3 = Just ( listToImage ( byteStringToPixels bytes 3
color3 ) dimensions )
| depth == 4 = Just ( listToImage ( byteStringToPixels bytes 4
color4 ) dimensions )
| otherwise = Nothing
}}}
--
Ticket URL: <http://hackage.haskell.org/trac/ghc/ticket/3313#comment:2>
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