備忘録
すぐ忘れるのでメモ。 ;lengthを書き換えた (define (length lst) (if (null? lst) 0 (+ 1 (length (cdr lst))))) ;元の組み込みlengthで定義しなおす(『プログラミングGauche』のP49より) (define length (with-module gauche length)) 元に戻す方法がわ…
すぐ忘れるのでメモ。 ;lengthを書き換えた (define (length lst) (if (null? lst) 0 (+ 1 (length (cdr lst))))) ;元の組み込みlengthで定義しなおす(『プログラミングGauche』のP49より) (define length (with-module gauche length)) 元に戻す方法がわ…