summaryrefslogtreecommitdiffstats
path: root/gettext-tools/src/x-tcl.c
diff options
context:
space:
mode:
Diffstat (limited to 'gettext-tools/src/x-tcl.c')
-rw-r--r--gettext-tools/src/x-tcl.c12
1 files changed, 8 insertions, 4 deletions
diff --git a/gettext-tools/src/x-tcl.c b/gettext-tools/src/x-tcl.c
index 82bf19d..2b57e3f 100644
--- a/gettext-tools/src/x-tcl.c
+++ b/gettext-tools/src/x-tcl.c
@@ -496,7 +496,10 @@ do_getc_escaped ()
{
c = phase1_getc ();
if (c == EOF || !c_isxdigit ((unsigned char) c))
- break;
+ {
+ phase1_ungetc (c);
+ break;
+ }
if (c >= '0' && c <= '9')
n = (n << 4) + (c - '0');
@@ -505,7 +508,6 @@ do_getc_escaped ()
else if (c >= 'a' && c <= 'f')
n = (n << 4) + (c - 'a' + 10);
}
- phase1_ungetc (c);
return (i > 0 ? (unsigned char) n : 'x');
}
case 'u':
@@ -517,7 +519,10 @@ do_getc_escaped ()
{
c = phase1_getc ();
if (c == EOF || !c_isxdigit ((unsigned char) c))
- break;
+ {
+ phase1_ungetc (c);
+ break;
+ }
if (c >= '0' && c <= '9')
n = (n << 4) + (c - '0');
@@ -526,7 +531,6 @@ do_getc_escaped ()
else if (c >= 'a' && c <= 'f')
n = (n << 4) + (c - 'a' + 10);
}
- phase1_ungetc (c);
return (i > 0 ? n : 'u');
}
case '0': case '1': case '2': case '3': case '4':