Page 1 of 1

error.log

Posted: Thu Nov 17, 2005 11:12 am
by MarcoBoschi
Stack Calls
===========
Called from REF_VAR(938)
Called from EDITSCHE(93)
Called from VAL_REL2(380)

is it possibile to add "in module <nameofprgfile> ? " information for each row
?

Re: error.log

Posted: Thu Nov 17, 2005 12:29 pm
by Enrico Maria Giordano
I agree. It would be useful.

EMG

Posted: Sat Nov 19, 2005 8:14 am
by Antonio Linares
Marco, Enrico,

Please modify source\function\errsysw.prg with this code:

Code: Select all

       if ! Empty(ProcName( n ) )
             AAdd( aStack, "   Called from: " + ProcFile( n ) + " => " + Trim( ProcName( n ) ) + ;
                           "(" + NTRIM( ProcLine( n ) ) + ")" )
             cErrorLog += ATail( aStack ) + CRLF
          endif
Notice the use of ProcFile(). Warning: with Harbour it returns an empty string. With xharbour you get the PRG name.

Posted: Sat Nov 19, 2005 11:07 am
by Enrico Maria Giordano
Wonderful! Thank you!

EMG

Posted: Mon Nov 21, 2005 9:35 am
by MarcoBoschi
:D OK ThankYou very much.

Posted: Mon Nov 21, 2005 10:25 am
by Enrico Maria Giordano
Unfortunately it seems not working as expected... :-(

EMG

Posted: Mon Nov 21, 2005 12:49 pm
by Antonio Linares
Enrico,

But that may be something specific to Harbour/xHarbour ProcLine() function.

Posted: Mon Nov 21, 2005 12:53 pm
by Enrico Maria Giordano
Yes, of course.

EMG