...which is like numberP, except returning an Integer instead of an Int. Signed-off-by: Klaus Aehlig <[email protected]> --- src/Ganeti/Parsers.hs | 4 ++++ 1 file changed, 4 insertions(+)
diff --git a/src/Ganeti/Parsers.hs b/src/Ganeti/Parsers.hs index 8671b9e..7cb037e 100644 --- a/src/Ganeti/Parsers.hs +++ b/src/Ganeti/Parsers.hs @@ -56,6 +56,10 @@ skipSpaces = A.skipWhile A.isHorizontalSpace numberP :: Parser Int numberP = skipSpaces *> A.decimal +-- | A parser recognizing a number preceeded by spaces. +integerP :: Parser Integer +integerP = skipSpaces *> A.decimal + -- | A parser recognizing a word preceded by spaces, and closed by a space. stringP :: Parser String stringP = skipSpaces *> fmap unpack (A.takeWhile $ not . A.isHorizontalSpace) -- 2.7.0.rc3.207.g0ac5344
