ihaskell-diagrams: Diagram type has changed

We now need to specify the numeric type and vector space explicitly
since these are given via type synonym family in `Diagram`
This commit is contained in:
Ben Gamari 2015-02-23 22:40:27 -05:00
parent 46445a5652
commit d372bb5d83

View File

@ -12,13 +12,13 @@ import Diagrams.Backend.Cairo
import IHaskell.Display
instance IHaskellDisplay (Diagram Cairo R2) where
instance IHaskellDisplay (QDiagram Cairo V2 Double Any) where
display renderable = do
png <- diagramData renderable PNG
svg <- diagramData renderable SVG
return $ Display [png, svg]
diagramData :: Diagram Cairo R2 -> OutputType -> IO DisplayData
diagramData :: Diagram Cairo -> OutputType -> IO DisplayData
diagramData renderable format = do
switchToTmpDir
@ -45,5 +45,5 @@ diagramData renderable format = do
extension PNG = "png"
-- Rendering hint.
diagram :: Diagram Cairo R2 -> Diagram Cairo R2
diagram :: Diagram Cairo -> Diagram Cairo
diagram = id