Insure &asc &chr 128 equals 128.

Insert-string can't handle character code > 0xFF.
2015-02-02 12:50:52 +08:00 · 2015-02-02 12:50:52 +08:00 · 91455a2e5a
parent 7c74bfdc1a
commit 91455a2e5a
2 changed files with 2 additions and 2 deletions
--- a/eval.c
+++ b/eval.c
@ -516,7 +516,7 @@ static char *gtfun( char *fname) {
 		retstr = ltos( atoi( argx) == 42) ;
 		break ;
 	case UFASCII:
-		retstr = i_to_a( (int) argx[ 0]) ;
+		retstr = i_to_a( (int) argx[ 0] & 0xFF) ;
 		break ;
 	case UFCHR:
 		result[0] = atoi(argx);
--- a/line.c
+++ b/line.c
@ -265,7 +265,7 @@ int linstr( char *instr) {

 		while( (tmpc = *instr++)) {
 			status =
-			    (tmpc == '\n' ? lnewline() : linsert( 1, tmpc)) ;
+			    (tmpc == '\n' ? lnewline() : linsert( 1, tmpc & 0xFF)) ;

 			/* Insertion error? */
 			if( status != TRUE) {