Changeset 37772 in project


Ignore:
Timestamp:
07/10/19 00:13:38 (8 days ago)
Author:
svnwiki
Message:

Anonymous wiki edit for IP [137.254.7.184]: Removed the "char-list/" prefix from the example.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • wiki/eggref/5/lexgen

    r36590 r37772  
    161161
    162162(define numpat
    163   (let* ((digit        (char-list/range #\0 #\9))
     163  (let* ((digit        (range #\0 #\9))
    164164         (digits       (pos digit))
    165          (fraction     (seq (char-list/char #\.) digits))
     165         (fraction     (seq (char #\.) digits))
    166166         (significand  (bar (seq digits (opt fraction)) fraction))
    167          (exp          (seq (char-list/set "eE") (seq (opt (char-list/set "+-")) digits)))
    168          (sign         (opt (char-list/char #\-))))
     167         (exp          (seq (set "eE") (seq (opt (set "+-")) digits)))
     168         (sign         (opt (char #\-))))
    169169    (seq sign (seq significand (opt exp)))))
    170170 
Note: See TracChangeset for help on using the changeset viewer.