Changeset 17336 in project


Ignore:
Timestamp:
02/21/10 06:34:15 (10 years ago)
Author:
Ivan Raikov
Message:

abnf now uses greedy matching of kleene closure

File:
1 edited

Legend:

Unmodified
Added
Removed
  • release/4/abnf/abnf.scm

    r16487 r17336  
    9191
    9292;; * repetition
    93 (define (repetition p)  (lex:star p))
     93(define (repetition p)  (lex:star* p))
    9494
    9595;; 1* repetition
     
    162162;; Match linear white space: *(WSP / CRLF WSP)
    163163
    164 (define lwsp (lex:star (lex:bar wsp (lex:seq (lex:drop crlf) wsp))))
     164(define lwsp (lex:star* (lex:bar wsp (lex:seq (lex:drop crlf) wsp))))
    165165
    166166
     
    190190(define qcont (lex:bar (lex:pos qtext) quoted-pair))
    191191
    192 (define quoted-string  (lex:seq dquote (lex:seq (lex:star qcont) dquote)))
     192(define quoted-string  (lex:seq dquote (lex:seq (lex:star* qcont) dquote)))
    193193
    194194;;;; Additional convenience procedures and parser combinators
Note: See TracChangeset for help on using the changeset viewer.