LOGO-L> Stopping an Infinite Loop in MSWLogo

[Yehuda <yehuka@beitberl.ac.il>]

Hi George,

The following program gives me some trouble. After being run, it can "sometimes" be stopped with HALT button, but most of the times nothing appears to stop it, even not THROW "TOPLEVEL [Execute]. The only thing that works seems to be ERALL [Execute], but at the price of loosing the code, or even Logo bombing.

I think it's sort of a bug.

Regards...

[[Yehuda]]

======================
to main   ; #GingerMan
cs ht setbg 0
pu draw -0.09 -.6
end

to draw :x :y
setxy 18*:x-45 18*:y-45
setpixel 4
draw 1-:y+abs :x :x
end
=======================