Sounds interesting Wolfgang!
Even if never fixed, any chance you could share what you found as the cause?
M.
On 22/02/2017 22:30, Wolf wrote:
Hi all,
I've found the source of the error and this seems to be a genuine bug.
However, I'm not sure that the effort required to correct this whilst
making sure that nothing else will be broken at the same time, will be
worthwhile. So perhaps it's best to go with Martyn Hill's suggestion :
don't use LRESPR in a procedure/function..
On 20/02/2017 14:40, Martyn Hill wrote:
Ciao Giorgio
Some time ago, I observed and reported here a similar sounding issue
whereby LRESPR would fail from within an SBasic PROCedure. Not all of
them, but some.
Sorry I seem to have missed that
Wolfgang
I resorted to loading the very same extensions outside of a procedure,
without issue.
Regards,
Martyn Hill.
On 19/02/2017 22:42, Giorgio Garabello wrote:
HI, on QPC2 I wrote a small test program, in which load the names of
several extensions in a table and then load (LRESPR) scanning the
table.
Code: Select all
100 WTV
110 LAUNCH
120 DEFine PROCedure LAUNCH
130 DIM TAB_EXT$(3,50)
140 TAB_EXT$(0) = "WIN1_CLAVIER_bin"
150 TAB_EXT$(1) = "WIN1_DBAS_sys"
160 TAB_EXT$(2) = "WIN1_ENV_bin"
170 TAB_EXT$(3) = "WIN1_FILEINFO2_bin"
180 :
190 FOR I = 0 TO 3
200 LRESPR TAB_EXT$(I)
210 END FOR I
220 :
230 END DEFine LAUNCH
If I try to load an extension in the usual way (LRESPR filename) and
then
load the other using the table QPC2 crash
Code: Select all
100 WTV
105 LRESPR WIN1_DBAS_sys
110 LAUNCH
120 DEFine PROCedure LAUNCH
130 DIM TAB_EXT$(2,50)
140 TAB_EXT$(0) = "WIN1_CLAVIER_bin"
150 TAB_EXT$(1) = "WIN1_DBAS_sys"
170 TAB_EXT$(2) = "WIN1_FILEINFO2_bin"
180 :
190 FOR I = 0 TO 2
200 LRESPR TAB_EXT$(I)
210 END FOR I
220 :
230 END DEFine LAUNCH
This happens with any extension.
Any idea to solve the problem?
Giorgio
p.s.
On SMSQmulator:
the first example work correctly as on QPC2
the second example reset SMSQMulator.
_______________________________________________
QL-Users Mailing List
_______________________________________________
QL-Users Mailing List
--
"There are 10 types of people in this world. Those who understand binary and those
who don't."
_______________________________________________
QL-Users Mailing List