GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-22 03:09:33 -06:00
Code Issues Packages Projects Releases Wiki Activity

"Committed_by_peb"

Browse Source
This commit is contained in:
peb
2005-02-18 18:21:06 +00:00
parent fc89b01bb4
commit 5e4929a635
149 changed files with 1518 additions and 1160 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
src/tools/AlphaConvGF.hs
View File

@@ -1,18 +1,18 @@
----------------------------------------------------------------------
-- |
-- Module : (Module)
-- Maintainer : (Maintainer)
-- Module : AlphaConvGF
-- Maintainer : AR
-- Stability : (stable)
-- Portability : (portable)
--
-- > CVS $Date $
-- > CVS $Author $
-- > CVS $Revision $
-- > CVS $Date: 2005/02/18 19:21:23 $
-- > CVS $Author: peb $
-- > CVS $Revision: 1.3 $
--
-- (Description of the module)
-----------------------------------------------------------------------------
module Main where
module Main (main) where
import LexGF
import Alex

19
src/tools/GFDoc.hs
View File

@@ -1,26 +1,25 @@
----------------------------------------------------------------------
-- |
-- Module : (Module)
-- Maintainer : (Maintainer)
-- Module : GFDoc
-- Maintainer : AR
-- Stability : (stable)
-- Portability : (portable)
--
-- > CVS $Date $
-- > CVS $Author $
-- > CVS $Revision $
-- > CVS $Date: 2005/02/18 19:21:23 $
-- > CVS $Author: peb $
-- > CVS $Revision: 1.6 $
--
-- (Description of the module)
-- produce a HTML document from a list of GF grammar files. AR 6\/10\/2002
--
-- Added @--!@ (NewPage) and @--*@ (Item) 21\/11\/2003
-----------------------------------------------------------------------------
module Main where
module Main (main) where
import List
import System
import Char
-- produce a HTML document from a list of GF grammar files. AR 6/10/2002
-- Added --! (NewPage) and --* (Item) 21/11/2003
-- to read files and write a file
main :: IO ()

26
src/tools/Htmls.hs
View File

@@ -1,26 +1,24 @@
----------------------------------------------------------------------
-- |
-- Module : (Module)
-- Maintainer : (Maintainer)
-- Module : Htmls
-- Maintainer : AR
-- Stability : (stable)
-- Portability : (portable)
--
-- > CVS $Date $
-- > CVS $Author $
-- > CVS $Revision $
-- > CVS $Date: 2005/02/18 19:21:23 $
-- > CVS $Author: peb $
-- > CVS $Revision: 1.4 $
--
-- (Description of the module)
-----------------------------------------------------------------------------
module Main where
import System
-- chop an HTML file into separate files, each linked to the next and previous.
-- the names of the files are n-file, with n = 01,02,...
-- the chopping is performed at each separator, here defined as "<!-- NEW -->"
-- the chopping is performed at each separator, here defined as @\<!-- NEW --\>@
--
-- AR 7\/1\/2002 for the Vinnova meeting in Linköping.
-----------------------------------------------------------------------------
-- AR 7/1/2002 for the Vinnova meeting in Linköping.
module Main (main) where
import System
main :: IO ()
main = do

20
src/tools/MkHelpFile.hs
View File

@@ -1,18 +1,18 @@
----------------------------------------------------------------------
-- |
-- Module : (Module)
-- Maintainer : (Maintainer)
-- Module : MkHelpFile
-- Maintainer : AR
-- Stability : (stable)
-- Portability : (portable)
--
-- > CVS $Date $
-- > CVS $Author $
-- > CVS $Revision $
-- > CVS $Date: 2005/02/18 19:21:23 $
-- > CVS $Author: peb $
-- > CVS $Revision: 1.6 $
--
-- Compile HelpFile.hs from HelpFile.
-- Compile @HelpFile.hs@ from the text file @HelpFile@.
-----------------------------------------------------------------------------
module Main where
module Main (main) where
main = do
s <- readFile "HelpFile"
@@ -49,9 +49,9 @@ helpHeader = unlines [
"-- Stability : (stable)",
"-- Portability : (portable)",
"--",
"-- > CVS $Date $",
"-- > CVS $Author $",
"-- > CVS $Revision $",
"-- > CVS $Date: 2005/02/18 19:21:23 $",
"-- > CVS $Author: peb $",
"-- > CVS $Revision: 1.6 $",
"--",
"-- Help on shell commands. Generated from HelpFile by 'make help'.",
"-- PLEASE DON'T EDIT THIS FILE.",

12
src/tools/WriteF.hs
View File

@@ -1,18 +1,18 @@
----------------------------------------------------------------------
-- |
-- Module : (Module)
-- Maintainer : (Maintainer)
-- Module : WriteF
-- Maintainer : AR
-- Stability : (stable)
-- Portability : (portable)
--
-- > CVS $Date $
-- > CVS $Author $
-- > CVS $Revision $
-- > CVS $Date: 2005/02/18 19:21:23 $
-- > CVS $Author: peb $
-- > CVS $Revision: 1.3 $
--
-- (Description of the module)
-----------------------------------------------------------------------------
module Main where
module Main (main) where
import Fudgets
import System