cute-jumper / parsec.el Goto Github PK

Contributors

Stargazers

Forkers

emacsmirror jtimmons ngksternhagen xuchunyang franburstall ljos amno1 alphapapa yssource

(parsec-query PARSER &rest ARGS)

Get an alternative return value of the PARSER specified by the ARGS.

The args can be in the following forms:

    :beg      --> return the point before applying the PARSER
    :end      --> return the point after applying the PARSER
    :nil      --> return nil
    :groups N --> return Nth group for ‘parsec-re’.

(defun test/some-spaces ()
  (parsec-many (parsec-ch ?\s)))

(defun test/blank-line ()
  (parsec-optional (test/some-spaces))
  (parsec-newline))

(parsec-with-input "
  

  last line
"
  (parsec-many (test/blank-line)))