(SOLVE) different harbour 3.2 r150129225 with r1506171039

[kok joek hoa]

Dear Antonio,

using Harbour 3.2 r150129225 + bcc7 + fivewin 15.07 below sample run ok, but if we use harbour 3.2 r1506171039 , the program will error.

Code: Select all | Expand

#include 'fivewin.ch'

static adata :={1,2,3}

function main()
     msginfo(adata[1])
return nil
 

Regards,

Kok

[Antonio Linares]

Kok,

What error do you get ?

[kok joek hoa]

Dear Antonio,

With r150129225 the result is 1,

With r1506171039 , variabel does not exit.

Regards,

Kok

[cnavarro]

Dear Antonio,

With r150129225 the result is 1,

With r1506171039 , variabel does not exit.

Regards,

Kok

I tried your code
It works perfectly

[kok joek hoa]

Dear cnavarro,

not compile error but runtime error,

regards,

Kok

[cnavarro]

Dear cnavarro,

not compile error but runtime error,

regards,

Kok

Kok
The image appears in your program runs correctly

Maybe, if you are changing version of harbour, make sure your tools of compilation and linking are properly configured and are not mixing both versions.

[cnavarro]

That version of FWH and Borland is using?

[kok joek hoa]

Dear cnavarro,,

Thank you for your help, yes, I don't mix them,

this my rmk file.

Code: Select all | Expand

#Borland make sample, (c) FiveTech Software 2005


HBDIR=D:\HB1506
BCDIR=f:\bcc70
FWDIR=f:\com1507\fwh

PELL =D:\pellesc

#change these paths as needed
.path.PRG = .\
.path.OBJ = .\obj
.path.CH  = $(FWDIR)\include;$(HBDIR)\include
.path.C   = .\
.path.RC  = .\
.path.H   = $(BCDIR)\include 

#important: Use Uppercase for filenames extensions, in the next two rules!

PRG =           \
test.PRG        \


C =             \


PROJECT    : test.exe

test.exe  : $(PRG:.PRG=.OBJ) $(C:.C=.OBJ) 
   echo off
   echo $(BCDIR)\bin\c0w32.obj + > b32.bc
   echo     obj\test.obj              \
              ,+ >> b32.bc
    echo test.exe, + >> b32.bc
    echo test.map, + >> b32.bc
    echo $(FWDIR)\lib\FiveH.lib $(FWDIR)\lib\FiveHC.lib $(FWDIR)\lib\libmysql.lib $(FWDIR)\lib\libmysqld.lib $(FWDIR)\lib\dolphin.lib + >> b32.bc
    echo $(FWDIR)\lib\barlib32.lib   + >>b32.bc
    echo $(HBDIR)\LIB\hbwin.lib + >> b32.bc
    echo $(HBDIR)\LIB\gtwin.lib + >> b32.bc
    echo $(HBDIR)\LIB\gtgui.lib + >> b32.bc
    echo $(HBDIR)\LIB\hbrtl.lib + >> b32.bc
    echo $(HBDIR)\LIB\hbvm.lib + >> b32.bc
    echo $(HBDIR)\LIB\hblang.lib + >> b32.bc
    echo $(HBDIR)\LIB\hbmacro.lib + >> b32.bc
    echo $(HBDIR)\LIB\hbrdd.lib + >> b32.bc
    echo $(HBDIR)\LIB\rddntx.lib + >> b32.bc
    echo $(HBDIR)\LIB\rddcdx.lib + >> b32.bc
    echo $(HBDIR)\LIB\rddfpt.lib + >> b32.bc
    echo $(HBDIR)\LIB\hbsix.lib + >> b32.bc
    echo $(HBDIR)\LIB\hbdebug.lib + >> b32.bc
    echo $(HBDIR)\LIB\hbcommon.lib + >> b32.bc
    echo $(HBDIR)\LIB\hbpp.lib + >> b32.bc
    echo $(HBDIR)\LIB\hbcpage.lib + >> b32.bc
    echo $(HBDIR)\LIB\hbcplr.lib + >> b32.bc
    echo $(HBDIR)\LIB\hbct.lib + >> b32.bc
    echo $(HBDIR)\LIB\hbpcre.lib + >> b32.bc
    echo $(HBDIR)\LIB\xhb.lib + >> b32.bc
    echo $(HBDIR)\LIB\hbziparc.lib + >> b32.bc
    echo $(HBDIR)\LIB\hbmzip.lib + >> b32.bc
    echo $(HBDIR)\LIB\hbzlib.lib + >> b32.bc
    echo $(HBDIR)\LIB\minizip.lib + >> b32.bc
    echo $(HBDIR)\LIB\png.lib + >> b32.bc
    echo $(HBDIR)\LIB\hbcurl.lib + >> b32.bc
    echo $(HBDIR)\LIB\hbusrrdd.lib + >> b32.bc
    echo $(FWDIR)\lib\libcurl.lib + >> b32.bc

    rem Uncomment these two lines to use Advantage RDD
    echo $(HBDIR)\LIB\rddads.lib + >> b32.bc
    echo $(HBDIR)\LIB\Ace32.lib + >> b32.bc

    rem echo $(FWDIR)\lib\dolphin.lib + >> b32.bc
    rem echo $(FWDIR)\lib\libmysql.lib + >> b32.bc
 
    echo $(BCDIR)\lib\cw32.lib + >> b32.bc
    echo $(BCDIR)\lib\uuid.lib + >> b32.bc
    echo $(BCDIR)\lib\import32.lib + >> b32.bc
    echo $(BCDIR)\lib\ws2_32.lib + >> b32.bc
    echo $(BCDIR)\lib\psdk\odbc32.lib + >> b32.bc
    echo $(BCDIR)\lib\psdk\nddeapi.lib + >> b32.bc
    echo $(BCDIR)\lib\psdk\iphlpapi.lib + >> b32.bc
    echo $(BCDIR)\lib\psdk\msimg32.lib + >> b32.bc
    echo $(BCDIR)\lib\psdk\psapi.lib + >> b32.bc
    echo $(BCDIR)\lib\psdk\rasapi32.lib + >> b32.bc
    echo $(BCDIR)\lib\psdk\gdiplus.lib + >> b32.bc
    echo $(BCDIR)\lib\psdk\shell32.lib, >> b32.bc
   
   
   IF EXIST test.res echo test.res >> b32.bc
   $(BCDIR)\bin\ilink32 -Gn -aa -Tpe -s @b32.bc
   
   

.PRG.OBJ:
  $(HBDIR)\bin\harbour $< /N/Oobj\ /I$(FWDIR)\include;$(HBDIR)\include 
  $(BCDIR)\bin\bcc32 -c -tWM -I$(HBDIR)\include -oobj\$& obj\$&.c

.C.OBJ:
  echo -c -tWM -D__HARBOUR__ -DHB_API_MACROS > tmp
  echo -I$(HBDIR)\include;$(FWDIR)\include;$(BCDIR)\include >> tmp
  $(BCDIR)\bin\bcc32 -oobj\$& @tmp $&.c
  del tmp


test.res : test.rc
#  $(BCDIR)\bin\brc32.exe -r test.rc
  $(PELL)\bin\PORC.exe  test.rc /I $(PELL)\include /I $(PELL)\include\win

 

regards,

Kok

[cnavarro]

Use the buildh.bat the samples folder of your FWH
That result has?

[kok joek hoa]

Dear cnavorra,

yes, if we use the buildh.bat from samples, everything run ok.

It's strange.

regards,

Kok

[cnavarro]

Before testing your make, be sure to clean the folder

.path.OBJ = .\obj

[kok joek hoa]

Dear cnavorra,
Thank you,
yes I always to clear obj before start compile.

Regards,

Kok

[kok joek hoa]

Solve,

Just change this line :

$(HBDIR)\bin\harbour $< /N /Oobj\ /I$(FWDIR)\include;$(HBDIR)\include

to

$(HBDIR)\bin\harbour $< /n /Oobj\ /I$(FWDIR)\include;$(HBDIR)\include

Regards,

Kok

[cnavarro]

Great