lineNumberRange :: Parser LineRange
lineNumberRange = do
  first <- lineNumberP
  char ','
  second <- lineNumberP
  return (LineRange first second)
lineNumberRange :: Parser LineRange
lineNumberRange = do
  first <- lineNumberP
  char ','
  second <- lineNumberP
  return (LineRange first second)
lineNumberRange = do
  first <- lineNumberP
  char ','
  second <- lineNumberP
  return (LineRange first second)