diff options
| -rw-r--r-- | eshtrans/frontend/lexer.esh | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/eshtrans/frontend/lexer.esh b/eshtrans/frontend/lexer.esh index f43b47d..6120128 100644 --- a/eshtrans/frontend/lexer.esh +++ b/eshtrans/frontend/lexer.esh @@ -92,14 +92,16 @@ lgetc() c='' else eval "c=\${lbufv_${lbufi}}" + #echo "LGETC:$lineno: $lbufi '$c'" >&2 lbufi=$((${lbufi} + 1)) fi } lungetc() { - lbufi=$((${lbufi} - 2)) + lbufi=$((${lbufi} - 1)) eval "c=\${lbufv_${lbufi}}" + #echo "LUNGETC:$lineno: $lbufi '$c'" >&2 lbufi=$((${lbufi} + 1)) } @@ -110,6 +112,7 @@ lsetc() else lbufi=$((${lbufi} - 1)) eval "c=\${lbufv_${lbufi}}" + #echo "LSETC:$lineno: $lbufi '$c'" >&2 lbufi=$((${lbufi} + 1)) fi } |