SRFI 69 ported
Chongkai Zhu <mrmathematica-/[email protected]> Mon, 14 Nov 2005 14:56:48 -0800 (PST)
| Newsgroups | gmane.lisp.scheme.plt.schematics |
|---|---|
| Message-ID | <[email protected]> |
--0-1054553307-1132009008=:44567 Content-Type: text/plain; charset=iso-8859-1 Content-Id: Content-Disposition: inline Content-Transfer-Encoding: quoted-printable Hi all, SRFI 69 ported and inserted into PLT SVN now. Docs for SRFI 59 60 also in= serted. For the test of SRFI 69, please refer to the attached. - Chongkai Zhu =09 __________________________________=20 Yahoo! FareChase: Search multiple travel sites in one click. http://farechase.yahoo.com --0-1054553307-1132009008=:44567 Content-Type: application/octet-stream; name="hashtest.scm" Content-Transfer-Encoding: base64 Content-Description: 3150297811-hashtest.scm Content-Disposition: attachment; filename="hashtest.scm" KHJlcXVpcmUgKHBsYW5ldCAidGVzdC5zcyIgKCJzY2hlbWF0aWNzIiAic2No ZW1ldW5pdC5wbHQiIDEgMSkpDQogICAgICAgICAocGxhbmV0ICJ0ZXh0LXVp LnNzIiAoInNjaGVtYXRpY3MiICJzY2hlbWV1bml0LnBsdCIgMSAxKSkpDQoN CihyZXF1aXJlIChsaWIgIjEuc3MiICJzcmZpIikNCiAgICAgICAgIChsaWIg IjY5LnNzIiAic3JmaSIpKQ0KDQooZGVmaW5lIHRlc3QtaGFzaC10YWJsZTEN CiAgKGFsaXN0LT5oYXNoLXRhYmxlICcoKGEgLiAxKSAoYiAuIDIpIChjIC4g MykpKSkNCihkZWZpbmUgdGVzdC1oYXNoLXRhYmxlMg0KICAoYWxpc3QtPmhh c2gtdGFibGUgJygoImEiIC4gMSkgKCJiIiAuIDIpICgiYyIgLiAzKSkgc3Ry aW5nLWNpPT8gc3RyaW5nLWNpLWhhc2gpKQ0KDQoNCihkZWZpbmUgdGVzdC1z dWl0ZQ0KICAobWFrZS10ZXN0LXN1aXRlDQogICAgInNyZmktNjkgdGVzdCBz dWl0Ig0KICAgIChtYWtlLXRlc3QtY2FzZQ0KICAgICAgIm1ha2UtaGFzaC10 YWJsZSBhbmQgaGFzaC10YWJsZT8iDQogICAgICAoYXNzZXJ0LXRydWUNCiAg ICAgICAgKGhhc2gtdGFibGU/IChtYWtlLWhhc2gtdGFibGUpKSkpDQogICAg KG1ha2UtdGVzdC1jYXNlDQogICAgICAiYWxpc3QtPmhhc2gtdGFibGUiDQog ICAgICAoYXNzZXJ0LXRydWUNCiAgICAgICAgKGhhc2gtdGFibGU/IHRlc3Qt aGFzaC10YWJsZTEpKSkNCiAgICAobWFrZS10ZXN0LWNhc2UNCiAgICAgICJo YXNoLXRhYmxlLWVxdWl2YWxlbmNlLWZ1bmN0aW9uIg0KICAgICAgKGFzc2Vy dC1lcT8NCiAgICAgICAgKGhhc2gtdGFibGUtZXF1aXZhbGVuY2UtZnVuY3Rp b24gKG1ha2UtaGFzaC10YWJsZSkpDQogICAgICAgIGVxdWFsPykNCiAgICAg IChhc3NlcnQtZXE/DQogICAgICAgIChoYXNoLXRhYmxlLWVxdWl2YWxlbmNl LWZ1bmN0aW9uIChtYWtlLWhhc2gtdGFibGUgZXE/KSkNCiAgICAgICAgZXE/ KQ0KICAgICAgKGFzc2VydC1lcT8NCiAgICAgICAgKGhhc2gtdGFibGUtZXF1 aXZhbGVuY2UtZnVuY3Rpb24gdGVzdC1oYXNoLXRhYmxlMikNCiAgICAgICAg c3RyaW5nLWNpPT8pKQ0KICAgIChtYWtlLXRlc3QtY2FzZQ0KICAgICAgImhh c2gtdGFibGUtaGFzaC1mdW5jdGlvbiINCiAgICAgIChhc3NlcnQtZXE/DQog ICAgICAgIChoYXNoLXRhYmxlLWhhc2gtZnVuY3Rpb24gKG1ha2UtaGFzaC10 YWJsZSkpDQogICAgICAgIGhhc2gpDQogICAgICAoYXNzZXJ0LWVxPw0KICAg ICAgICAoaGFzaC10YWJsZS1oYXNoLWZ1bmN0aW9uIChtYWtlLWhhc2gtdGFi bGUgZXE/KSkNCiAgICAgICAgaGFzaC1ieS1pZGVudGl0eSkNCiAgICAgIChh c3NlcnQtZXE/DQogICAgICAgIChoYXNoLXRhYmxlLWhhc2gtZnVuY3Rpb24g dGVzdC1oYXNoLXRhYmxlMikNCiAgICAgICAgc3RyaW5nLWNpLWhhc2gpKQ0K ICAgIChtYWtlLXRlc3QtY2FzZQ0KICAgICAgImhhc2gtdGFibGUtcmVmIg0K ICAgICAgKGFzc2VydC1lcXVhbD8NCiAgICAgICAgKGhhc2gtdGFibGUtcmVm IHRlc3QtaGFzaC10YWJsZTEgJ2IpDQogICAgICAgIDIpDQogICAgICAoYXNz ZXJ0LWVxdWFsPw0KICAgICAgICAoaGFzaC10YWJsZS1yZWYgdGVzdC1oYXNo LXRhYmxlMiAiQyIpDQogICAgICAgIDMpDQogICAgICAoYXNzZXJ0LWZhbHNl DQogICAgICAgIChoYXNoLXRhYmxlLXJlZiB0ZXN0LWhhc2gtdGFibGUxICdk IChsYW1iZGEgKCkgI2YpKSkpDQogICAgKG1ha2UtdGVzdC1jYXNlDQogICAg ICAiaGFzaC10YWJsZS1yZWYvZGVmYXVsdCINCiAgICAgIChhc3NlcnQtZmFs c2UNCiAgICAgICAgKGhhc2gtdGFibGUtcmVmL2RlZmF1bHQgdGVzdC1oYXNo LXRhYmxlMiAiZCIgI2YpKSkNCiAgICAobWFrZS10ZXN0LWNhc2UNCiAgICAg ICJoYXNoLXRhYmxlLXNldCEiDQogICAgICAoYXNzZXJ0LWVxdWFsPw0KICAg ICAgICAoYmVnaW4gKGhhc2gtdGFibGUtc2V0ISB0ZXN0LWhhc2gtdGFibGUx ICdjIDQpDQogICAgICAgICAgICAgICAoaGFzaC10YWJsZS1yZWYgdGVzdC1o YXNoLXRhYmxlMSAnYykpDQogICAgICAgIDQpDQogICAgICAoYXNzZXJ0LWVx dWFsPw0KICAgICAgICAoYmVnaW4gKGhhc2gtdGFibGUtc2V0ISB0ZXN0LWhh c2gtdGFibGUyICJkIiA0KQ0KICAgICAgICAgICAgICAgKGhhc2gtdGFibGUt cmVmIHRlc3QtaGFzaC10YWJsZTIgIkQiKSkNCiAgICAgICAgNCkpDQogICAg KG1ha2UtdGVzdC1jYXNlDQogICAgICAiaGFzaC10YWJsZS1kZWxldGUhIg0K ICAgICAgKGFzc2VydC1mYWxzZQ0KICAgICAgICAoYmVnaW4gKGhhc2gtdGFi bGUtZGVsZXRlISB0ZXN0LWhhc2gtdGFibGUyICJEIikNCiAgICAgICAgICAg ICAgIChoYXNoLXRhYmxlLXJlZi9kZWZhdWx0IHRlc3QtaGFzaC10YWJsZTIg ImQiICNmKSkpKQ0KICAgIChtYWtlLXRlc3QtY2FzZQ0KICAgICAgImhhc2gt dGFibGUtZXhpc3RzPyINCiAgICAgIChhc3NlcnQtdHJ1ZQ0KICAgICAgICAo aGFzaC10YWJsZS1leGlzdHM/IHRlc3QtaGFzaC10YWJsZTIgIkIiKSkNCiAg ICAgIChhc3NlcnQtZmFsc2UNCiAgICAgICAgKGhhc2gtdGFibGUtZXhpc3Rz PyB0ZXN0LWhhc2gtdGFibGUxICdkKSkpDQogICAgKG1ha2UtdGVzdC1jYXNl DQogICAgICAiaGFzaC10YWJsZS11cGRhdGUhIg0KICAgICAgKGFzc2VydC1l cXVhbD8NCiAgICAgICAgKGJlZ2luIChoYXNoLXRhYmxlLXVwZGF0ZSEgdGVz dC1oYXNoLXRhYmxlMSAnYyBzdWIxKQ0KICAgICAgICAgICAgICAgKGhhc2gt dGFibGUtcmVmIHRlc3QtaGFzaC10YWJsZTEgJ2MpKQ0KICAgICAgICAzKQ0K ICAgICAgKGFzc2VydC1lcXVhbD8NCiAgICAgICAgKGJlZ2luIChoYXNoLXRh YmxlLXVwZGF0ZSEgdGVzdC1oYXNoLXRhYmxlMiAiZCIgYWRkMSAobGFtYmRh ICgpIDMpKQ0KICAgICAgICAgICAgICAgKGhhc2gtdGFibGUtcmVmIHRlc3Qt aGFzaC10YWJsZTIgImQiKSkNCiAgICAgICAgNCkpDQogICAgKG1ha2UtdGVz dC1jYXNlDQogICAgICAiaGFzaC10YWJsZS11cGRhdGUhL2RlZmF1bHQiDQog ICAgICAoYXNzZXJ0LWVxdWFsPw0KICAgICAgICAoYmVnaW4gKGhhc2gtdGFi bGUtdXBkYXRlIS9kZWZhdWx0IHRlc3QtaGFzaC10YWJsZTEgJ2QgYWRkMSAz KQ0KICAgICAgICAgICAgICAgKGhhc2gtdGFibGUtcmVmIHRlc3QtaGFzaC10 YWJsZTEgJ2QpKQ0KICAgICAgICA0KSkNCiAgICAobWFrZS10ZXN0LWNhc2UN CiAgICAgICJoYXNoLXRhYmxlLXNpemUiDQogICAgICAoYXNzZXJ0LWVxdWFs Pw0KICAgICAgICAoaGFzaC10YWJsZS1zaXplIHRlc3QtaGFzaC10YWJsZTEp DQogICAgICAgIDQpDQogICAgICAoYXNzZXJ0LWVxdWFsPw0KICAgICAgICAo aGFzaC10YWJsZS1zaXplIHRlc3QtaGFzaC10YWJsZTIpDQogICAgICAgIDQp KQ0KICAgIChtYWtlLXRlc3QtY2FzZQ0KICAgICAgImhhc2gtdGFibGUta2V5 cyINCiAgICAgIChhc3NlcnQtdHJ1ZQ0KICAgICAgICAobHNldD0gZXE/DQog ICAgICAgICAgICAgICAoaGFzaC10YWJsZS1rZXlzIHRlc3QtaGFzaC10YWJs ZTEpDQogICAgICAgICAgICAgICAnKGEgYiBjIGQpKSkNCiAgICAgIChhc3Nl cnQtdHJ1ZQ0KICAgICAgICAobHNldD0gZXF1YWw/DQogICAgICAgICAgICAg ICAoaGFzaC10YWJsZS1rZXlzIHRlc3QtaGFzaC10YWJsZTIpDQogICAgICAg ICAgICAgICAobGlzdCAiYSIgImIiICJjIiAiZCIpKSkpDQogICAgKG1ha2Ut dGVzdC1jYXNlDQogICAgICAiaGFzaC10YWJsZS12YWx1ZXMiDQogICAgICAo YXNzZXJ0LXRydWUNCiAgICAgICAgKGxzZXQ9IGVxdj8NCiAgICAgICAgICAg ICAgIChoYXNoLXRhYmxlLXZhbHVlcyB0ZXN0LWhhc2gtdGFibGUxKQ0KICAg ICAgICAgICAgICAgJygxIDIgMyA0KSkpDQogICAgICAoYXNzZXJ0LXRydWUN CiAgICAgICAgKGxzZXQ9IGVxdj8NCiAgICAgICAgICAgICAgIChoYXNoLXRh YmxlLXZhbHVlcyB0ZXN0LWhhc2gtdGFibGUyKQ0KICAgICAgICAgICAgICAg JygxIDIgMyA0KSkpKQ0KICAgIChtYWtlLXRlc3QtY2FzZQ0KICAgICAgImhh c2gtdGFibGUtd2FsayINCiAgICAgIChhc3NlcnQtdHJ1ZQ0KICAgICAgICAo bGV0ICgoYSAnKCkpKQ0KICAgICAgICAgIChoYXNoLXRhYmxlLXdhbGsgdGVz dC1oYXNoLXRhYmxlMQ0KICAgICAgICAgICAgICAgICAgICAgICAgICAgKGxh bWJkYSAoa2V5IHZhbHVlKQ0KICAgICAgICAgICAgICAgICAgICAgICAgICAg ICAoc2V0ISBhIChjb25zIChjb25zIGtleSB2YWx1ZSkgYSkpKSkNCiAgICAg ICAgICAobHNldD0gZXF1YWw/DQogICAgICAgICAgICAgICAgIGENCiAgICAg ICAgICAgICAgICAgJygoYSAuIDEpIChiIC4gMikgKGMgLiAzKSAoZCAuIDQp KSkpKSkNCiAgICAobWFrZS10ZXN0LWNhc2UNCiAgICAgICJoYXNoLXRhYmxl LWZvbGQiDQogICAgICAoYXNzZXJ0LXRydWUNCiAgICAgICAgKGxzZXQ9IGVx dWFsPw0KICAgICAgICAgICAgICAgKGhhc2gtdGFibGUtZm9sZCB0ZXN0LWhh c2gtdGFibGUyDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIChs YW1iZGEgKGtleSB2YWx1ZSBhY2N1KQ0KICAgICAgICAgICAgICAgICAgICAg ICAgICAgICAgICAgIChjb25zIChjb25zIGtleSB2YWx1ZSkgYWNjdSkpDQog ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICcoKSkNCiAgICAgICAg ICAgICAgIChsaXN0IChjb25zICJhIiAxKQ0KICAgICAgICAgICAgICAgICAg ICAgKGNvbnMgImIiIDIpDQogICAgICAgICAgICAgICAgICAgICAoY29ucyAi YyIgMykNCiAgICAgICAgICAgICAgICAgICAgIChjb25zICJkIiA0KSkpKSkN CiAgICAobWFrZS10ZXN0LWNhc2UNCiAgICAgICJoYXNoLXRhYmxlLT5hbGlz dCINCiAgICAgIChhc3NlcnQtdHJ1ZQ0KICAgICAgICAobHNldD0gZXF1YWw/ DQogICAgICAgICAgICAgICAoaGFzaC10YWJsZS0+YWxpc3QgdGVzdC1oYXNo LXRhYmxlMSkNCiAgICAgICAgICAgICAgICcoKGEgLiAxKSAoYiAuIDIpIChj IC4gMykgKGQgLiA0KSkpKSkNCiAgICAobWFrZS10ZXN0LWNhc2UNCiAgICAg ICJoYXNoLXRhYmxlLWNvcHkiDQogICAgICAoYXNzZXJ0LXRydWUNCiAgICAg ICAgKGxzZXQ9IGVxdWFsPw0KICAgICAgICAgICAgICAgKGhhc2gtdGFibGUt PmFsaXN0IChoYXNoLXRhYmxlLWNvcHkgdGVzdC1oYXNoLXRhYmxlMikpDQog ICAgICAgICAgICAgICAobGlzdCAoY29ucyAiYSIgMSkNCiAgICAgICAgICAg ICAgICAgICAgIChjb25zICJiIiAyKQ0KICAgICAgICAgICAgICAgICAgICAg KGNvbnMgImMiIDMpDQogICAgICAgICAgICAgICAgICAgICAoY29ucyAiZCIg NCkpKSkNCiAgICAgIChhc3NlcnQtZmFsc2UNCiAgICAgICAgKGVxPyAoaGFz aC10YWJsZS1jb3B5IHRlc3QtaGFzaC10YWJsZTEpDQogICAgICAgICAgICAg dGVzdC1oYXNoLXRhYmxlMSkpDQogICAgICAoYXNzZXJ0LWVxPw0KICAgICAg ICAoaGFzaC10YWJsZS1lcXVpdmFsZW5jZS1mdW5jdGlvbg0KICAgICAgICAg IHRlc3QtaGFzaC10YWJsZTEpDQogICAgICAgIChoYXNoLXRhYmxlLWVxdWl2 YWxlbmNlLWZ1bmN0aW9uDQogICAgICAgICAgKGhhc2gtdGFibGUtY29weSB0 ZXN0LWhhc2gtdGFibGUxKSkpDQogICAgICAoYXNzZXJ0LWVxPw0KICAgICAg ICAoaGFzaC10YWJsZS1oYXNoLWZ1bmN0aW9uDQogICAgICAgICAgdGVzdC1o YXNoLXRhYmxlMikNCiAgICAgICAgKGhhc2gtdGFibGUtaGFzaC1mdW5jdGlv bg0KICAgICAgICAgIChoYXNoLXRhYmxlLWNvcHkgdGVzdC1oYXNoLXRhYmxl MikpKSkNCiAgICAobWFrZS10ZXN0LWNhc2UNCiAgICAgICJoYXNoLXRhYmxl LT5hbGlzdCINCiAgICAgIChhc3NlcnQtdHJ1ZQ0KICAgICAgICAobHNldD0g ZXF1YWw/DQogICAgICAgICAgICAgICAoaGFzaC10YWJsZS0+YWxpc3QNCiAg ICAgICAgICAgICAgICAgKGhhc2gtdGFibGUtbWVyZ2UhICB0ZXN0LWhhc2gt dGFibGUxDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg dGVzdC1oYXNoLXRhYmxlMikpDQogICAgICAgICAgICAgICAnKCgiYSIgLiAx KQ0KICAgICAgICAgICAgICAgICAoImIiIC4gMikNCiAgICAgICAgICAgICAg ICAgKCJjIiAuIDMpDQogICAgICAgICAgICAgICAgICgiZCIgLiA0KQ0KICAg ICAgICAgICAgICAgICAoYSAuIDEpDQogICAgICAgICAgICAgICAgIChiIC4g MikNCiAgICAgICAgICAgICAgICAgKGMgLiAzKQ0KICAgICAgICAgICAgICAg ICAoZCAuIDQpKSkpDQogICAgICAoYXNzZXJ0LXRydWUNCiAgICAgICAgKGxz ZXQ9IGVxdWFsPw0KICAgICAgICAgICAgICAgKGhhc2gtdGFibGUtPmFsaXN0 DQogICAgICAgICAgICAgICAgIChoYXNoLXRhYmxlLW1lcmdlISAgdGVzdC1o YXNoLXRhYmxlMg0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg ICAgIHRlc3QtaGFzaC10YWJsZTIpKQ0KICAgICAgICAgICAgICAgJygoImEi IC4gMSkNCiAgICAgICAgICAgICAgICAgKCJiIiAuIDIpDQogICAgICAgICAg ICAgICAgICgiYyIgLiAzKQ0KICAgICAgICAgICAgICAgICAoImQiIC4gNCkp KSkpKSkNCg0KKHRlc3QvdGV4dC11aSB0ZXN0LXN1aXRlKQ0KICAgICAg --0-1054553307-1132009008=:44567-- ------------------------------------------------------- SF.Net email is sponsored by: Tame your development challenges with Apache's Geronimo App Server. Download it for free - -and be entered to win a 42" plasma tv or your very own Sony(tm)PSP. Click here to play: http://sourceforge.net/geronimo.php