{-# OPTIONS_GHC -Wall #-}
{-# OPTIONS_GHC -Werror #-}

-- Trac #3261

module Foo where

foo :: Int
foo = ceiling 6.3