{"blog_url":"https://mzp.hatenadiary.org/","author_url":"https://blog.hatena.ne.jp/mzp/","description":"\u30c7\u30d0\u30c3\u30b0\u4e2d\u306b\u3060\u3044\u305f\u3044\u8aad\u3093\u3060\u611f\u3058\u3067\u306f\u3001\u4e00\u756a\u96e3\u3057\u305d\u3046\u306a\u306e\u304c\u4ee5\u4e0b\u306e\u90e8\u5206\u3002 (define selector (make <selector>)) ; ..... (define (read-input) ; .... (call/cc (lambda (return) (let* ((path (format #f \"/tmp/gaup~a-~a\" gaup-pid gaup-cont)) (server (make-server-socket 'unix path))) (sys-chmod path #o777) ;;\u7d99\u7d9a\u30b5\u30fc\u30d0\u306e\u809d\u3067\u3042\u308b\"\u7d99\u7d9a\"\u306f\u3001\u3053\u306eselector-add!\u306e\u30af\u30ed\u30fc\u30b8\u30e3\u306b\u4fdd\u2026","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fmzp.hatenadiary.org%2Fentry%2F20070402%2Fcallcc\" title=\"gaup\u30e1\u30e2 - \u307f\u305a\u3074\u30fc\u65e5\u8a18\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","published":"2007-04-02 00:00:01","author_name":"mzp","categories":["Lisp","gaup"],"title":"gaup\u30e1\u30e2","url":"https://mzp.hatenadiary.org/entry/20070402/callcc","blog_title":"\u307f\u305a\u3074\u30fc\u65e5\u8a18","provider_name":"Hatena Blog","height":"190","width":"100%","type":"rich","image_url":null,"version":"1.0","provider_url":"https://hatena.blog"}