github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2025-01-03 21:16:12 +03:00
Code Issues Projects Releases Wiki Activity

Define a serialization format type.

Browse Source
This commit is contained in:
Rob Rix 2018-05-11 14:12:13 -04:00
parent 3b26aba165
commit 883eb66422
1 changed files with 11 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
src/Serializing/Format.hs
View File

@ -1 +1,11 @@
module Serializing.Format where
{-# LANGUAGE GADTs #-}
module Serializing.Format
( Format(..)
, Builder
) where
import Algebra.Graph.Class
import Data.ByteString.Builder
data Format input where
DOT :: (Ord vertex, ToGraph graph, ToVertex graph ~ vertex) => Style vertex Builder -> Format graph