Ron:
On thing I forgot to mention is that line numbers reported during an
error or simply by dumping them to trace.log or the debug window
are of. A simple sample doesn't show the problem, unfortunately.
How many lines it's of seems to vary. In one place I have hb_outdebug()
calls with procline() it's 16 lines short, but in other places it's even
bigger.
I have this on lines 615-616 in our main() function:
tracedbg( "ending HYPER_FONT " + HYPER_FONT:cFaceName + " "+
alltrim(str(HYPER_FONT:nInpHeight)) ;
+ " "+ alltrim(str(len(HYPER_FONT:afonts))))
and the line no. reported in the debug wnd is:
[7288] MAIN
[7288] [ MAIN ] ( 600)
[7288] >>>ending HYPER_FONT Ms Sans Serif -10 2<<<
//****
#include "common.ch"
function main()
local cStr
cStr := "who's line is it anyway?"
? procline(), cStr
somefunc()
? procline(), "last call."
return nil
static function somefunc()
local cStr
cStr := "who know!"
? procline(), cStr
return nil
//****
--
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
