CLでSRFI-55 — #:g1

Posted 2011-12-16 21:10:00 GMT

CLでSRF、今回は、SRFI-55の「require-extension」です。

SRFI 7には、requires等の依存ライブラリを指定する方法がありますが、対話的に使用することは考慮されていなかったり、実際に必要なライブラリをロードするかどうかは規定されていないとのことで、その辺りをどうにかするもののようです。

動作

(srfi-55:register-extension '(srfi 1)
                            #+quicklisp
                            (lambda () (ql:quickload :srfi-1)))
;=>  ((#<FUNCTION EQUAL> (SRFI 1) #<FUNCTION # {100928892B}>))

(srfi-55:require-extension (srfi 1))
;>>  To load "srfi-1":
;>>    Load 1 ASDF system:
;>>      srfi-1
;>>  ; Loading "srfi-1"
;>>
;>>
;=>  (:SRFI-1)
quicklispでロードさせるというのが意味不明な感じですが、こんな風に使えます。

移植について

10行位なので、すぐ移植できます。マクロにはmbeを使いました。

comments powered by Disqus