[Gtk2hs-commit] (main branch): SVG: provide implementation for GObjectClass

[Duncan C. <dun...@wo...>]

Wed Oct 31 06:50:16 PDT 2007  Bertram Felgenhauer <in...@gm...>
  * SVG: provide implementation for GObjectClass

    hunk ./svgcairo/Graphics/Rendering/Cairo/SVG.chs 85
    -import System.Glib.GObject (GObjectClass, constructNewGObject)
    +import System.Glib.GObject (GObjectClass(..), constructNewGObject, unGObject, mkGObject)
    hunk ./svgcairo/Graphics/Rendering/Cairo/SVG.chs 98
    -instance GObjectClass SVG
    +mkSVG = SVG
    +unSVG (SVG o) = o
    +
    +instance GObjectClass SVG where
    +  toGObject = mkGObject . castForeignPtr . unSVG
    +  unsafeCastGObject = mkSVG . castForeignPtr . unGObject