diff options
Diffstat (limited to 'examples')
| -rw-r--r-- | examples/Main.lhs (renamed from examples/Main.hs) | 6 |
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 @@ | |||
| 1 | A very helpful and literate comment. | ||
| 2 | % A very helpful comment for very helpful and very literate comment. | ||
| 3 | \begin{code} | ||
| 1 | module Main (main) where | 4 | module Main (main) where |
| 2 | 5 | ||
| 3 | import Control.Monad | 6 | import Control.Monad |
| @@ -25,4 +28,5 @@ main = do | |||
| 25 | forever $ do | 28 | forever $ do |
| 26 | liftIO (getCurrentProgress client >>= print) | 29 | liftIO (getCurrentProgress client >>= print) |
| 27 | exchange storage | 30 | exchange storage |
| 28 | liftIO $ print "disconnected" \ No newline at end of file | 31 | liftIO $ print "disconnected" |
| 32 | \end{code} \ No newline at end of file | ||