From 4803fb8052caba0421949c9d7768d44ec28d109d Mon Sep 17 00:00:00 2001
From: "kr.angelov" <kr.angelov@chalmers.se>
Date: Thu, 5 Jun 2008 07:33:42 +0000
Subject: use parser combinators to parse the shell commands. simplified
 CommandLine type

---
 src-3.0/GF/Command/AbsGFShell.hs | 42 ----------------------------------------
 1 file changed, 42 deletions(-)
 delete mode 100644 src-3.0/GF/Command/AbsGFShell.hs

(limited to 'src-3.0/GF/Command/AbsGFShell.hs')

diff --git a/src-3.0/GF/Command/AbsGFShell.hs b/src-3.0/GF/Command/AbsGFShell.hs
deleted file mode 100644
index c13004cf9..000000000
--- a/src-3.0/GF/Command/AbsGFShell.hs
+++ /dev/null
@@ -1,42 +0,0 @@
-module GF.Command.AbsGFShell where
-
--- Haskell module generated by the BNF converter
-
-newtype Ident = Ident String deriving (Eq,Ord,Show)
-data CommandLine =
-   CLine [Pipe]
- | CEmpty
-  deriving (Eq,Ord,Show)
-
-data Pipe =
-   PComm [Command]
-  deriving (Eq,Ord,Show)
-
-data Command =
-   Comm Ident [Option] Argument
- | CNoarg Ident [Option]
-  deriving (Eq,Ord,Show)
-
-data Option =
-   OOpt Ident
- | OFlag Ident Value
-  deriving (Eq,Ord,Show)
-
-data Value =
-   VId Ident
- | VInt Integer
-  deriving (Eq,Ord,Show)
-
-data Argument =
-   ATree Tree
-  deriving (Eq,Ord,Show)
-
-data Tree =
-   TApp Ident [Tree]
- | TAbs [Ident] Tree
- | TId Ident
- | TInt Integer
- | TStr String
- | TFloat Double
-  deriving (Eq,Ord,Show)
-
-- 
cgit v1.2.3