~ Literate Haskell test.

1 files changed, 5 insertions, 1 deletions

diff --git a/examples/Main.hs b/examples/Main.lhs
index edb37975..7d798bfc 100644
--- a/examples/Main.hs
+++ b/examples/Main.lhs
@@ -1,3 +1,6 @@
+A very helpful and literate comment.
+% A very helpful comment for very helpful and very literate comment.
+\begin{code}
 module Main (main) where
 
 import Control.Monad
@@ -25,4 +28,5 @@ main = do
     forever $ do
       liftIO (getCurrentProgress client >>= print)
       exchange storage
-    liftIO $ print "disconnected"
\ No newline at end of file
+    liftIO $ print "disconnected"
+\end{code}
\ No newline at end of file