New builder

diagrams-lib.cabal

@@ -33,6 +33,7 @@ Library
                        Diagrams.Attributes,
                        Diagrams.Attributes.Compile,
                        Diagrams.Backend.CmdLine,
+                       Diagrams.Backend.Build,
                        Diagrams.BoundingBox,
                        Diagrams.Combinators,
                        Diagrams.Coordinates,
@@ -121,7 +122,9 @@ Library
                        unordered-containers >= 0.2 && < 0.2.6,
                        system-filepath >= 0.2 && < 0.5,
                        text >= 0.7.1 && < 1.3,
-                       mtl >= 2.0 && < 2.3
+                       mtl >= 2.0 && < 2.3,
+                       transformers >= 0.3.0 && < 0.5.0,
+                       exceptions >= 0.6 && < 1.0
   if impl(ghc < 7.6)
     Build-depends: ghc-prim
   Hs-source-dirs:      src

src/Diagrams/Backend/Build.hs

@@ -0,0 +1,30 @@
+{-# LANGUAGE MultiParamTypeClasses #-}
+
+-----------------------------------------------------------------------------
+-- |
+-- Module      :  Diagrams.Builder.Class
+-- Copyright   :  (c) 2014 diagrams-lib team (see LICENSE)
+-- License     :  BSD-style (see LICENSE)
+-- Maintainer  :  diagrams-discuss@googlegroups.com
+--
+-- General class for building diagrams to files.
+--
+-----------------------------------------------------------------------------
+module Diagrams.Backend.Build where
+
+import Diagrams.Core
+import Diagrams.Size
+import Data.Monoid (Any)
+import Linear.V2
+import Control.Lens (Lens')
+
+-- | Generic class for building diagrams whose output is a file with a
+--   2D size.
+class Backend b v n => BackendBuild b v n where
+  -- | Lens onto the size of the output file.
+  outputSize :: Lens' (Options b v n) (SizeSpec V2 n)
+
+  -- | Build a diagram of the given format to the path using the
+  --   backend's options. The @Maybe String@ returns any errors.
+  saveDia :: FilePath -> Options b v n -> QDiagram b v n Any -> IO ()
+