From 6375bacc73c5ba2f0dd660fab18b590506027822 Mon Sep 17 00:00:00 2001 From: hallgren Date: Thu, 16 Oct 2014 16:28:54 +0000 Subject: Some work on the haddock documentation --- src/compiler/GF/Interactive.hs | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'src/compiler/GF/Interactive.hs') diff --git a/src/compiler/GF/Interactive.hs b/src/compiler/GF/Interactive.hs index 5944d04a7..18bee2e49 100644 --- a/src/compiler/GF/Interactive.hs +++ b/src/compiler/GF/Interactive.hs @@ -53,7 +53,7 @@ import GF.Infra.BuildInfo(buildInfo) import Data.Version(showVersion) import Paths_gf(version) --- | Run the GF Shell in quiet mode +-- | Run the GF Shell in quiet mode (@gf -run@). mainRunGFI :: Options -> [FilePath] -> IO () mainRunGFI opts files = shell (beQuiet opts) files @@ -68,7 +68,8 @@ mainGFI opts files = do shell opts files = loop opts =<< runSIO (importInEnv emptyGFEnv opts files) #ifdef SERVER_MODE --- | Start GF Server +-- | Run the GF Server (@gf -server@). +-- The 'Int' argument is the port number for the HTTP service. mainServerGFI opts0 port files = server port root (execute1 opts) =<< runSIO (importInEnv emptyGFEnv opts files) -- cgit v1.2.3