Re: XPL Program Glitch

[Robert Holmgren holmgren@xxxxxxxx]

** Reply to message from Nathan Sivin  on Mon,
16 Apr 2001 11:42:17 -0400

Nathan:

I see two things wrong with your program: 1) You need a func DZ
(finalize open DeFined block) before you poll , and 2) if
you want to position _within_ an empty  block, you need a
different procedure, because this procedure doesn't do it (unless
you start out in eXPanded mode): it places your cursor to the
_left_ of the  commands that your program inserts
(only because you insist on restoring your original, non-eXPanded
display mode). You need to insert a space between the 
 commands and position your cursor on that space before
restoring non-XP -- not exactly elegant, and requires that you
delete the space at some point downstream; or else don't restore
pre-existing non-XP -- also less than elegant. As for always
going into WZ (graphical) display mode -- I can't reproduce that
here, the pre-existing mode is restored correctly (assuming I
limit myself to a choice of VA$DT==1, 2, or 4; but if VA$DT==9 or
12, for example, the display mode ante quo is not restored). The
only potential cause I can imagine is func DX, which is often
responsible for programming aberrations on my installations (for
example, when switching windows). At minimum, I would read the
values of VA$DF and VA$DT _before_ issuing func DX. Or try
removing DX entirely, and see whether it still toggles into WZ.
It's hard to see why it would go to WZ unless the pre-existing
VA$DT==4 ...

******************
Robert Holmgren
holmgren@xxxxxxxx
******************