1
1
mirror of https://github.com/github/semantic.git synced 2024-12-23 23:11:50 +03:00

TermRenderer has a fields type parameter.

This commit is contained in:
Rob Rix 2017-03-31 16:39:51 -04:00
parent 1cd5b2bfec
commit a9ca469ea7

View File

@ -29,7 +29,7 @@ data DiffRenderer fields output where
SExpressionDiffRenderer :: (HasField fields Category, HasField fields SourceSpan) => SExpressionFormat -> DiffRenderer fields ByteString SExpressionDiffRenderer :: (HasField fields Category, HasField fields SourceSpan) => SExpressionFormat -> DiffRenderer fields ByteString
ToCRenderer :: DiffRenderer fields (Map Text (Map Text [Value])) ToCRenderer :: DiffRenderer fields (Map Text (Map Text [Value]))
data TermRenderer fields a where data TermRenderer fields output where
JSONTermRenderer :: TermRenderer fields (Map Text Value) JSONTermRenderer :: TermRenderer fields (Map Text Value)
SExpressionTermRenderer :: (HasField fields Category, HasField fields SourceSpan) => SExpressionFormat -> TermRenderer fields ByteString SExpressionTermRenderer :: (HasField fields Category, HasField fields SourceSpan) => SExpressionFormat -> TermRenderer fields ByteString