Add startOfInput #187
Description
startOfInput :: Parser t ()
startOfInput = Parser $ \t pos more lose succ ->
if pos == 0 then
succ t pos more ()
else
lose t pos more [] "startOfInput"
{{ message }}
startOfInput :: Parser t ()
startOfInput = Parser $ \t pos more lose succ ->
if pos == 0 then
succ t pos more ()
else
lose t pos more [] "startOfInput"