Commit 190c2488 by Zachary Snow

remove unused typeclass derivations

parent 2f860ff2
......@@ -24,13 +24,13 @@ data Exclude
| Interface
| Logic
| Succinct
deriving (Show, Typeable, Data, Eq)
deriving (Typeable, Data, Eq)
data Write
= Stdout
| Adjacent
| File FilePath
deriving (Show, Typeable, Data, Eq)
deriving (Typeable, Data)
data Job = Job
{ files :: [FilePath]
......@@ -43,7 +43,7 @@ data Job = Job
, verbose :: Bool
, write :: Write
, writeRaw :: String
} deriving (Show, Typeable, Data)
} deriving (Typeable, Data)
version :: String
version =
......
......@@ -102,7 +102,7 @@ data AsgnOp
= AsgnOpEq
| AsgnOpNonBlocking
| AsgnOp BinOp
deriving (Eq, Ord)
deriving Eq
instance Show AsgnOp where
show AsgnOpEq = "="
......
......@@ -226,7 +226,7 @@ data Strength
= DefaultStrength
| DriveStrength Strength0 Strength1
| ChargeStrength ChargeStrength
deriving (Eq, Ord)
deriving Eq
instance Show Strength where
show DefaultStrength = ""
......@@ -239,7 +239,7 @@ data Strength0
| Pull0
| Weak0
| Highz0
deriving (Eq, Ord)
deriving Eq
instance Show Strength0 where
show Supply0 = "supply0"
......@@ -254,7 +254,7 @@ data Strength1
| Pull1
| Weak1
| Highz1
deriving (Eq, Ord)
deriving Eq
instance Show Strength1 where
show Supply1 = "supply1"
......@@ -267,7 +267,7 @@ data ChargeStrength
= Small
| Medium
| Large
deriving (Eq, Ord)
deriving Eq
instance Show ChargeStrength where
show Small = "small"
......
......@@ -32,14 +32,12 @@ pattern TokenEOF = Token Unknown "" (Position "" 0 0)
data Position
= Position String Int Int
deriving Eq
instance Show Position where
show (Position f l c) = printf "%s:%d:%d" f l c
data Token
= Token TokenName String Position
deriving (Show, Eq)
data TokenName
= KW_dollar_bits
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment