Gauche > Archives > 2024/06/01

2024/06/01 01:29:11 UTCg000001
#
Common Lispだと (butlast '(a b c . d) 0) → (a b c) ですが、それに相当するものというと、(drop-right '(a b c . d) 0) → (a b c) でしょうか(しかし0を受け付けるのかどうかわからず……)
2024/06/01 01:33:36 UTCg000001
#
srfi-1を確認してみたら、同様の例がサンプルとして載っていました。
https://srfi.schemers.org/srfi-1/srfi-1.html#drop-right
(take-right '(a b c . d) 0) → d は、Common Lispの (last '(a b c . d) 0) → d と対応するみたいですね。
2024/06/01 02:16:50 UTCshiro
#
おお、drop-rightがあったか! 普段使わないから忘れてた。