建议：增加函数xdrx_assoclist_sort1、xdrx_assoclist_sort2索引按字母顺序排序的功能

dyjwyqz5221

建议：增加函数xdrx_assoclist_sort1、xdrx_assoclist_sort2索引按字母顺序排序的功能，就像xdrx_string_sort的功能。
如：(setq lst '(("a1" "dfg")("a10" "ddd")("a3" "dfg")("b10" "ddd")("b1" "dfg")))
排序后为：'(("a1" "dfg")("a3" "dfg")("a10" "ddd")("b1" "dfg")("b10" "ddd"))

XDSoft

dyjwyqz5221 发表于 2020-6-9 10:09
有些复杂一些的需要用到类似xdrx_string_sort才可以

下载 2020.0609日更新的API，
提供函数 xdrx-string-logical<  , xdrx-string-logical> 函数，字符串逻辑比较，考虑字符串中的数字

命令: !lst
(("a1" "dfg") ("a10" "ddd") ("a3" "dfg") ("b10" "ddd") ("b1" "dfg"))

命令: (vl-sort lst '(lambda(x y)(< (car x)(car y))))
(("a1" "dfg") ("a10" "ddd") ("a3" "dfg") ("b1" "dfg") ("b10" "ddd"))

命令: (vl-sort lst '(lambda(x y)(xdrx-string-logical< (car x)(car y))))
(("a1" "dfg") ("a3" "dfg") ("a10" "ddd") ("b1" "dfg") ("b10" "ddd"))

Lisphk

直接
命令: (vl-sort lst '(lambda(x y)(< (car x)(car y))))
(("a1" "dfg") ("a10" "ddd") ("a3" "dfg") ("b1" "dfg") ("b10" "ddd"))

不就可以了

dyjwyqz5221

Lisphk 发表于 2020-6-9 09:52
直接
命令: (vl-sort lst '(lambda(x y)(< (car x)(car y))))
(("a1" "dfg") ("a10" "ddd") ("a3" "dfg") ...

有些复杂一些的需要用到类似xdrx_string_sort才可以

Lisphk

dyjwyqz5221 发表于 2020-6-9 10:09
有些复杂一些的需要用到类似xdrx_string_sort才可以

能举个复杂的例子吗

dyjwyqz5221

XDSoft 发表于 2020-6-8 13:55
下载 2020.0609日更新的API，
提供函数 xdrx-string-logical<  , xdrx-string-logical> 函数，字符串逻 ...

下载安装了06.09版本后，没有结果呀

命令: (xdrx-string-logical< '(("a1" "dfg") ("a10" "ddd") ("a3" "dfg") ("b10" "ddd") ("b1" "dfg")))
nil
命令: (xdrx-string-logical> '(("a1" "dfg") ("a10" "ddd") ("a3" "dfg") ("b10" "ddd") ("b1" "dfg")))
nil

dyjwyqz5221

XDSoft 发表于 2020-6-8 13:55
下载 2020.0609日更新的API，
提供函数 xdrx-string-logical<  , xdrx-string-logical> 函数，字符串逻 ...

明白了，