path: root/ghc/compiler/tests/printing/Print003.hs

module Word where

infixl 8 `bitLsh`, `bitRsh`

class Bits a where
	bitRsh, bitLsh :: a -> Int -> a