[add banner to interactive mode.
John Meacham <john@repetae.net>**20051203145328] hunk ./Interactive.hs 44
-interact ho = beginInteraction emptyInteract { interactSettables = ["prog", "args"], interactVersion = versionString, interactCommands = commands, interactExpr = do_expr } where
+interact ho = go where
+    go = do
+        putStrLn "--------------------------------------------------------------"
+        putStrLn "Welcome to the jhc interactive experience. use :help for help."
+        putStrLn versionString
+        putStrLn "--------------------------------------------------------------"
+        beginInteraction emptyInteract { interactSettables = ["prog", "args"], interactVersion = versionString, interactCommands = commands, interactExpr = do_expr }