[commit: ghc] master: Handle W80 in floatFormat (fee403f)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/fee403fd935479e8a1ad563fd07585d91c7e04a2/ghc

>---------------------------------------------------------------

commit fee403fd935479e8a1ad563fd07585d91c7e04a2
Author: Gabor Greif <ggreif at gmail.com>
Date:   Wed Sep 6 12:39:58 2017 +0200

    Handle W80 in floatFormat


>---------------------------------------------------------------

fee403fd935479e8a1ad563fd07585d91c7e04a2
 compiler/nativeGen/Format.hs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/compiler/nativeGen/Format.hs b/compiler/nativeGen/Format.hs
index 00811f1..1e32185 100644
--- a/compiler/nativeGen/Format.hs
+++ b/compiler/nativeGen/Format.hs
@@ -68,6 +68,7 @@ floatFormat width
  = case width of
         W32     -> FF32
         W64     -> FF64
+        W80     -> FF80
         other   -> pprPanic "Format.floatFormat" (ppr other)