Ron:

Found the problem.

Your fix uncovered some lousy old code that was something like this:

#define SomeVar  PublicVars[7]
MEMVAR PublicVars

Function Main()
...

PUBLIC SomeVar
PUBLIC PublicVars


SomeVar := Date()

PublicVars := { .... }  // populate huge array.

...
Return nil

The above gave a new warning about PublicVars declared twice. The ppo 
clarfied this:

Function Main()
...

//PUBLIC PublicVars[7]  // so I removed this declaration which was 
indeed terrible
PUBLIC PublicVars

PublicVars[7]:= Date()   // and here is where an RTE happen because it 
was defining this var in the wrong place!

PublicVars := { .... }  // populate huge array.

...
Return nil



So I just moved that SomeVar initialization below the creation of the 
publicvars var.

This code was so convoluted that only by looking at the .ppo I was able 
to figure out the problem.


So your change brought to the light very ugly coding that was just a 
ticking time bomb!


Regards,

-- 
Luis Krause Mantilla
lkrausem at shaw dot ca
luis_krause at hotmail dot com
"May the Source be with GNU"



-------------------------------------------------------------------------
Check out the new SourceForge.net Marketplace.
It's the best place to buy or sell services for
just about anything Open Source.
http://sourceforge.net/services/buy/index.php
_______________________________________________
xHarbour-developers mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/xharbour-developers

Reply via email to