X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2Futils%2FPanic.lhs;h=d430df695e4c168cf2f4e98dc6b7b90a580b6244;hp=c9e35511b7a30429e471af91dcdeeecd7fd8bb71;hb=e2e0785eb7f4efd9f7791d913cdfdfd03148cd86;hpb=2f4e210fae842d3f0cb6cb01ee66805487c65c2e

diff --git a/compiler/utils/Panic.lhs b/compiler/utils/Panic.lhs
index c9e3551..d430df6 100644
--- a/compiler/utils/Panic.lhs
+++ b/compiler/utils/Panic.lhs
@@ -133,7 +133,7 @@ showGhcException exception
 
 	Sorry s
    	 -> showString $
-		"sorry! (this is work in progress)\n"
+		"sorry! (unimplemented feature or known bug)\n"
 		 ++ "  (GHC version " ++ cProjectVersion ++ " for " ++ TargetPlatform_NAME ++ "):\n\t"
 	         ++ s ++ "\n"