summaryrefslogtreecommitdiff
path: root/testsuite
diff options
context:
space:
mode:
authorSimon Peyton Jones <simonpj@microsoft.com>2014-12-16 17:53:15 +0000
committerSimon Peyton Jones <simonpj@microsoft.com>2014-12-17 14:45:48 +0000
commit2469f854e6457d6723f12a61b88a6d9c7766ab4f (patch)
tree7578e7cae80276dc9952a1516f55e264d98016ce /testsuite
parent6b11bab6961a1518a15eaa3d3b4ce40702724ca5 (diff)
downloadhaskell-2469f854e6457d6723f12a61b88a6d9c7766ab4f.tar.gz
Comment in test
Diffstat (limited to 'testsuite')
-rw-r--r--testsuite/tests/stranal/should_compile/T9208.hs10
1 files changed, 10 insertions, 0 deletions
diff --git a/testsuite/tests/stranal/should_compile/T9208.hs b/testsuite/tests/stranal/should_compile/T9208.hs
index d3415bb859..2252617dbe 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
-}