5 files changed, 11 insertions, 11 deletions

diff --git a/examples/listId2.lua b/examples/listId2.lua
index 4943368..75060f9 100644
--- a/examples/listId2.lua
+++ b/examples/listId2.lua
@@ -18,9 +18,9 @@ local g = m.P{
 }
 
 function mymatch (g, s)
-        local r, e = g:match(s)
+        local r, e, sfail = g:match(s)
         if not r then
-                return r, terror[e]
+                return r, terror[e] .. " before '" .. sfail .. "'"
         end
         return r
 end
diff --git a/examples/listIdCatchRe.lua b/examples/listIdCatchRe.lua
index 5d38fec..8971191 100644
--- a/examples/listIdCatchRe.lua
+++ b/examples/listIdCatchRe.lua
@@ -1,4 +1,4 @@
-local re = require're'
+local re = require'relabel'
 
 local terror = {} 
 
diff --git a/examples/listIdRe1.lua b/examples/listIdRe1.lua
index c75bb1d..fc213bc 100644
--- a/examples/listIdRe1.lua
+++ b/examples/listIdRe1.lua
@@ -1,4 +1,4 @@
-local re = require 're' 
+local re = require 'relabel' 
 
 local g = re.compile[[
   S    <- Id List
@@ -7,12 +7,12 @@ local g = re.compile[[
 ]]
 
 function mymatch (g, s)
-        local r, e = g:match(s)
+        local r, e, sfail = g:match(s)
         if not r then
                 if e == 1 then
-        return r, "Error: expecting an identifier"
+        return r, "Error: expecting an identifier before '" .. sfail .. "'" 
         elseif e == 2 then
-        return r, "Error: expecting ','"
+        return r, "Error: expecting ',' before '" .. sfail .. "'" 
         else
         return r, "Error"
         end
diff --git a/examples/listIdRe2.lua b/examples/listIdRe2.lua
index 67c42f1..4cd140b 100644
--- a/examples/listIdRe2.lua
+++ b/examples/listIdRe2.lua
@@ -1,4 +1,4 @@
-local re = require 're' 
+local re = require 'relabel' 
 
 local errUndef, errId, errComma = 0, 1, 2
 
@@ -21,9 +21,9 @@ local g = re.compile[[
 ]]
 
 function mymatch (g, s)
-        local r, e = g:match(s)
+        local r, e, sfail = g:match(s)
         if not r then
-                return r, terror[e]
+                return r, terror[e] .. " before '" .. sfail .. "'"
         end
         return r
 end
diff --git a/examples/tiny.lua b/examples/tiny.lua
index aa9dbea..99c3144 100644
--- a/examples/tiny.lua
+++ b/examples/tiny.lua
@@ -1,4 +1,4 @@
-local re = require 're'
+local re = require 'relabel'
 
 local terror = {}