path: root/testsuite/tests/parser/should_compile/ColumnPragma.hs

main :: IO ()
main = do
  -- force an "unrecognized pragma" warning
  -- to check if the column number is correct
  {-# COLUMN 1000 #-}print "Hello"  {-# NONEXISTENTPRAGMA #-}
  print "world"