mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2025-12-06 02:40:26 -08:00
Code Issues Projects Releases Packages Wiki Activity

contrib: remove use of legacy names

Browse source
This commit is contained in:
Marius Gerbershagen 2019-01-14 21:01:51 +01:00
parent 6982a805f1
commit 0b6311b399
3 changed files with 34 additions and 34 deletions
Download patch file Download diff file Expand all files Collapse all files

2
contrib/unicode/names-pairs-sort.lisp
View file

@ -250,7 +250,7 @@ _ecl_ucd_code_to_name(ecl_character c)
char buffer[ECL_UCD_LARGEST_CHAR_NAME+1];
buffer[0] = 0;
fill_pair_name(buffer, pair);
return make_base_string_copy(buffer);
return ecl_make_simple_base_string(buffer,-1);
}
}