zf

zenflows testing
git clone https://s.sonu.ch/~srfsh/zf.git
Log | Files | Refs | Submodules | README | LICENSE

link_text_lexer.xrl (1095B)

      1 Definitions.
      2 
      3 ESCAPED          = \\.
      4 ESCAPE           = \\
      5 EXCLAMATION_MARK = [!]
      6 OPEN_PAREN       = \(
      7 CLOSE_PAREN      = \)
      8 OPEN_BRACKET     = \[
      9 CLOSE_BRACKET    = \]
     10 OPEN_TITLE       = \s+['"]
     11 ANY_QUOTE        = ['"]
     12 WS               = \s+
     13 ANY              = [^]\\"'()[\s]+
     14 
     15 Rules.
     16 
     17 {ESCAPED}          : {token, {escaped, TokenLine, dismiss_backslash(TokenChars)}}.
     18 {EXCLAMATION_MARK} : {token, {exclamation_mark, TokenLine, TokenChars}}.
     19 {OPEN_PAREN}       : {token, {open_paren, TokenLine, TokenChars}}.
     20 {CLOSE_PAREN}      : {token, {close_paren, TokenLine, TokenChars}}.
     21 {OPEN_BRACKET}     : {token, {open_bracket, TokenLine, TokenChars}}.
     22 {CLOSE_BRACKET}    : {token, {close_bracket, TokenLine, TokenChars}}.
     23 {OPEN_TITLE}       : {token, {open_title, TokenLine, TokenChars}}.
     24 {ANY_QUOTE}        : {token, {any_quote, TokenLine, TokenChars}}.
     25 {ESCAPE}           : {token, {verbatim, TokenLine, TokenChars}}.
     26 {WS}               : {token, {ws, TokenLine, TokenChars}}.
     27 {ANY}              : {token, {verbatim, TokenLine, TokenChars}}.
     28 
     29 Erlang code.
     30 
     31 dismiss_backslash([$\\|Chars]) -> Chars.