- GOTOs was: - Pascal to Component Pascaltranslator

From: Bernhard Treutwein <"Bernhard>
Date: Wed, 26 Oct 2005 19:44:44 +0200

----boundary-LibPST-iamunique-1471641423_-_-
Content-type: text/plain

I agree that removing GOTOs needs some human brain, if the
code should be more readable than before.

Some of them can be replaced by RETURNs and encapsulating
that part in a local procedure. Others can be replaced by
LOOP
    EXIT
END

I am not shure, but some time ago I had the idea of a very
clumsy semi-automatic solution with having a local variable
label, which gets assigned a value at the goto and a CASE
statement in a loop with the corresponding labels.

    LOOP
        CASE label OF
        END
    END

regards
     Bernhard

--- BlackBox
--- send subject HELP or UNSUBSCRIBE to blackbox{([at]})nowhere.xy



----boundary-LibPST-iamunique-1471641423_-_-
Content-type: application/rtf
Content-transfer-encoding: base64
Content-Disposition: attachment; filename="rtf-body.rtf"

e1xydGYxXGFuc2lcYW5zaWNwZzEyNTJcZnJvbXRleHQgXGRlZmYwe1xmb250dGJsDQp7XGYwXGZz
d2lzcyBBcmlhbDt9DQp7XGYxXGZtb2Rlcm4gQ291cmllciBOZXc7fQ0Ke1xmMlxmbmlsXGZjaGFy
c2V0MiBTeW1ib2w7fQ0Ke1xmM1xmbW9kZXJuXGZjaGFyc2V0MCBDb3VyaWVyIE5ldzt9fQ0Ke1xj
b2xvcnRibFxyZWQwXGdyZWVuMFxibHVlMDtccmVkMFxncmVlbjBcYmx1ZTI1NTt9DQpcdWMxXHBh
cmRccGxhaW5cZGVmdGFiMzYwIFxmMFxmczIwIEkgYWdyZWUgdGhhdCByZW1vdmluZyBHT1RPcyBu
ZWVkcyBzb21lIGh1bWFuIGJyYWluLCBpZiB0aGVccGFyDQpjb2RlIHNob3VsZCBiZSBtb3JlIHJl
YWRhYmxlIHRoYW4gYmVmb3JlLiBccGFyDQpccGFyDQpTb21lIG9mIHRoZW0gY2FuIGJlIHJlcGxh
Y2VkIGJ5IFJFVFVSTnMgYW5kIGVuY2Fwc3VsYXRpbmdccGFyDQp0aGF0IHBhcnQgaW4gYSBsb2Nh
bCBwcm9jZWR1cmUuIE90aGVycyBjYW4gYmUgcmVwbGFjZWQgYnlccGFyDQpMT09QXHBhcg0KICAg
IEVYSVRccGFyDQpFTkRccGFyDQpccGFyDQpJIGFtIG5vdCBzaHVyZSwgYnV0IHNvbWUgdGltZSBh
Z28gSSBoYWQgdGhlIGlkZWEgb2YgYSB2ZXJ5IFxwYXINCmNsdW1zeSBzZW1pLWF1dG9tYXRpYyBz
b2x1dGlvbiB3aXRoIGhhdmluZyBhIGxvY2FsIHZhcmlhYmxlXHBhcg0KbGFiZWwsIHdoaWNoIGdl
dHMgYXNzaWduZWQgYSB2YWx1ZSBhdCB0aGUgZ290byBhbmQgYSBDQVNFXHBhcg0Kc3RhdGVtZW50
IGluIGEgbG9vcCB3aXRoIHRoZSBjb3JyZXNwb25kaW5nIGxhYmVscy5ccGFyDQpccGFyDQogICAg
TE9PUFxwYXINCiAgICAgICAgQ0FTRSBsYWJlbCBPRlxwYXINCiAgICAgICAgRU5EXHBhcg0KICAg
IEVORFxwYXINClxwYXINCnJlZ2FyZHNccGFyDQogICAgIEJlcm5oYXJkXHBhcg0KXHBhcg0KLS0t
IEJsYWNrQm94XHBhcg0KLS0tIHNlbmQgc3ViamVjdCBIRUxQIG9yIFVOU1VCU0NSSUJFIHRvIGJs
YWNrYm94QG9iZXJvbi5jaH19ABYAAAAAAAAAIQA=


----boundary-LibPST-iamunique-1471641423_-_---
Received on Wed Oct 26 2005 - 19:44:44 UTC