--- freem/src/expr.c 2025/04/13 04:22:43 1.13 +++ freem/src/expr.c 2025/04/14 23:20:23 1.14 @@ -1,5 +1,5 @@ /* - * $Id: expr.c,v 1.13 2025/04/13 04:22:43 snw Exp $ + * $Id: expr.c,v 1.14 2025/04/14 23:20:23 snw Exp $ * expression parser * * @@ -24,6 +24,9 @@ * along with FreeM. If not, see . * * $Log: expr.c,v $ + * Revision 1.14 2025/04/14 23:20:23 snw + * Restore support for any 8-bit character in + * * Revision 1.13 2025/04/13 04:22:43 snw * Fix snprintf calls * @@ -1688,8 +1691,6 @@ uparrow: case 'c': /* $CHARACTER */ { - char chrtmp[256]; - long pnum; short l, l1, m, n; l1 = f; @@ -1700,14 +1701,6 @@ uparrow: n = 1; l = 0; - stcpy (chrtmp, a); - stcnv_m2c (chrtmp); - pnum = atol (chrtmp); - - if (pnum > 127) { - merr_raise (MXNUM); - return; - } for (;;) {