Print the exact error position

[toku-sa-n]

foo.hs

{-# LANGUAGE CPP #-}
#if 0
#else
AAAAAA=1=1=1=1=1=1=323q5
#endif

Before

%cat foo.hs|stack run --silent
hindent: Parse failed near (1,10)
CallStack (from HasCallStack):
  error, called at src/main/Main.hs:55:24 in main:Main

After

%cat foo.hs|stack run --silent
hindent: Parse failed near (4,10)
CallStack (from HasCallStack):
  error, called at src/main/Main.hs:55:24 in main:Main