[MacPorts] #16780: gtk2hs 0.9.13 fails to build

[MacPorts]

#16780: gtk2hs 0.9.13 fails to build
----------------------------+-----------------------------------------------
 Reporter:  gale at sefer.org  |       Owner:  macports-tickets at lists.macosforge.org
     Type:  defect          |      Status:  new                                  
 Priority:  Normal          |   Milestone:  Port Bugs                            
Component:  ports           |     Version:  1.6.0                                
 Keywords:                  |        Port:  gtk2hs                               
----------------------------+-----------------------------------------------
 During port upgrade gtk2hs with an up-to-date ports tree, I get:
 {{{
 svgcairo/Graphics/Rendering/Cairo/SVG.chs:201:2:
     Couldn't match expected type `()' against inferred type `CInt'
       Expected type: Render ()
       Inferred type: Render CInt
     In the expression:
           liftIO
         $ (\ (SVG arg1) (Cairo arg2)
                -> withForeignPtr arg1
                 $ \ argPtr1 -> rsvg_handle_render_cairo argPtr1 arg2)
             svg cr
     In the expression:
         do cr <- ask
              liftIO
            $ (\ (SVG arg1) (Cairo arg2)
                   -> withForeignPtr arg1
                    $ \ argPtr1 -> rsvg_handle_render_cairo argPtr1 arg2)
                svg cr
 }}}

-- 
Ticket URL: <http://trac.macports.org/ticket/16780>
MacPorts <http://www.macports.org/>
Ports system for Mac OS