rfivet/uemacs
1
0
Fork 0
mirror of https://github.com/rfivet/uemacs.git synced 2024-09-20 20:55:54 -04:00
Code Releases Activity

Fix &right to handle a count of Unicode characters.

Browse Source
This commit is contained in:
Renaud 2021-08-21 17:21:18 +08:00
parent cd2f848e0a
commit ab34471d4d
1 changed files with 10 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
eval.c
View File

@ -414,14 +414,20 @@ static const char *gtfun( char *fname) {
retstr = result ;
break ;
case UFRIGHT:
sz = atoi( argv[ 1]) ;
sz = strlen( argv[ 0]) ;
for( sz1 = atoi( argv[ 1]) ; sz1 > 0 && sz > 0 ; sz1--)
if( --sz > 0)
sz -= utf8_revdelta( (unsigned char *) &( argv[ 0])[ sz], sz) ;
retstr = &( argv[ 0])[ sz] ;
sz = strlen( retstr) ;
if( sz >= ressize) {
free( result) ;
result = malloc( sz + 1) ;
ressize = sz + 1 ;
result = malloc( ressize) ;
}
retstr = strcpy( result, &(argv[ 0][ strlen( argv[ 0]) - sz])) ;
retstr = strcpy( result, retstr) ;
break ;
case UFMID:
sz1 = strlen( argv[ 0]) ;