diff options
| author | Sergio Queiroz <sqmedeiros@gmail.com> | 2015-09-11 15:01:10 -0300 |
|---|---|---|
| committer | Sergio Queiroz <sqmedeiros@gmail.com> | 2015-09-11 15:01:10 -0300 |
| commit | 8ac31b94b88227222b189c447aeea1b4131eed18 (patch) | |
| tree | 8a913ad00c03d15cd2cb5bcedd10ddba65b01e3b /examples | |
| parent | ce9f1486d1d11699e8099d13c6f65fabe372385d (diff) | |
| download | lpeglabel-8ac31b94b88227222b189c447aeea1b4131eed18.tar.gz lpeglabel-8ac31b94b88227222b189c447aeea1b4131eed18.tar.bz2 lpeglabel-8ac31b94b88227222b189c447aeea1b4131eed18.zip | |
Result of an unsuccessful matching is label + subject
Diffstat (limited to 'examples')
| -rw-r--r-- | examples/listId1.lua | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/examples/listId1.lua b/examples/listId1.lua index e075bd1..0bf26a1 100644 --- a/examples/listId1.lua +++ b/examples/listId1.lua | |||
| @@ -8,12 +8,12 @@ local g = m.P{ | |||
| 8 | } | 8 | } |
| 9 | 9 | ||
| 10 | function mymatch (g, s) | 10 | function mymatch (g, s) |
| 11 | local r, e = g:match(s) | 11 | local r, e, sfail = g:match(s) |
| 12 | if not r then | 12 | if not r then |
| 13 | if e == 1 then | 13 | if e == 1 then |
| 14 | return r, "Error: expecting an identifier" | 14 | return r, "Error: expecting an identifier before '" .. sfail .. "'" |
| 15 | elseif e == 2 then | 15 | elseif e == 2 then |
| 16 | return r, "Error: expecting ','" | 16 | return r, "Error: expecting ',' before '" .. sfail .. "'" |
| 17 | else | 17 | else |
| 18 | return r, "Error" | 18 | return r, "Error" |
| 19 | end | 19 | end |