#:g1: SRFI 111 on Common Lisp

Posted 2013-04-26 14:27:00 GMT

 The new SRFI (111: Boxes) proposal become draft. so I ported it to Common Lisp right away.

 新しいSRFIの提案(111: Boxes)がドラフトになったので早速CLに移植。(ちなみにこれからは英語風の俺言語と日本語を併記していくことにしました。)

Examples | 実行例

(in-readtable :srfi-111)


(let ((b (box 0)))
  (set-box! b 42)
  (= 42 (unbox b)))
;=>  T


(let ((b #&0))                          ;Lexical syntax
  (set-box! b 42)
  (= 42 (unbox b)))
;=>  T


(box? #&#&42)                           ;Lexical syntax
;=>  T


(box? (box (box 42)))
;=>  T


(unbox (box 42))
;=>  42


(unbox #&42)                            ;Lexical syntax
;=>  42

About porting | 移植について

 It's just a copy and paste programming!

 コピペです!

comments powered by Disqus