on master help sign in
chore(servant-foreign): remove dead type `Frag`
07f7954Philip Patsch
servant-foreign/src/Servant/Foreign/Internal.hs−5
@@ -85,11 +85,6 @@ captureArg _ = error "captureArg called on non capture"
85
85
86type Path f = [Segment f]
86type Path f = [Segment f]
87
87
88−newtype Frag f = Frag { unFragment :: Arg f }
89− deriving (Data, Eq, Show, Typeable)
90−
91−makePrisms ''Frag
92−
93data ArgType
88data ArgType
94 = Normal
89 = Normal
95 | Flag
90 | Flag