Changing the place of "comp.log" file in scripts.

[betoncu]

I am usings execute command to run the scripts as below.
When I run my program a file named comp.log is created in the current directory.
Is it possible to change it. I want it to be created in another directory (for example in my documents folder)
Thanks in advance.

Code: Select all  Expand view

#include "FiveWin.ch"

function Main()
local cPrg, cError, cResult

   cPrg := 'function Test(x,y) ' + CHR(13)+CHR(10)
   cPrg += 'local z '            + CHR(13)+CHR(10)
   cPrg += '   z := x * y - 2 '  + CHR(13)+CHR(10)
   cPrg += 'return z '           + CHR(13)+CHR(10)

   cResult := Execute(cPrg, 10, 5)
   cError  := MemoRead( "comp.log" )
   
   If Empty(cError)
      MsgInfo( cResult )
   else
      MsgInfo( cError )
   endif

return nil

[Antonio Linares]

Birol,

In FWH\source\function\harbour.prg in function Execute() please comment out this line:

// FReOpen_Stderr ( "comp.log", "w" )

and modify this one:

oHrb = HB_CompileFromBuf( cCode, .T., "-n", "-I" + cFWheaders, "-I" + cHBheaders )

these fixes will be included in the next FWH version

[betoncu]

Thanks master. It has gone. Not created in the current directory.
But where is it now? It will not be created? Or it has gone to somewhere else?

[Antonio Linares]

It will not be created

In case that there is an error, a runtime error will be generated