Important question to Antonio about Harbour and WM 6.x

[kadziola]

Hi Antonio,

Is it possible to upgrade the libraries and binaries of Harbour after recent changes made
by Przemek due to problems with file read/write operation in WinCE builds ?

Or

How can i upgrade libraries and binaries ?

Please read this thread :

http://groups.google.com/group/harbour-devel/browse_thread/thread/e583a96630b439ca#

After these changes , the errors, which are many times i wrote DISAPPEARED.
Very good news !!

regards
Jaroslaw Kadziola

[Antonio Linares]

Jaroslaw,

great news!!!

We are going to rebuild FWPPC and Harbour for WinCE asap!

[kadziola]

Antonio,

Very good news !

Regards
Jaroslaw Kadziola

[Antonio Linares]

Jaroslaw,

Please run this code from your FWPPC:

MsgInfo( HB_VERSION() )

and let me know what you get, thanks

[Antonio Linares]

Jaroslaw,

Here you have Harbour fm.c compiled for WinCE:

http://code.google.com/p/harbour-and-xharbour-builds/downloads/detail?name=fm.obj&can=2&q=

Please replace it in hbvm.lib this way:
lib.exe lib\hbvm.lib /OUT:lib\hbvm.lib fm.obj

It has been built this way:
c:\vce\bin\cl.exe -c -Ic:\harbour\include -Ic:\vce\include\arm -DARM -DHB_OS_WIN_CE fm.c

[kadziola]

Antonio,

My hb_version is 2.0.0(Rev13372)

After rebuild hbvm.lib i get :

d:\FWPPC\vce\bin>lib.exe hbvm.lib /OUT:hbvm.lib fm.obj
Microsoft (R) Library Manager Version 6.24.3077
Copyright (C) Microsoft Corporation. All rights reserved.

fm.obj : warning LNK4006: hb_xinit_thread already defined in hbvm.lib(hvmall.obj); second definition ignored
fm.obj : warning LNK4006: hb_xexit_thread already defined in hbvm.lib(hvmall.obj); second definition ignored
fm.obj : warning LNK4006: hb_xclean already defined in hbvm.lib(hvmall.obj); second definition ignored
fm.obj : warning LNK4006: hb_xsetfilename already defined in hbvm.lib(hvmall.obj); second definition ignored
fm.obj : warning LNK4006: hb_xsetinfo already defined in hbvm.lib(hvmall.obj); second definition ignored
fm.obj : warning LNK4006: hb_xalloc already defined in hbvm.lib(hvmall.obj); second definition ignored
fm.obj : warning LNK4006: hb_xgrab already defined in hbvm.lib(hvmall.obj); second definition ignored
fm.obj : warning LNK4006: hb_xrealloc already defined in hbvm.lib(hvmall.obj); second definition ignored
fm.obj : warning LNK4006: hb_xfree already defined in hbvm.lib(hvmall.obj); second definition ignored
fm.obj : warning LNK4006: hb_xRefInc already defined in hbvm.lib(hvmall.obj); second definition ignored
fm.obj : warning LNK4006: hb_xRefDec already defined in hbvm.lib(hvmall.obj); second definition ignored
fm.obj : warning LNK4006: hb_xRefFree already defined in hbvm.lib(hvmall.obj); second definition ignored
fm.obj : warning LNK4006: hb_xRefCount already defined in hbvm.lib(hvmall.obj);second definition ignored
fm.obj : warning LNK4006: hb_xRefResize already defined in hbvm.lib(hvmall.obj); second definition ignored
fm.obj : warning LNK4006: hb_xsize already defined in hbvm.lib(hvmall.obj); second definition ignored
fm.obj : warning LNK4006: hb_xinit already defined in hbvm.lib(hvmall.obj); second definition ignored
fm.obj : warning LNK4006: hb_xexit already defined in hbvm.lib(hvmall.obj); second definition ignored
fm.obj : warning LNK4006: hb_xquery already defined in hbvm.lib(hvmall.obj); second definition ignored

Is this normal ?


Regards

Jaroslaw Kadziola

[kadziola]

Antonio,

With above settings and files still getting the same errors as before.
But if i use pure harbour (last nightly source) everything is OK and my previous tests run successfully.
Do not you think that you should update all the libraries and binaries to harbour version 3.1.0 ?

Regards
Jaroslaw Kadziola

[Antonio Linares]

Jaroslaw,

Yes, we are going to rebuild everything using version 3.1.

It was just to test it in the meantime, but we need to provide you hbvmall.obj instead of fm.obj

[Antonio Linares]

Jaroslaw,

Please download and test this hbvm.lib:

http://code.google.com/p/harbour-and-xharbour-builds/downloads/detail?name=hbvm.lib&can=2&q=

We are in the process of rebuild FWPPC using current Harbour 3.1, but in the meantime please try this lib to see if it solves the files management problem

[kadziola]

Antonio,

Thank you for reply, but after build and run my application i get this error :

Application Internal Error - (null)
Terminated at: 2011.10.28 17:39:07
Unrecoverable error 9000: Module '../../../harbinit.prg'
was compiled with unsupported PCODE version 0.3.
Please recompile.

I think that my harbour's version (2.0) is incompatible with this hbvm.lib.
Maybe i'm wrong.

Regards
Jaroslaw Kadziola

[Antonio Linares]

Jaroslaw,

Please compile Harbour harbinit.prg and replace it in hbvm.lib, thanks

harbinit.prg

Code: Select all  Expand view

/*
 * $Id: harbinit.prg 11201 2009-06-03 10:26:40Z vszakats $
 */

/*
 * Harbour Project source code:
 * Main Harbour initialization functions CLIPINIT()
 *
 * Copyright 1999-2001 Viktor Szakats (harbour.01 syenar.hu)
 * www - http://www.harbour-project.org
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2, or (at your option)
 * any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this software; see the file COPYING.  If not, write to
 * the Free Software Foundation, Inc., 59 Temple Place, Suite 330,
 * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/).
 *
 * As a special exception, the Harbour Project gives permission for
 * additional uses of the text contained in its release of Harbour.
 *
 * The exception is that, if you link the Harbour libraries with other
 * files to produce an executable, this does not by itself cause the
 * resulting executable to be covered by the GNU General Public License.
 * Your use of that executable is in no way restricted on account of
 * linking the Harbour library code into it.
 *
 * This exception does not however invalidate any other reasons why
 * the executable file might be covered by the GNU General Public License.
 *
 * This exception applies only to the code released by the Harbour
 * Project under the name Harbour.  If you copy code from other
 * Harbour Project or Free Software Foundation releases into a copy of
 * Harbour, as the General Public License permits, the exception does
 * not apply to the code that you add in this way.  To avoid misleading
 * anyone as to the status of such modified files, you must delete
 * this exception notice from them.
 *
 * If you write modifications of your own for Harbour, it is your choice
 * whether to permit this exception to apply to your modifications.
 * If you do not wish that, delete this exception notice.
 *
 */

#include "inkey.ch"

ANNOUNCE SYSINIT

/* NOTE: For complete compatibility */
PROCEDURE CLIPPER520()
   RETURN

#ifdef HB_COMPAT_C53

/* NOTE: For complete compatibility */
PROCEDURE CLIPPER530()
   RETURN

#endif

/*
 * because on some platform the execution order of init functions
 * is out of Harbour control then this function has to be called
 * explicitly in VM initialization process before hb_vmDoInitFunctions()
 * and not depends on INIT clause.
 */
PROCEDURE ClipInit()

   MEMVAR GetList

   PUBLIC GetList := {}

   ErrorSys()

   /* TOFIX: In Clipper this function is not called from here CLIPINIT(). */
   /* NOTE: In Clipper __SETHELPK() is called *after* ERRORSYS(). */
   IF Type( "HELP()" ) == "UI"
      __SetHelpK()
   ENDIF

   RETURN

PROCEDURE __SetHelpK()

   SET KEY K_F1 TO __XHELP

   RETURN
 

[kadziola]

Antonio ,

Finally can see some results ! Both tests run OK !
Now i must test my FWPPC application in real work

Thank you so much !

Regards
Jaroslw Kadziola

[Antonio Linares]

Jaroslaw,

Very good!

Please email me or post here hbvm.lib here for other FWPPC users that may have the same problem, thanks!

[kadziola]

Antonio,

Sent to your mailbox.

Regards
Jaroslaw Kadziola

[Antonio Linares]

Jaroslaw,

Here it is:
http://code.google.com/p/harbour-and-xharbour-builds/downloads/detail?name=hbvm.lib%282%29&can=2&q=

many thanks