[Harbour] 2008-10-08 14:57 UTC+0200 Viktor Szakats (harbour.01 syenar hu)

2008-10-08 Thread Szakáts Viktor
2008-10-08 14:57 UTC+0200 Viktor Szakats (harbour.01 syenar hu)
  * make_b32.mak
  * contrib/mtpl_b32.mak
+ Added -Q switch to BCC defaults. This will print 
  verbose error messages.
--
Brgds,
Viktor

___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] nmake optimization for .prg

2008-10-08 Thread Szakáts Viktor

Hi Przemek,


Have you tried sth like:

  set HB_CFG_FILE=hb_bld.cfg
  echo CC=$(CC) > %HB_CFG_FILE%
  echo CFLAGS=$(CLIBFLAGS) -Fo$(OBJ_DIR)\ >> %HB_CFG_FILE%
  echo VERBOSE=YES >> %HB_CFG_FILE%
  echo DELTMP=YES >> %HB_CFG_FILE%

and then:

  {$(RTL_DIR)}.prg{$(OBJ_DIR)}$(OBJEXT)::
 $(HB) $(HARBOURFLAGS) -go0 -o$(OBJ_DIR)\ $<
Though it will also call MSVC many times.


This is a very good idea, if harbour.exe could
make one call only to the C compiler, with
a list of .c files. Maybe controllable with a
setting in the .cfg, in case some C compilers
wouldn't support this feature. This would make
-go feature much more useful.

BTW, if I use -gc0 without a .cfg in current (or harbour.exe)
dir, it gives an:
"Error: Can't find harbour.cfg file in C:\Program Files\Far."
which is the first element in my path, so it seems the
full path list is not searched.


BTW what happens with this:

  {$(RTL_DIR)}.prg{$(OBJ_DIR)}$(OBJEXT)::
  $(HB) $(HARBOURFLAGS) -o$(OBJ_DIR)\ $<
  $(CC) $(CLIBFLAGS) -Fo$(OBJ_DIR)\ $(*B:$(OBJEXT)=.c)

$(*B:$(OBJEXT)=.c) will probably give wrong path so please try to
substitute also path.


I guess this wouldn't work, because nmake seems to be
very clever to detect any attempts to modify the dependency
list (at least it could detect all such attempts of mine),
it this case however, it complains about '=' missing in macro.

Brgds,
Viktor

___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [SPAM] [Harbour] Speedtst.exe results for 2 computers

2008-10-08 Thread Przemyslaw Czerpak
On Wed, 08 Oct 2008, Phil Barnett wrote:

Hi Phil,

> Well, I see that I worded that badly. I saw that right after I sent it.
> I did this:
> export -DHB_GUI
> mpkg_tgz.sh
> (I observed that -DHB_GUI was in the compile strings)
> Installled the resulting tarball
> Recompiled the speedtst
> ran it with poor results.
> Is there a better way to recompile and install on linux?

OK. If possible please try current SVN build.

best regards,
Przemek
___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


[Harbour] Suggested Tbrowse Changes

2008-10-08 Thread Gerald Drouillard
I am running Harbour's tbrowse in the latest version of xHarbour in the 
following issues I have found:


METHOD refreshAll() CLASS TBROWSE

   ::setUnstable()
// The following 2 lines do not follow clipper behavior:
//   Eval( ::bSkipBlock, 1 - ::nBufferPos )
//   ::nBufferPos := 1
   ::lFrames := .T.
   ::lRefresh := .T.

   RETURN Self

Not sure if the following is a difference in xhb/hb:

METHOD stabilize() CLASS TBROWSE

 FOR EACH lStat, lDisp IN ::aCellStatus, ::aDispStatus DESCEND
IF !lStat

   IF lRead
  RETURN .F.
   ENDIF
//this line was changed in xhb to work correctly:
   lRead := ::readRecord( nrowcount+lStat:__enumIndex()+1 ) 
ENDIF
IF lDisp
   ::dispRow( nrowcount+lDisp:__enumIndex()+1 )
ENDIF
 NEXT

lStat:__enumIndex() returns a negative number in xhb when using 
"DESCEND" and it seems like we are trying to paint from the bottom up.


--
Regards
--
Gerald Drouillard
Technology Architect
Drouillard & Associates, Inc.
http://www.Drouillard.biz
___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


[Harbour] 2008-10-08 14:36 UTC+0200 Viktor Szakats (harbour.01 syenar hu)

2008-10-08 Thread Szakáts Viktor
2008-10-08 14:36 UTC+0200 Viktor Szakats (harbour.01 syenar hu)
  * bin/bld.bat
  * bin/bld_os2.cmd
+ Added support for HB_INSTALL_PREFIX.
+ Added experimental support for 'set HB_MT=MT' flag, 
  to create an MT executable.

  * source/rtl/seconds.c
* Formatting.
--
Brgds,
Viktor

___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


[Harbour] 2008-10-08 15:19 UTC+0200 Viktor Szakats (harbour.01 syenar hu)

2008-10-08 Thread Szakáts Viktor
2008-10-08 15:19 UTC+0200 Viktor Szakats (harbour.01 syenar hu)
  * make_gnu.bat
! HARBOURDIR -> HB_INSTALL_PREFIX
--
Brgds,
Viktor

___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


[Harbour] CHANGELOG: 2008-10-08 12:28 UTC+0200 Maurilio Longo ([EMAIL PROTECTED])

2008-10-08 Thread Maurilio Longo
2008-10-08 12:28 UTC+0200 Maurilio Longo ([EMAIL PROTECTED])
  * harbour/source/rtl/seconds.c
! removed a couple of warnings.

-- 
 __
|  |  | |__| Maurilio Longo
|_|_|_|| farmaconsult s.r.l.


___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


[Harbour] __DBPACK bug in 1.0.1

2008-10-08 Thread Mindaugas Kavaliauskas

Hi,


after moving from some old Harbour version to 1.0.1 in production 
environment my app started to GPF on __DBPACK.


I've debugged code a little bit. After evaluation of
   SELF_EVALBLOCK( ( AREAP ) pArea, pBlock )
inside hb_dbfPack(), the result of HB_IS_BLOCK( pBlock ) is FALSE, 
because hb_vmEvalBlockOrMacro() releases pArea->valResult (it contains 
this codeblock). Some older Harbour code works OK.


Self-contained sample (not necessarily GPFs, but prints wrong results):
PROC main()
  DBCREATE("test124", {{"F1", "C", 10, 0}})
  USE test124 NEW EXCLUSIVE
  DBAPPEND()
  DBAPPEND()
  DBAPPEND()
  DBAPPEND()
  __DBPACK({|| QQOUT(".")}, 1) // Only one "." is printed!!!
  DBCLOSEALL()
RETURN


Best regards,
Mindaugas



___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


[Harbour] Re: Harbour under OS/2

2008-10-08 Thread David Arturo Macias Corona

Current Harbour under OS/2 build/run with some warnings:


../../seconds.c: In function `hb_secondsCPU':
../../seconds.c:320: warning: implicit declaration of function `_getpid'
../../seconds.c:325: warning: initialization makes pointer from integer
without a cast


David Macias



___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [SPAM] [Harbour] Speedtst.exe results for 2 computers

2008-10-08 Thread Teo Fonrouge
On Wednesday 08 October 2008 12:49:16 am Phil Barnett wrote:
> On Tuesday 07 October 2008 08:45:51 pm Przemyslaw Czerpak wrote:
> > > I saw the environment parameter included in all of the gcc compile
> > > strings, so I think that -DHB_GUI was compiled into the compiler. Then
> > > I ran mpkg_tgz.sh and installed it again over the old output. Then I
> > > recompiled speedtst.
> >
> > And this could be the source of problem: mpkg_tgz.sh always rebuild
> > Harbour from scratch so it overloaded your previous build.
>
> Well, I see that I worded that badly. I saw that right after I sent it.
>
> I did this:
>
> export -DHB_GUI
> mpkg_tgz.sh
>
> (I observed that -DHB_GUI was in the compile strings)
>
> Installled the resulting tarball
>
> Recompiled the speedtst
>
> ran it with poor results.
>
> Is there a better way to recompile and install on linux?

Sry for jump in.

Hello Phil,

I see that you are use a rpm based distro (Fedora 9) so you can build the 
binaries and install it as rpm's. To create the Harbour rpm's, you just need 
to send the following command in an console:

$ ./mpkg_rpm.sh

this method requires that you have also installed the "rpm-build" package, 
which can be installed by sending the following command in an console (as 
root user):

# yum install rpm-build

It is possible that you are asked for other packages, like "slang-devel". I 
don't know if this has changed in the current SVN. Anyway you can install it 
with yum.

Once that the packages are build (the ending process for rpm-build shows where 
the packages are created, usually your "/home/Phil/RPM/RPMS/i386" dir, 
assuming that your username is Phil) you just need to send (as root) the 
following command in an console from the place where are the Harbour 
packages:

# rpm -Uvh harbour*rpm

If you wish to change some compile time parameters, you can change it in the 
harbour.spec file, i.e. to add the "-DHB_GUI" define, (currently in the line 
70) search for the "%define hb_cflag" text and change the values in the 
export definition there.


best regards

Teo
___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


[Harbour] Exception handling

2008-10-08 Thread Mindaugas Kavaliauskas

Hi,


currently exception handling is set (hb_vmSetExceptionHandler() is 
called) right before evaluation of main procedure. Shouldn't it be 
initialized before _APPMAIN processing or before hb_vmDoInitFunctions()?


My problem is that I use _APPMAIN to initialize application environment, 
including error system capable to sends errors (also GPFs) to my 
mailbox. Now hb_vmSetExceptionHandler() overloads my handler and GPFs 
lives in hb_out.log at customers computer instead of my mailbox.



Best regards,
Mindaugas
___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] Exception handling

2008-10-08 Thread Szakáts Viktor

Hi Mindaugas,

On 2008.10.08., at 17:36, Mindaugas Kavaliauskas wrote:


Hi,

currently exception handling is set (hb_vmSetExceptionHandler() is  
called) right before evaluation of main procedure. Shouldn't it be  
initialized before _APPMAIN processing or before  
hb_vmDoInitFunctions()?


I think it should.

Brgds,
Viktor

___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] Exception handling

2008-10-08 Thread Przemyslaw Czerpak
On Wed, 08 Oct 2008, Mindaugas Kavaliauskas wrote:

Hi Mindaugas,

> currently exception handling is set (hb_vmSetExceptionHandler() is called) 
> right before evaluation of main procedure. Shouldn't it be initialized 
> before _APPMAIN processing or before hb_vmDoInitFunctions()?

It is set before _APPMAIN execution but after INIT procedures.

> My problem is that I use _APPMAIN to initialize application environment, 
> including error system capable to sends errors (also GPFs) to my mailbox. 
> Now hb_vmSetExceptionHandler() overloads my handler and GPFs lives in 
> hb_out.log at customers computer instead of my mailbox.

If you have hb_out.log then your application GPFs in one of INIT
procedure. hb_vmSetExceptionHandler() is not executed after _APPMAIN()
so such situation as you described is impossible.

Anyhow we should probably move hb_vmSetExceptionHandler() before
INIT procedures and hb_vmUnsetExceptionHandler() to hb_vmQuit() so
also EXIT procedures will be covered by it. On some platforms it's
necessary to restore exception handle to avoid GPF on EXIT.

best regards,
Przemek
___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


[Harbour] rddads: possible problem

2008-10-08 Thread [EMAIL PROTECTED]
Hi ppl,

Please I need understand:

*if* for some reaction AdsGotoTop() function fail in ads server, this
function return !AE_SUCCESS.  In the code below from ads1.c, there is
no need check this?

---cut---
static ERRCODE adsGoTop( ADSAREAP pArea )
{
   HB_TRACE(HB_TR_DEBUG, ("adsGoTop(%p)", pArea));

   /* reset any pending relations */
   SELF_RESETREL( pArea );

   pArea->fTop = TRUE;
   pArea->fBottom = FALSE;
   AdsGotoTop( (pArea->hOrdCurrent) ? pArea->hOrdCurrent :
pArea->hTable );

   hb_adsUpdateAreaFlags( pArea );

   /* Force relational movement in child WorkAreas */
   if( pArea->lpdbRelations )
  SELF_SYNCCHILDREN( ( AREAP ) pArea );

   return SELF_SKIPFILTER( ( AREAP ) pArea, 1 );
}
---cut---

IIUC the correct is:

---cut---
   ulRetVal =AdsGotoTop( (pArea->hOrdCurrent) ? pArea->hOrdCurrent
: pArea->hTable );
  if( u32RetVal != AE_SUCCESS )
  {
 hb_errRT_DBCMD( error.code.here );
 return FAILURE;
  }
---cut---


Thanks in advance and best regards,

Toninho.

__
Faça ligações para outros computadores com o novo Yahoo! Messenger
http://br.beta.messenger.yahoo.com/
___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


[Harbour] 2008-10-08 20:33 UTC+0200 Viktor Szakats (harbour.01 syenar hu)

2008-10-08 Thread Szakáts Viktor
2008-10-08 20:33 UTC+0200 Viktor Szakats (harbour.01 syenar hu)
  * contrib/examples/hscript/hscript.prg
  * source/compiler/gencobj.c
  * source/compiler/genobj32.c
* Formatting, minor cleanups.
--
Brgds,
Viktor

___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] Exception handling

2008-10-08 Thread Mindaugas Kavaliauskas

Przemyslaw Czerpak wrote:
currently exception handling is set (hb_vmSetExceptionHandler() is called) 
right before evaluation of main procedure. Shouldn't it be initialized 
before _APPMAIN processing or before hb_vmDoInitFunctions()?


It is set before _APPMAIN execution but after INIT procedures.


Yes, sorry. I'm using CLIPINIT(), not _APPMAIN(). Perhaps I must check 
if some INIT functions uses any "service" from initialized application 
environment and I can move it to _APPMAIN(), but the question about 
exception handler initialization remains.



Best regards,
Mindaugas
___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


[Harbour] 2008-10-09 00:17 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)

2008-10-08 Thread Przemyslaw Czerpak
2008-10-09 00:17 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
  * harbour/include/hbtypes.h
  * harbour/source/vm/maindllp.c
! updated casting for current SVN code
  [TOMERGE 1.0]

  * harbour/include/hbthread.h
  * harbour/source/vm/hvm.c
  * harbour/source/vm/thread.c
+ added .prg function
 hb_threadWait(  | , [  ] [,  ] )
   =>  |  | 0
  This function wait for  seconds (default infinite wait)
  until one or all (controlled by  parameter) of given HVM threads
  will have finished execution in HVM area. It does not join the threads.
  It returns index to 1-st thread which has finished execution (default)
  or number of threads which has finished in given time period when lAll
  is .T.

best regards
Przemek
___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] Suggested Tbrowse Changes

2008-10-08 Thread Przemyslaw Czerpak
On Wed, 08 Oct 2008, Gerald Drouillard wrote:

Hi Gerald,

> I am running Harbour's tbrowse in the latest version of xHarbour in the 
> following issues I have found:
> METHOD refreshAll() CLASS TBROWSE
>::setUnstable()
> // The following 2 lines do not follow clipper behavior:
> //   Eval( ::bSkipBlock, 1 - ::nBufferPos )
> //   ::nBufferPos := 1
>::lFrames := .T.
>::lRefresh := .T.
>RETURN Self

Do you have any code example?
Even this simple test:
   proc main()
  local o:=tbrowsenew()
  o:skipBlock:={|x,y,z|qout(x,y,z),x}
  o:refreshAll()
   return

shows that Clipper evaluates skipBlock() inside refresh all.
I've tried with CL5.2 and CL5.3 - both gives the same results
as Harbour. Also such things should be caught by Viktor's
TBROWSE regression test and I do not remember any problems
here.

> Not sure if the following is a difference in xhb/hb:
> METHOD stabilize() CLASS TBROWSE
> 
>  FOR EACH lStat, lDisp IN ::aCellStatus, ::aDispStatus DESCEND
> IF !lStat
>
>IF lRead
>   RETURN .F.
>ENDIF
> //this line was changed in xhb to work correctly:
>lRead := ::readRecord( nrowcount+lStat:__enumIndex()+1 )   
> 
> ENDIF
> IF lDisp
>::dispRow( nrowcount+lDisp:__enumIndex()+1 )
> ENDIF
>  NEXT
>
> lStat:__enumIndex() returns a negative number in xhb when using "DESCEND" 
> and it seems like we are trying to paint from the bottom up.

xHarbour does not support extended FOR EACH functionality like in Harbour.
It has some emulation using preprocessor directives but it does not replicate
Harbour behavior. The above is one of such examples. In Harbour this code is:

 FOR EACH lStat, lDisp IN ::aCellStatus, ::aDispStatus DESCEND
IF !lStat
   IF lRead
  RETURN .F.
   ENDIF
   lRead := ::readRecord( lStat:__enumIndex() )
ENDIF
IF lDisp
   ::dispRow( lDisp:__enumIndex() )
ENDIF
 NEXT

reads and shows records from the top to down.

I cannot say how tbrowse code will work in xHarbour. Harbour does not
have some important functionality which exist only in Harbour and maybe
used by this code in some places.
Anyhow if you will find any incompatibilities to Clipper then please
send a message here. Maybe sth has to be fixed yet.

best regards,
Przemek
___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


[Harbour] 2008-10-09 01:33 UTC+0200 Viktor Szakats (harbour.01 syenar hu)

2008-10-08 Thread Szakáts Viktor
2008-10-09 01:33 UTC+0200 Viktor Szakats (harbour.01 syenar hu)
  * include/hbextern.ch
+ Added HB_THREADWAIT()
--
Brgds,
Viktor

___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] 2008-10-09 01:33 UTC+0200 Viktor Szakats (harbour.01 syenar hu)

2008-10-08 Thread Przemyslaw Czerpak
On Thu, 09 Oct 2008, Szak�ts Viktor wrote:

Hi Viktor,

> 2008-10-09 01:33 UTC+0200 Viktor Szakats (harbour.01 syenar hu)
>   * include/hbextern.ch
> + Added HB_THREADWAIT()

Thank you very much and sorry. I still forget about hbextern.ch :-(

best regards,
Przemek
___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] 2008-10-09 01:33 UTC+0200 Viktor Szakats (harbour.01 syenar hu)

2008-10-08 Thread Szakáts Viktor

Hi Przemek,

No porblem at all. hbextern.ch is a major
maintenance PITA in Harbour unfortunately.

I just have no idea how to replace it with
a no-maintenance solution, or with something
which needs to be done only once for each
official release.

We have the hbextern tool for this, but it
doesn't know about #if HB_COMPAT_* and similar
conditionals in code. That would be solved
however by sorting such .prg parts into
separate "dialect" libs (for the most part).
Or by extending the tool to track these #ifdefs.

BTW, do we need HB_CDP_SUPPORT_OFF support,
besides marking those code parts as such?

Brgds,
Viktor

On 2008.10.09., at 1:31, Przemyslaw Czerpak wrote:


On Thu, 09 Oct 2008, Szak�ts Viktor wrote:

Hi Viktor,


2008-10-09 01:33 UTC+0200 Viktor Szakats (harbour.01 syenar hu)
 * include/hbextern.ch
   + Added HB_THREADWAIT()


Thank you very much and sorry. I still forget about hbextern.ch :-(

best regards,
Przemek
___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] rddads: possible problem

2008-10-08 Thread [EMAIL PROTECTED]
Sorry, wrote too fast, the correct code is this:

---cut---
u32RetVal = AdsGotoTop( (pArea->hOrdCurrent) ? pArea->hOrdCurrent
: pArea->hTable );
  if( u32RetVal != AE_SUCCESS )
  {
 hb_errRT_DBCMD( error.code.here );
 return FAILURE;
  }
---cut---

Regards,

Toninho.

__
Faça ligações para outros computadores com o novo Yahoo! Messenger
http://br.beta.messenger.yahoo.com/
___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


[Harbour] 2008-10-09 03:26 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)

2008-10-08 Thread Przemyslaw Czerpak
2008-10-09 03:26 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
  * harbour/include/hbcompdf.h
  * harbour/source/compiler/hbmain.c
% do not add dummy entries to symbol table for functions declared
  as dynamic - it allows to include hbdynamic.ch with list of all
  supported functions by application and/or harbour.dll to any .prg
  file which will be used to create shared library (.dll, .so, ...)
  without any memory overhead.

  * harbour/source/compiler/genc.c
% do not generate unnecessary HB_FUNC_EXTERN() declarations for
  function declared as DYNAMIC

best regards
Przemek
___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [SPAM] [Harbour] Speedtst.exe results for 2 computers

2008-10-08 Thread Phil Barnett
On Wednesday 08 October 2008 05:10:19 am Przemyslaw Czerpak wrote:

> OK. If possible please try current SVN 

[EMAIL PROTECTED] harbour]$ export C_USR=-DHB_GUI

[EMAIL PROTECTED] harbour]$ mpkg_tgz.sh

install resulting tarball as root

[EMAIL PROTECTED] harbour]$ cd tests
[EMAIL PROTECTED] tests]$ hbmk -n -w -es2 -mt speedtst
Harbour 1.1.0dev (Rev. 9564)   
Copyright (c) 1999-2008, http://www.harbour-project.org/
Compiling 'speedtst.prg'... 
Lines 876, Functions/Procedures 72  
Generating C source output to 'speedtst.c'... Done. 
[EMAIL PROTECTED] tests]$ for i in 1 2 4 6 8; 
do ./speedtst --exclude=mem --scale --thread=$i; done

10/09/08 00:57:00 Linux 2.6.26.3-29.fc9.i686 i686
Harbour 1.1.0dev (Rev. 9564) (MT)+ GNU C 4.3 (32 bit)
THREADS: 1   
N_LOOPS: 100 
excluded tests: 029 030 023 025 027 040 041 043 052 053 019 022 031 032 054
1 th.  1 th.  factor

[ T001: x := L_C ]  0.16   0.14 ->  1.15
[ T002: x := L_N ]  0.16   0.14 ->  1.14
[ T003: x := L_D ]  0.14   0.14 ->  1.00
[ T004: x := S_C ]  0.14   0.14 ->  1.01
[ T005: x := S_N ]  0.14   0.15 ->  0.90
[ T006: x := S_D ]  0.14   0.14 ->  1.00
[ T007: x := M_C ]  0.15   0.15 ->  0.98
[ T008: x := M_N ]  0.14   0.14 ->  1.00
[ T009: x := M_D ]  0.16   0.15 ->  1.06
[ T010: x := P_C ]  0.15   0.15 ->  1.00
[ T011: x := P_N ]  0.19   0.15 ->  1.31
[ T012: x := P_D ]  0.14   0.18 ->  0.75
[ T013: x := F_C ]  0.27   0.28 ->  0.97
[ T014: x := F_N ]  0.31   0.31 ->  0.98
[ T015: x := F_D ]  0.19   0.18 ->  1.02
[ T016: x := o:GenCode ]__  0.29   0.29 ->  0.98
[ T017: x := o[8] ]___  0.21   0.22 ->  0.96
[ T018: round( i / 1000, 2 ) ]  0.44   0.43 ->  1.02
[ T020: val( s ) ]  0.38   0.38 ->  1.00
[ T021: val( a [ i % 16 + 1 ] ) ]_  0.62   0.62 ->  1.00
[ T024: eval( bc := { || i % 16 } ) ]_  0.42   0.42 ->  1.00
[ T026: eval( bc := { |x| x % 16 }, i ) ]_  0.42   0.42 ->  1.00
[ T028: eval( bc := { |x| f1( x ) }, i ) ]  0.53   0.54 ->  0.98
[ T033: x := a[ i % 16 + 1 ] == s ]___  0.50   0.50 ->  1.00
[ T034: x := a[ i % 16 + 1 ] = s ]  0.50   0.50 ->  1.00
[ T035: x := a[ i % 16 + 1 ] >= s ]___  0.52   0.52 ->  1.00
[ T036: x := a[ i % 16 + 1 ] <= s ]___  0.52   0.50 ->  1.03
[ T037: x := a[ i % 16 + 1 ] < s ]  0.53   0.53 ->  1.00
[ T038: x := a[ i % 16 + 1 ] > s ]  0.51   0.52 ->  0.98
[ T039: ascan( a, i % 16 ) ]__  0.54   0.53 ->  1.00
[ T042: x := a ]__  0.15   0.15 ->  1.00
[ T044: f0() ]  0.24   0.24 ->  1.00
[ T045: f1( i ) ]_  0.30   0.31 ->  0.97
[ T046: f2( c[1...8] ) ]__  0.31   0.29 ->  1.05
[ T047: f2( c[1...4] ) ]__  0.29   0.30 ->  0.97
[ T048: f2( @c[1...4] ) ]_  0.29   0.29 ->  1.00
[ T049: f2( @c[1...4] ), c2 := c ]  0.35   0.34 ->  1.02
[ T050: f3( a, a2, s, i, s2, bc, i, n, x ) ]__  0.63   0.63 ->  1.01
[ T051: f2( a ) ]_  0.30   0.31 ->  0.95

[   TOTAL   ]_ 12.33  12.32 ->  1.00

[ total application time: ]24.55
[ total real time: ]...24.65

10/09/08 00:57:25 Linux 2.6.26.3-29.fc9.i686 i686
Harbour 1.1.0dev (Rev. 9564) (MT)+ GNU C 4.3 (32 bit)
THREADS: 2   
N_LOOPS: 100 
excluded tests: 029 030 023 025 027 040 041 043 052 053 019 022 031 032 054
1 th.  2 th.  factor

[ T001: x := L

Re: [SPAM] [Harbour] Speedtst.exe results for 2 computers

2008-10-08 Thread Phil Barnett
On Wednesday 08 October 2008 10:43:12 am Teo Fonrouge wrote:
> I see that you are use a rpm based distro (Fedora 9) so you can build the
> binaries and install it as rpm's. To create the Harbour rpm's, you just
> need to send the following command in an console:
>
> $ ./mpkg_rpm.sh

[EMAIL PROTECTED] harbour]$ ./mpkg_rpm.sh
svn: warning: '.' is not a working copy
error: Name field must be present in package: (main package)
error: Version field must be present in package: (main package)
error: Release field must be present in package: (main package)
error: Summary field must be present in package: (main package)
error: Group field must be present in package: (main package)
error: License field must be present in package: (main package)


-- 
"Ninety percent of politicians give the other 10 percent a bad name." -- Henry 
Kissinger
___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [SPAM] [Harbour] Speedtst.exe results for 2 computers

2008-10-08 Thread Teo Fonrouge
On Thursday 09 October 2008 12:27:41 am Phil Barnett wrote:
> On Wednesday 08 October 2008 10:43:12 am Teo Fonrouge wrote:
> > I see that you are use a rpm based distro (Fedora 9) so you can build the
> > binaries and install it as rpm's. To create the Harbour rpm's, you just
> > need to send the following command in an console:
> >
> > $ ./mpkg_rpm.sh
>
> [EMAIL PROTECTED] harbour]$ ./mpkg_rpm.sh
> svn: warning: '.' is not a working copy
> error: Name field must be present in package: (main package)
> error: Version field must be present in package: (main package)
> error: Release field must be present in package: (main package)
> error: Summary field must be present in package: (main package)
> error: Group field must be present in package: (main package)
> error: License field must be present in package: (main package)

The Harbour directory that you used, does not contain the information of a SVN 
tree (IOW, you obtained the Harbour sources by another means) and 
unfortunately the "mpkg_rpm.sh" script require the information stored in 
the .svn dirs to create the directory tree from where execute the initial 
make.

You can easily get a SVN copy of the current Harbour sources with the 
following command (in one single line, the last harbour word is separated by 
a space " "):

svn co 
https://harbour-project.svn.sourceforge.net/svnroot/harbour-project/trunk/harbour
 
harbour


best regards,

Teo
___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour