SRFI-71 - Extended LET-syntax for multiple values

------=_Part_74199_9663325.1170131194150
Content-Type: text/plain; charset=ISO-8859-1; format=flowed
Content-Transfer-Encoding: 7bit
Content-Disposition: inline

Hello,

After noticing that SISC lacks SRFI-71, I tried the reference
implementation. It passes the unit tests, but I am having a hard time
substituting the built-in let/let*/letrec, and I have run out of
module tricks.

I am using an inner module to encapsulate the reference
implementation, and an import* directive to rename the
srfi-[let|let*|letrec] macros to my-[let|let*|letrec] in the outer
module, which in turns exports the renamed macros.

I think I may be missing something obvious, so I am attaching the file
here for comments. I assume you'd be interested in including SRFI-71
in SISC?
___
Alessandro

------=_Part_74199_9663325.1170131194150
Content-Type: text/x-scheme; name=srfi-71.scm; charset=ANSI_X3.4-1968
Content-Transfer-Encoding: base64
X-Attachment-Id: f_exjtubmj
Content-Disposition: attachment; filename="srfi-71.scm"

KG1vZHVsZSBzcmZpLTcxCiAgKChteS1sZXQgc3JmaS1sZXQgc3JmaS1sZXQqIHNyZmktbGV0cmVj
IGk6bGV0IGk6bmFtZWQtbGV0IGk6dW5kZWZpbmVkIHI1cnMtbGV0IHI1cnMtbGV0KiByNXJzLWxl
dHJlYykKICAgKG15LWxldCogc3JmaS1sZXQgc3JmaS1sZXQqIHNyZmktbGV0cmVjIGk6bGV0IGk6
bmFtZWQtbGV0IGk6dW5kZWZpbmVkIHI1cnMtbGV0IHI1cnMtbGV0KiByNXJzLWxldHJlYykKICAg
KG15LWxldHJlYyBzcmZpLWxldCBzcmZpLWxldCogc3JmaS1sZXRyZWMgaTpsZXQgaTpuYW1lZC1s
ZXQgaTp1bmRlZmluZWQgcjVycy1sZXQgcjVycy1sZXQqIHI1cnMtbGV0cmVjKQogICB1bmNvbnMg
dW5saXN0IHVudmVjdG9yIHZhbHVlcy0+bGlzdCB2YWx1ZXMtPnZlY3RvcikKCiAgKG1vZHVsZSBz
cmZpLTcxLWludGVybmFsCiAgICAoc3JmaS1sZXQgc3JmaS1sZXQqIHNyZmktbGV0cmVjCiAgICAg
dW5jb25zIHVubGlzdCB1bnZlY3RvciB2YWx1ZXMtPmxpc3QgdmFsdWVzLT52ZWN0b3IKICAgICBp
OmxldCBpOm5hbWVkLWxldCBpOnVuZGVmaW5lZCByNXJzLWxldCByNXJzLWxldCogcjVycy1sZXRy
ZWMpCgogICAgKGRlZmluZS1zeW50YXggcjVycy1sZXQKICAgICAgKHN5bnRheC1ydWxlcyAoKQog
ICAgICAgICgocjVycy1sZXQgKCh2IHgpIC4uLikgYm9keTEgYm9keSAuLi4pCiAgICAgICAgIChs
ZXQgKCh2IHgpIC4uLikgYm9keTEgYm9keSAuLi4pKQogICAgICAgICgocjVycy1sZXQgdGFnICgo
diB4KSAuLi4pIGJvZHkxIGJvZHkgLi4uKQogICAgICAgICAobGV0IHRhZyAoKHYgeCkgLi4uKSBi
b2R5MSBib2R5IC4uLikpKSkKCiAgICAoZGVmaW5lLXN5bnRheCByNXJzLWxldCoKICAgICAgKHN5
bnRheC1ydWxlcyAoKQogICAgICAgICgocjVycy1sZXQqICgodiB4KSAuLi4pIGJvZHkxIGJvZHkg
Li4uKQogICAgICAgICAobGV0KiAoKHYgeCkgLi4uKSBib2R5MSBib2R5IC4uLikpKSkKCiAgICAo
ZGVmaW5lLXN5bnRheCByNXJzLWxldHJlYwogICAgICAoc3ludGF4LXJ1bGVzICgpCiAgICAgICAg
KChyNXJzLWxldHJlYyAoKHYgeCkgLi4uKSBib2R5MSBib2R5IC4uLikKICAgICAgICAgKGxldHJl
YyAoKHYgeCkgLi4uKSBib2R5MSBib2R5IC4uLikpKSkKCiAgICAoaW5jbHVkZSAibGV0dmFsdWVz
LnNjbSIpKQoKICAoaW1wb3J0KiBzcmZpLTcxLWludGVybmFsCiAgICAobXktbGV0IHNyZmktbGV0
KSAobXktbGV0KiBzcmZpLWxldCopIChteS1sZXRyZWMgc3JmaS1sZXRyZWMpCiAgICBzcmZpLWxl
dCBzcmZpLWxldCogc3JmaS1sZXRyZWMKICAgIHVuY29ucyB1bmxpc3QgdW52ZWN0b3IgdmFsdWVz
LT5saXN0IHZhbHVlcy0+dmVjdG9yCiAgICBpOmxldCBpOm5hbWVkLWxldCBpOnVuZGVmaW5lZCBy
NXJzLWxldCByNXJzLWxldCogcjVycy1sZXRyZWMpCiAgKQo=
------=_Part_74199_9663325.1170131194150
Content-Type: text/plain; charset="us-ascii"
MIME-Version: 1.0
Content-Transfer-Encoding: 7bit
Content-Disposition: inline

-------------------------------------------------------------------------
Take Surveys. Earn Cash. Influence the Future of IT
Join SourceForge.net's Techsay panel and you'll get the chance to share your
opinions on IT & business topics through brief surveys - and earn cash
http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV
------=_Part_74199_9663325.1170131194150
Content-Type: text/plain; charset="us-ascii"
MIME-Version: 1.0
Content-Transfer-Encoding: 7bit
Content-Disposition: inline

_______________________________________________
SISC-devel mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/sisc-devel

------=_Part_74199_9663325.1170131194150--