yuu_nkjm blog


2014-09-14(Sun) [長年日記]

[Kawa][Scheme] パラメータオブジェクト

SRFI 39: Parameter objectsのKawaの実装Kawa: Parameter objectsがバグってる?Kawa2.0でもこうなった.

(define radix
  (make-parameter 10))
 
(radix)   ;; → 10
(radix 2) ;; → 2
(radix)   ;; → 2
 
(define (f n)
  (number->string n (radix)))
 
(define prompt
  (make-parameter 
    123
    (lambda (x) x)))
 
(prompt)     ;; → 123
(prompt "|") ;; →
(prompt)     ;; → |
 
(f 10)       ;; → 1010 (基数2で10を表記)
(parameterize ((radix 8)) (f 10)) ;; → 1010 (基数8に設定.でもそれが見えるのはbody以降)
(parameterize ((radix 8) (prompt (f 10))) (prompt)) ;; → 12 (これって1010になるはずじゃない?)

トップ «前の日記(2014-09-13(Sat)) 最新 次の日記(2014-09-15(Mon))» 月表示 編集 設定
2006|01|06|12|
2007|06|09|
2008|01|03|04|06|07|08|09|10|12|
2009|01|02|05|06|07|08|10|11|12|
2010|03|04|05|06|07|08|09|10|11|
2011|01|02|03|04|05|06|07|08|09|11|12|
2012|01|02|04|06|07|08|10|11|12|
2013|01|02|03|07|08|10|11|12|
2014|01|02|04|05|06|07|08|09|10|11|
2015|01|02|07|11|12|
2016|01|03|05|07|08|09|