[BLACKBOX] DevAnalyser crashes

From: [at]} <Robert>
Date: Fri, 23 Mar 2012 21:59:58 +0000

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

Folks

The following module crashes DevAnalyzer.

If I comment out either line ss := s * s, it does not.


Maybe someone can spot the bug?


Regards

Robert



PacCoder.Decode /.3s3aUt6QW0T4yU6DY3bX9H41e1O181Q1cFn6L2IzYN0Ug:NxsU.d0.pG3k
jPqNEkoB7HEtE.VKzgVrR.sIzkGb/yHkyVSxjXImU4/gc3kXzk/Y/qy.wXVY/Zy0gY5PXWm7g6QU
P26RljysJCO28Z00162ILZga66D7.0SwY3wU/FctUGdh0qivKzOh/IjES22B2IHHBcUtcpY49O6B
YHru.24J7qcFNc:41GFu0Mt0/Nc:EY66B.l5t1YyUkx/eo.DZCU5yfEMZOzX:Twk.kI6H3/KUY5L
6Q2g.Osg6GH/46H/2bW0oLSVPr6SypTEF//7p88EHsYaUGj/G2zidFFy6HqLI1FzxEq2T3t5Ts/u
cqmuUdHs2fwbzYZlycUPITIUCeD3plIyuV9f26uUQYmZbLpFKwxINlGVp9n5zWg/He2x9iH6ze4N
Jp/e5je3LJ12iWRoZFidEy4uyrMZGNpdp5P4ijxk3XqGMhmd:07Gbz/bwNlsK0GubY3O74r//D4Y
Qg31oXeigsp7fUfdUUijSd8oFUWf/2mGXDIxvWZn9kYSotnK05RMQe66gkFEwQD7G:SsSLs5L5K0
5jkn3P/2aDqcEFGmrFCcN5d0nJvrkwq2WQHjo0tL8sbJVMIFg91f:w90bEF9mCk5xNn0l0flGqWB
sK3bRvlMfciQgfvgCYULe3MLPquxCB.H0bC6euPR6XkapC6CtXa/pXbH35C5HxQXbbeqXjBhWwWU
NUXSqV:9C4wvXb6NHyoF4dfZHKLywTm6JsHkQLo0HWfyg0Qal5qIq2b1p2s9tb87wvntMHWaYtNy
yamtRHCReUwboZKkLyQG1jaXRHmpfsbBJVbC6IJ6Q0NmwsENydnOeukaQC7fR2PvigFfigIyjZro
tkFsvCLxGRjoDirE6uL4LQF7snaCxpJPtnECueDTeQt0N8:IGJnDZ:jhXXGzQvREEcxp9F4FoFUc
oEbrSHY:XNzUOPXyj00tyNlfy1c1tf7svyWKJkKJ4BoWPl7u17uy0LEgxHQx9Mtu0qOJbQLsx9nq
4zWhQx0Ipoi3P1wJoQH/WLk9oEhgpFSjlSUcL34GmHFNYelq:Z:LkmTzzs.
AtEndOfEncoding


MODULE EulerSandpit;

TYPE
   Terminal = POINTER TO RECORD END;

PROCEDURE (t : Terminal) Exit () : BOOLEAN, NEW;
   VAR
     s, ss : INTEGER;
   BEGIN

     ss := s * s;

     FOR s := 1 TO 1 DO

       ss := s * s

     END;

     RETURN TRUE
   END Exit;

END EulerSandpit.

     DevDebug.Unload

    EulerSandpit.Play

----
To unsubscribe, send a message with body "SIGNOFF BLACKBOX" to LISTSERV{([at]})nowhere.xy----boundary-LibPST-iamunique-261856647_-_-
Content-type: application/rtf
Content-transfer-encoding: base64
Content-Disposition: attachment; filename="rtf-body.rtf"
e1xydGYxXGFuc2lcYW5zaWNwZzEyNTJcZnJvbXRleHQgXGRlZmYwe1xmb250dGJsDQp7XGYwXGZz
d2lzcyBBcmlhbDt9DQp7XGYxXGZtb2Rlcm4gQ291cmllciBOZXc7fQ0Ke1xmMlxmbmlsXGZjaGFy
c2V0MiBTeW1ib2w7fQ0Ke1xmM1xmbW9kZXJuXGZjaGFyc2V0MCBDb3VyaWVyIE5ldzt9fQ0Ke1xj
b2xvcnRibFxyZWQwXGdyZWVuMFxibHVlMDtccmVkMFxncmVlbjBcYmx1ZTI1NTt9DQpcdWMxXHBh
cmRccGxhaW5cZGVmdGFiMzYwIFxmMFxmczIwIEZvbGtzXHBhcg0KXHBhcg0KVGhlIGZvbGxvd2lu
ZyBtb2R1bGUgY3Jhc2hlcyBEZXZBbmFseXplci5ccGFyDQpccGFyDQpJZiBJIGNvbW1lbnQgb3V0
IGVpdGhlciBsaW5lIHNzICA6PSAgcyAqIHMsIGl0IGRvZXMgbm90LlxwYXINClxwYXINClxwYXIN
Ck1heWJlIHNvbWVvbmUgY2FuIHNwb3QgdGhlIGJ1Zz9ccGFyDQpccGFyDQpccGFyDQpSZWdhcmRz
XHBhcg0KXHBhcg0KUm9iZXJ0XHBhcg0KXHBhcg0KXHBhcg0KXHBhcg0KUGFjQ29kZXIuRGVjb2Rl
IC8uM3MzYVV0NlFXMFQ0eVU2RFkzYlg5SDQxZTFPMTgxUTFjRm42TDJJellOMFVnOk54c1UuZDAu
cEcza1xwYXINCmpQcU5Fa29CN0hFdEUuVkt6Z1ZyUi5zSXprR2IveUhreVZTeGpYSW1VNC9nYzNr
WHprL1kvcXkud1hWWS9aeTBnWTVQWFdtN2c2UVVccGFyDQpQMjZSbGp5c0pDTzI4WjAwMTYySUxa
Z2E2NkQ3LjBTd1kzd1UvRmN0VUdkaDBxaXZLek9oL0lqRVMyMkIySUhIQmNVdGNwWTQ5TzZCXHBh
cg0KWUhydS4yNEo3cWNGTmM6NDFHRnUwTXQwL05jOkVZNjZCLmw1dDFZeVVreC9lby5EWkNVNXlm
RU1aT3pYOlR3ay5rSTZIMy9LVVk1TFxwYXINCjZRMmcuT3NnNkdILzQ2SC8yYlcwb0xTVlByNlN5
cFRFRi8vN3A4OEVIc1lhVUdqL0cyemlkRkZ5NkhxTEkxRnp4RXEyVDN0NVRzL3VccGFyDQpjcW11
VWRIczJmd2J6WVpseWNVUElUSVVDZUQzcGxJeXVWOWYyNnVVUVltWmJMcEZLd3hJTmxHVnA5bjV6
V2cvSGUyeDlpSDZ6ZTROXHBhcg0KSnAvZTVqZTNMSjEyaVdSb1pGaWRFeTR1eXJNWkdOcGRwNVA0
aWp4azNYcUdNaG1kOjA3R2J6L2J3TmxzSzBHdWJZM083NHIvL0Q0WVxwYXINClFnMzFvWGVpZ3Nw
N2ZVZmRVVWlqU2Q4b0ZVV2YvMm1HWERJeHZXWm45a1lTb3RuSzA1Uk1RZTY2Z2tGRXdRRDdHOlNz
U0xzNUw1SzBccGFyDQo1amtuM1AvMmFEcWNFRkdtckZDY041ZDBuSnZya3dxMldRSGpvMHRMOHNi
SlZNSUZnOTFmOnc5MGJFRjltQ2s1eE5uMGwwZmxHcVdCXHBhcg0Kc0szYlJ2bE1mY2lRZ2Z2Z0NZ
VUxlM01MUHF1eENCLkgwYkM2ZXVQUjZYa2FwQzZDdFhhL3BYYkgzNUM1SHhRWGJiZXFYakJoV3dX
VVxwYXINCk5VWFNxVjo5QzR3dlhiNk5IeW9GNGRmWkhLTHl3VG02SnNIa1FMbzBIV2Z5ZzBRYWw1
cUlxMmIxcDJzOXRiODd3dm50TUhXYVl0TnlccGFyDQp5YW10UkhDUmVVd2JvWktrTHlRRzFqYVhS
SG1wZnNiQkpWYkM2SUo2UTBObXdzRU55ZG5PZXVrYVFDN2ZSMlB2aWdGZmlnSXlqWnJvXHBhcg0K
dGtGc3ZDTHhHUmpvRGlyRTZ1TDRMUUY3c25hQ3hwSlB0bkVDdWVEVGVRdDBOODpJR0puRFo6amhY
WEd6UXZSRUVjeHA5RjRGb0ZVY1xwYXINCm9FYnJTSFk6WE56VU9QWHlqMDB0eU5sZnkxYzF0Zjdz
dnlXS0prS0o0Qm9XUGw3dTE3dXkwTEVneEhReDlNdHUwcU9KYlFMc3g5bnFccGFyDQo0eldoUXgw
SXBvaTNQMXdKb1FIL1dMazlvRWhncEZTamxTVWNMMzRHbUhGTlllbHE6WjpMa21UenpzLlxwYXIN
CkF0RW5kT2ZFbmNvZGluZ1xwYXINClxwYXINClxwYXINCk1PRFVMRSAgRXVsZXJTYW5kcGl0O1xw
YXINClxwYXINClRZUEVccGFyDQogICBUZXJtaW5hbCAgPSAgUE9JTlRFUiAgVE8gIFJFQ09SRCAg
RU5EO1xwYXINClxwYXINClBST0NFRFVSRSAodCA6IFRlcm1pbmFsKSBFeGl0ICgpIDogQk9PTEVB
TiwgTkVXO1xwYXINCiAgIFZBUlxwYXINCiAgICAgcywgc3MgIDogIElOVEVHRVI7XHBhcg0KICAg
QkVHSU5ccGFyDQpccGFyDQogICAgIHNzICA6PSAgcyAqIHM7XHBhcg0KXHBhcg0KICAgICBGT1Ig
IHMgIDo9ICAxICBUTyAgMSAgRE9ccGFyDQpccGFyDQogICAgICAgc3MgIDo9ICBzICogc1xwYXIN
ClxwYXINCiAgICAgRU5EO1xwYXINClxwYXINCiAgICAgUkVUVVJOICBUUlVFXHBhcg0KICAgRU5E
ICBFeGl0O1xwYXINClxwYXINCkVORCAgRXVsZXJTYW5kcGl0LlxwYXINClxwYXINCiAgICAgRGV2
RGVidWcuVW5sb2FkXHBhcg0KXHBhcg0KICAgIEV1bGVyU2FuZHBpdC5QbGF5XHBhcg0KXHBhcg0K
XHBhcg0KLS0tLVxwYXINClRvIHVuc3Vic2NyaWJlLCBzZW5kIGEgbWVzc2FnZSB3aXRoIGJvZHkg
IlNJR05PRkYgQkxBQ0tCT1giIHRvIExJU1RTRVJWQExJU1RTLk9CRVJPTi5DSH19ABAgNy4=
----boundary-LibPST-iamunique-261856647_-_---

Received on Fri Mar 23 2012 - 22:59:58 UTC