[commit: ghc] master: Comment in test (2469f85)

[git at git.haskell.org]

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

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

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

commit 2469f854e6457d6723f12a61b88a6d9c7766ab4f
Author: Simon Peyton Jones <simonpj at microsoft.com>
Date:   Tue Dec 16 17:53:15 2014 +0000

    Comment in test


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

2469f854e6457d6723f12a61b88a6d9c7766ab4f
 testsuite/tests/stranal/should_compile/T9208.hs | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/testsuite/tests/stranal/should_compile/T9208.hs b/testsuite/tests/stranal/should_compile/T9208.hs
index d3415bb..2252617 100644
--- a/testsuite/tests/stranal/should_compile/T9208.hs
+++ b/testsuite/tests/stranal/should_compile/T9208.hs
@@ -1,6 +1,16 @@
 {-# LANGUAGE CPP, LambdaCase, BangPatterns, MagicHash, TupleSections, ScopedTypeVariables #-}
 {-# OPTIONS_GHC -w #-}  -- Suppress warnings for unimplemented methods
 
+------------- WARNING ---------------------
+--
+-- This program is utterly bogus. It takes a value of type ()
+-- and unsafe-coerces it to a function, and applies it.
+-- This is caught by an ASSERT with a debug compiler.
+--
+-- See Trac #9208 for discussio
+--
+--------------------------------------------
+
 {- | Evaluate Template Haskell splices on node.js,
      using pipes to communicate with GHCJS
  -}