strcat.mlton

[Stephen Weeks]

--0ebJCb+6Rp
Content-Type: text/plain; charset=us-ascii
Content-Description: message body text
Content-Transfer-Encoding: 7bit


Here is a new version of strcat.mlton.  It is more like strcat.gcc and
strcat.ocaml in that it uses a mutable buffer onto which strings are added.



--0ebJCb+6Rp
Content-Type: application/octet-stream
Content-Disposition: attachment;
	filename="z.sml"
Content-Transfer-Encoding: base64

ZnVuIGZvciAoc3RhcnQsIHN0b3AsIGYpID0KICAgbGV0CiAgICAgIGZ1biBsb29wIGkgPQoJIGlm
IGkgPiBzdG9wCgkgICAgdGhlbiAoKQoJIGVsc2UgKGYgaTsgbG9vcCAoaSArIDEpKQogICBpbgog
ICAgICBsb29wIHN0YXJ0CiAgIGVuZAoKZnVuIGF0b2kgcyA9IGNhc2UgSW50LmZyb21TdHJpbmcg
cyBvZiBTT01FIG51bSA9PiBudW0gfCBOT05FID0+IDAKZnVuIHByaW50bCBbXSA9IHByaW50ICJc
biIgfCBwcmludGwoaDo6dCkgPSAoIHByaW50IGggOyBwcmludGwgdCApCgp2YWwgc3R1ZmYgPSAi
aGVsbG9cbiIKCnN0cnVjdHVyZSBCdWZmZXI6CiAgIHNpZwogICAgICB0eXBlICdhIHQKCiAgICAg
IHZhbCBhZGQ6ICdhIHQgKiAnYSBhcnJheSAtPiB1bml0CiAgICAgIHZhbCBsZW5ndGg6ICdhIHQg
LT4gaW50CiAgICAgIHZhbCBuZXc6ICdhIC0+ICdhIHQKICAgZW5kID0KICAgc3RydWN0CiAgICAg
IGRhdGF0eXBlICdhIHQgPSBUIG9mIHtkdW1teTogJ2EsCgkJCSAgICBsZW5ndGg6IGludCByZWYs
CgkJCSAgICBlbHRzOiAnYSBhcnJheSByZWZ9CgogICAgICBmdW4gYWRkIChUIHtkdW1teSwgZWx0
cywgbGVuZ3RofSwgYSkgPQoJIGxldAoJICAgIHZhbCBsID0gIWxlbmd0aAoJICAgIHZhbCBlID0g
IWVsdHMKCSAgICB2YWwgZW4gPSBBcnJheS5sZW5ndGggZQoJICAgIHZhbCBhbiA9IEFycmF5Lmxl
bmd0aCBhCgkgICAgdmFsIGUgPQoJICAgICAgIGlmIGwgKyBhbiA+PSBlbgoJCSAgdGhlbgoJCSAg
ICAgbGV0CgkJCXZhbCBlID0gQXJyYXkudGFidWxhdGUgKDIgKiBlbiwgZm4gaSA9PgoJCQkJCQlp
ZiBpIDwgbAoJCQkJCQkgICB0aGVuIEFycmF5LnN1YiAoZSwgaSkKCQkJCQkJZWxzZSBkdW1teSkK
CQkJdmFsIF8gPSBlbHRzIDo9IGUKCQkgICAgIGluIGUKCQkgICAgIGVuZAoJICAgICAgIGVsc2Ug
ZQoJICAgIHZhbCBfID0KCSAgICAgICBBcnJheS5jb3B5IHtzcmMgPSBhLCBzaSA9IDAsIGxlbiA9
IE5PTkUsCgkJCSAgIGRzdCA9IGUsIGRpID0gbH0KCSAgICB2YWwgXyA9IGxlbmd0aCA6PSBsICsg
YW4KCSBpbiAoKQoJIGVuZAoKICAgICAgZnVuIG5ldyAoZHVtbXk6ICdhKSA9IFQge2R1bW15ID0g
ZHVtbXksCgkJCSAgICAgICBsZW5ndGggPSByZWYgMCwKCQkJICAgICAgIGVsdHMgPSByZWYgKEFy
cmF5LmFycmF5ICgzMiwgZHVtbXkpKX0KCiAgICAgIGZ1biBsZW5ndGggKFQge2xlbmd0aCwgLi4u
fSkgPSAhbGVuZ3RoCiAgIGVuZAoKZnVuIG1haW4gKG5hbWUsIGFyZ3MpID0KICAgbGV0CiAgICAg
IHZhbCBzdHVmZiA9CgkgQXJyYXkudGFidWxhdGUgKFN0cmluZy5zaXplIHN0dWZmLCBmbiBpID0+
IFN0cmluZy5zdWIgKHN0dWZmLCBpKSkKICAgICAgdmFsIG4gPSBhdG9pIChoZCAoYXJncyBAIFsi
MSJdKSkKICAgICAgdmFsIGIgPSBCdWZmZXIubmV3ICMiXDAwMCIKICAgICAgdmFsIF8gPSBmb3Ig
KDEsIG4sIGZuIF8gPT4gQnVmZmVyLmFkZCAoYiwgc3R1ZmYpKQogICAgICB2YWwgXyA9IHByaW50
bCBbSW50LnRvU3RyaW5nIChCdWZmZXIubGVuZ3RoIGIpXQogICBpbgogICAgICAoKQogICBlbmQK
CnZhbCBfID0gbWFpbiggQ29tbWFuZExpbmUubmFtZSgpLCBDb21tYW5kTGluZS5hcmd1bWVudHMo
KSApCg==

--0ebJCb+6Rp--