{"url":"https://kilrey.hatenadiary.org/entry/20041229/p1","blog_url":"https://kilrey.hatenadiary.org/","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fkilrey.hatenadiary.org%2Fentry%2F20041229%2Fp1\" title=\"\u5909\u6570\u30c6\u30fc\u30d6\u30eb - \u3046\u3063\u304f\u3064\u3055\u3093\u672c\u3092\u8aad\u3080\u3002\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","height":"190","author_url":"https://blog.hatena.ne.jp/kilrey/","provider_url":"https://hatena.blog","author_name":"kilrey","type":"rich","width":"100%","description":";\u5909\u6570\u30c6\u30fc\u30d6\u30ebglobal\u958b\u59cb (define x \"X\") (define incr #t) ;\u5909\u6570\u30c6\u30fc\u30d6\u30eblet\u958b\u59cb (let ((x 0)) (set! incr ;\u5909\u6570\u30c6\u30fc\u30d6\u30eblambda\u958b\u59cb (lambda () (begin (set! x (+ x 1)) x)) ;\u5909\u6570\u30c6\u30fc\u30d6\u30eblambda\u7d42\u4e86 )) ;\u5909\u6570\u30c6\u30fc\u30d6\u30eblet\u7d42\u4e86 (incr) ;\u5909\u6570\u30c6\u30fc\u30d6\u30eblambda\u3067 (begin (set! x (+ x 1)) x) >> 1 (incr) ;\u5909\u6570\u30c6\u30fc\u30d6\u30eblambda\u3067 (begin (set! x (+ x 1)) x) >> 2 x ;\u5909\u6570\u30c6\u30fc\u30d6\u30ebglobal\u3067 x >\u2026","title":"\u5909\u6570\u30c6\u30fc\u30d6\u30eb","provider_name":"Hatena Blog","published":"2004-12-29 00:00:00","image_url":null,"categories":["Scheme on Java"],"version":"1.0","blog_title":"\u3046\u3063\u304f\u3064\u3055\u3093\u672c\u3092\u8aad\u3080\u3002"}