path: root/testsuite/tests/typecheck/should_run/tcrun038.hs

module Main where

import TcRun038_B( Foo(..), bar )

instance Foo Int where
  op x = x+1

main = print (bar (3::Int))