;; fluid-let* ;; ;; example ;; (define-values (a b c) ;; (values 1 2 3)) ;; (define (a+b+c) ;; (+ a b c)) ;; (a+b+c) ;; ;; 6 ;; (fluid-let* ((a 100) ;; (b (* a 2)) ;; (c (+ a b))) ;; (a+b+c)) ;; ;; 600
つまり、以下のコードのようになります。
そうなると、こういうのが欲しくなります。(このコードは動かないと思います。)
syntax-rules でこういうの書くにはどうしたら良いんだろう。。たぶん、... のところがダメなんじゃないかとは思うのですが・・・。
0 件のコメント:
コメントを投稿