X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=src%2Fedu%2Fberkeley%2Fsbp%2Fchr%2FCharParser.java;h=9bdadbc1e90697c54588c3d7b292287b1e5fd9bc;hb=ae0cef03f2e46f6ae6438f9a3e60ca36ff1a4643;hp=b3ba6cb7463c80a31dd3f597723af8f716e2a034;hpb=0f735a615ec89bf86cc2618ca8147894c319ddae;p=sbp.git

diff --git a/src/edu/berkeley/sbp/chr/CharParser.java b/src/edu/berkeley/sbp/chr/CharParser.java
index b3ba6cb..9bdadbc 100644
--- a/src/edu/berkeley/sbp/chr/CharParser.java
+++ b/src/edu/berkeley/sbp/chr/CharParser.java
@@ -15,8 +15,13 @@ public class CharParser extends Parser<Character,String> {
 
     public CharParser(Union u) { super(u, new CharTopology()); }
 
-    public Forest<String> shiftToken(Character ct, Location loc) {
-        return Forest.create(loc, ct.toString(), null, false, false, null);
+    private Location oldloc;
+
+    public Forest<String> shiftToken(Character ct, Location newloc) {
+        if (oldloc==null) oldloc = newloc;
+        Forest<String> ret = Forest.create(oldloc.createRegion(newloc), ct.toString(), null, false);
+        oldloc = newloc;
+        return ret;
     }
 
 }