#:g1: CLでSRFI 175

九年ほど前からSchemeのSRFIをCommon Lispに移植する遊びをしていますが、久々にコピペ移植してみました。
前回SRFI 118を移植したのは、2005-01-02のようなので、実に五年ぶり。

• SRFI-118の紹介 & Common Lispへ移植

今回移植したのは、SRFI 175: ASCII character libraryで、ASCIIを扱うライブラリのようで、現時点でファイナルになっているものでは一番番号が大きいものです。

• SRFI 175: ASCII character library
• g000001 / SRFI 175 for CL: ASCII character library

導入

Ultralispに登録してみたので、

(ql-dist:install-dist "http://dist.ultralisp.org/")

してあれば、

(ql:quickload :srfi-175)

でインストール可能です。

動作

ASCIIに関して操作したいことは大体網羅されているので、必要な時には便利に使えるのではないでしょうか。

(ascii-downcase #\G)
→ #\g 
(ascii-alphabetic? #\1)
→ nil 
(remove-if #'ascii-whitespace? "foo bar baz")
→ "foobarbaz" 

まとめ

SRFIの移植については、Scheme→Common Lispなコンパチレイヤーがあると楽なのでボチボチ作ってみたりしていますが、このあたりも作り込むとコピペが捗りそうです。

• g000001 / RnRS Compatibility Package for Common Lisp

このrnrs-compatでは関数とマクロで変換していますが、トランスレータでの一括変換も試してみたいところ。

■

HTML generated by 3bmd in LispWorks 7.0.0