[Harbour] CHANGELOG: 2008-04-21 14:48 UTC+0100 Viktor Szakats (harbour.01 syenar hu)
2008-04-21 14:48 UTC+0100 Viktor Szakats (harbour.01 syenar hu) * tests/rto_get.prg * tests/rto_tb.prg + Added more tests. + Enabled object as array results by default. + More details for TGet test results. * bin/bld_os2.cmd ! Fixed lib names. Thanks David. * source/rtl/tobject.prg * Formatting. * source/rtl/tget.prg ! Delimiter colors in C5.3 mode made compatible. ! ::colorSpec handling in C5.3 mode made compatible for some invalid parameter types. ! Fixed handling decimals in :row, :col, :pos methods. ! Fixed to compile in C5.2 mode without warning (introduced in recent commit). * source/rtl/tbrowse.prg ! Fixed handling decimals in :nTop, :nBottom, :nLeft, :nRight. + Added unfinished XPP method :viewArea() + Added untested XPP method :firstScrCol() ; Few minor formatting. * include/hbextern.ch * source/rtl/einstvar.prg + Added _eInstVar52() which is the C5.2 compatible version of this function. It also replicates a bug. * _eInstVar() renamed to _eInstVar53(). * _eInstVar() made a stub to call _eInstVar53(). * source/rtl/checkbox.prg * source/rtl/listbox.prg * source/rtl/pushbtn.prg * source/rtl/radiobtn.prg * source/rtl/radiogrp.prg * source/rtl/scrollbr.prg * source/rtl/symbol.prg * source/rtl/teditor.prg * source/rtl/tget.prg * source/rtl/tget1.prg * source/rtl/tgetlist.prg * source/rtl/tmenuitm.prg * source/rtl/tmenusys.prg * source/rtl/tpopup.prg * source/rtl/ttopbar.prg * Formatting (EXPORT: -> EXPORTED:) * contrib/hbtip/thtml.prg * contrib/hbtip/ftpcln.prg ! Fixed to work regardless of SET EXACT setting. ; NOTE: I'd suggest an optional compiler warning to detect plain "=" usage. It's bad practice in most cases. TODO: make_os2_gcc.cmd -> make_gcc_os2.cmd TODO: TGET test case for my vtgetlst problem. TODO: TGET fix for the above. TODO: _eInstVar() -> _eInstVar53() -- Brgds, Viktor ___ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
[Harbour] CHANGELOG: 2008-04-21 15:02 UTC+0100 Viktor Szakats (harbour.01 syenar hu)
2008-04-21 15:02 UTC+0100 Viktor Szakats (harbour.01 syenar hu) * common.mak * include/hbextern.ch * source/rtl/Makefile * source/rtl/checkbox.prg * source/rtl/einstvar.prg + source/rtl/einstv52.prg * source/rtl/listbox.prg * source/rtl/pushbtn.prg * source/rtl/radiobtn.prg * source/rtl/radiogrp.prg * source/rtl/tbcolumn.prg * source/rtl/tbrowse.prg * source/rtl/tget.prg * source/rtl/tmenuitm.prg * source/rtl/tpopup.prg * source/rtl/ttopbar.prg ! _eInstVar() made compatible with C5.2 in C5.2 mode. * Renamed _eInstVar52() -> __eInstVar52() (Harbour internal function namespace) * Renamed _eInstVar53() -> __eInstVar53() (Harbour internal function namespace) * __eInstVar52() moved to a separate file. * Harbour now uses __eInstVar53() internally. - make_os2_gcc.cmd + make_gnu_os2.cmd * Renamed to align the filename with the rest of the GNU make command files. Content unchanged. -- Brgds, Viktor ___ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
[Harbour] servoj is a front end client development tools
http://www.servoy.com/generic.jsp?mt=393&taxonomy_id=734&pageid=hlfoxpro Servoy is a cross-platform application development and deployment environment. Servoy consists of a GUI designer, is event-driven and runs scripts through JavaScript. Servoy allows applications to be deployed to both a native Smart client / Rich client and to a pure html Web client from the same codebase and user interface. Developers can build front-ends to databases -- without having to write any SQL code, even when combining data from multiple sources. Massimo Belgrano ___ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
[Harbour] A visual fox alternative
servoy is Cross platform, corss database, WYSIWYG report http://www.servoy.com/generic.jsp?mt=393&taxonomy_id=734&pageid=glfoxpro Anyone have other info regargind servoy? ___ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
[Harbour] CHANGELOG: 2008-04-21 15:54 UTC+0100 Viktor Szakats (harbour.01 syenar hu)
2008-04-21 15:54 UTC+0100 Viktor Szakats (harbour.01 syenar hu) * source/rtl/tbrowse.prg ! Added some new lines to XPP methods. * contrib/hbtip/thtml.prg * contrib/hbtip/popcln.prg * contrib/hbtip/sendmail.prg * contrib/hbtip/cgi.prg * contrib/hbtip/url.prg * contrib/hbtip/mail.prg * contrib/hbtip/ftpcln.prg ! Fixed ambigous "=" and "!=" to "==" or ":=" or "!( == )" contructs. Someone pls verify if these fixes are right in the broader context. -- Brgds, Viktor ___ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
[Harbour] How do I use GTWVG (\harbour\contrib\gtwvg)?
[SPA] Hola: ¿Cómo se usa GTWVG (\harbour\contrib\gtwvg)? ¿Cómo construyo el demowvg (\harbour\contrib\gtwvg\tests)? ¿Existe alguna documentación? [ENG] Hello: How do I use GTWVG (\harbour\contrib\gtwvg)? How do I build the demowvg (\harbour\contrib\gtwvg\tests)? Is there any documentation? TIA, Best Regards. GVS ___ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
[Harbour] 2008-04-23 02:14 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
2008-04-23 02:14 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl) * harbour/source/debug/dbgbrwsr.prg * respect oCol:colorBlock() used by debugger code in few places * harbour/source/debug/dbgtobj.prg * sort messages and show methods in lower letters just like Clipper * harbour/source/debug/dbgtobj.prg * harbour/source/debug/dbgthsh.prg * harbour/source/debug/dbgtarr.prg ! added protection against RT error when user type wrong expression in OBJECT, ARRAY and HASH inspectors best regards Przemek ___ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
Re: [Harbour] Debugger and class hidden scope
On Thu, 17 Apr 2008, Lorenzo Fiorini wrote:
Hi Lorenzo,
> We told about this time ago.
> This is what we get inspecting a tbrowse object:
> Error BASE/41 Scope violation (hidden): TBROWSE:ACELLCOLORS
> Called from TBROWSE:ACELLCOLORS(0)
> Called from __OBJSENDMSG(0)
> Called from __OBJGETVALUELIST(170)
> Called from HBDBOBJECT:NEW(84)
> ...
> Any workaround?
Try after:
2008-04-22 04:50 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
It will work. Please remember that if you have classes with multiple
private messages with the same name then object inspector will show
the result valid for current executions context. When non of messages
with given name is accessible in current execution context due to scope
restriction then the last defined message in child class will be used.
Though maybe for debugging it will be better to not remove original
restrictions because you do not see current scope values. Probably
adding to object inspector information about current scope can help
users.
Below I'm attaching code which shows class with multiple hidden
messages. Execute it step by step and see in object inspector what
happens with o:v instance variable depending on the current execution
context.
Please also remember that I haven't disabled scopes in debugger.
Such tricks are IMO wrong because they causes that you cannot debug
some code or some code can work in different way in debugger then
without debugger. F.e. you have function INC_O() which increments
passed object variables V1 and if it's READONLY then increments V2.
This function can be used for different objects.
FUNCTION INC_O( o )
BEGIN SEQUENCE WITH {|| break() }
o:v1++
RECOVER
o:v2++
END SEQUENCE
RETURN NIL
Inside xHarbour debugger only and always V1 will be incremented
and the exception will never appear because debugger disables
scoping so such code will give different results inside debugger
then executed without it.
In Harbour scopes are still active and you do not have to worry
about some unexpected behavior which will be different then in
normal execution process.
best regards,
Przemek
#include "hbclass.ch"
memvar o
proc main()
public o:=cls3():new()
altd()
o:m1()
o:m2()
o:m3()
inkey(0)
return
create class cls1
var v init "v1" hidden
method m1
endclass
method m1 class cls1
f(::v)
return self
create class cls2 from cls1
var v init "v2" hidden
method m2
endclass
method m2 class cls2
f(::v)
return self
create class cls3 from cls2
var v init "v3" hidden
method m3
endclass
method m3 class cls3
f(::v)
return self
function f(v)
? v
return nil
___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour
[Harbour] 2008-04-22 14:35 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
2008-04-22 14:35 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl) * harbour/source/rtl/tbrowse.prg * updated mouse positioning for non integer coordinates best regards Przemek ___ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
[Harbour] Harbour web site
Is possible a revised version of http://www.harbour-project.org/? Some part seem obsolete http://culikr.sites.uol.com.br/functions.htm Look and feel a little outdated Is possible a cooperation for having better website? I can give my support Best regards Massimo Belgrano ___ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
[Harbour] 2008-04-22 04:50 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
2008-04-22 04:50 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl) * harbour/include/hbapicls.h * harbour/source/vm/classes.c + added new function hb_dbgObjSendMessage() which allows to call messages with given given execution context for proper scope checking * harbour/source/debug/dbgentry.c + added HB_DBG_SENDMSG() for calling messages with given execution context * harbour/source/debug/dbgtobj.prg * removed all __obj*() function calls * use HB_DBG_SENDMSG() to access/assign object variables ! fixed default value in GET operation called from object inspector to always show current object variable value ! fixed set for object variables which hold value: "Method" they were recognized as method Now object variables can be inspected by debugger. If object has multiple private messages with the same name inherited from parent classes then their context will be dynamically changed depending on position in currently debugged code. best regards Przemek ___ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
[Harbour] 2008-04-22 20:41 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
2008-04-22 20:41 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl) * harbour/include/hbclass.ch * harbour/include/hbcomp.h * harbour/source/compiler/hbmain.c * harbour/source/compiler/harbour.yyc * harbour/source/compiler/harbour.y ! fixed -w3 warnings when class name is different then function name * allow to overwrite predefined classes definitions it's a dirty hack but current implementation of predefined function and class declarations has to be rewritten from scratch in the future so I make it intentionally - at least it resolves some memory leaks like: harbour -n -w3 tbcolumn.prg * harbour/config/rules.cf * harbour/make_b32.mak * harbour/make_gcc.mak * harbour/make_vc.mak * harbour/make_vcce.mak * harbour/contrib/mtpl_b32.mak * harbour/contrib/mtpl_gcc.mak * harbour/contrib/mtpl_vc.mak * changed default Harbour compiler switch -w2 to -w3 * harbour/contrib/xhb/xhbcomp.prg * replaced repeated declarations by small hack * harbour/utils/hbmake/tmake.prg ! fixed reported by -w3 repeated aDir declaration * harbour/source/rtl/tbrowse.prg * calculate frozen area size for 5-th element of array returned by xbase++ compatible method :viewArea(). Viktor please check me. If you can also describe what exactly TOFIX in :firstScrCol() and :viewArea() means then maybe I can help - I do not have xbase++ so I do not know what should be fixed. best regards Przemek ___ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
Re: [Harbour] gcc 4.3.0 warnings
On Sun, 20 Apr 2008, Lorenzo Fiorini wrote:
> Here are the "few" warnings I get building harbour under Fedora 9
> preview with gcc (GCC) 4.3.0 20080416 (Red Hat 4.3.0-7)
> ../../hbstr.c: In function 'hb_numRound':
> ../../hbstr.c:340: warning: array subscript is below array bounds
> ../../hbstr.c: In function 'hb_numDecConv':
> ../../hbstr.c:340: warning: array subscript is below array bounds
It's a wrong compiler warning messages. I hope that it generates
valid machine code.
The warning comes from code:
if( nPrecision < 16 )
{
if( nPrecision >= 0 )
{
return s_dPow10[ nPrecision ];
}
else if( nPrecision > -16 )
{
return 1.0 / s_dPow10[ -nPrecision ]; // line 340
}
}
and s_dPow10 has 16 elements (indexed from 0 to 15). So as you can see
array bounds cannot be exceed.
I do not have GCC 4.3 so I cannot check what is the exact source of
this message but if you have a while then you can try to pacify this
warning.
First you can try to change:
nPrecision < 16
to:
nPrecision <= 15
and:
nPrecision > -16
to:
nPrecision >= -15
but I do not expect it will help.
Probably explicit casting in line 340 should help:
return 1.0 / s_dPow10[ ( unsigned int ) -nPrecision ];
best regards,
Przemek
___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour
Re: [Harbour] Harbour web site
On Tuesday 22 April 2008 06:10:48 am Massimo Belgrano wrote: > Is possible a revised version of http://www.harbour-project.org/? > Some part seem obsolete http://culikr.sites.uol.com.br/functions.htm > Look and feel a little outdated > Is possible a cooperation for having better website? > I can give my support I don't have a problem with rebuilding the site. Anyone object? -- In order to ensure a safe police state; the right of the people to keep and bear arms must be infringed. ___ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
[Harbour] Support XML Library ?
Please, Its possible using txml.prg and hbxml.c into Harbour ? It is very interesant and important this files about manager XML. It have Harbour manager XML ? I view this source and have functions about tables hash; hb_hashNew, etc... Have Harbour equal API Hash xHarbour ? Regards Rafa Carmona ___ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
Re: [Harbour] CHANGELOG: 2008-04-21 15:54 UTC+0100 Viktor Szakats (harbour.01 syenar hu)
On Mon, Apr 21, 2008 at 3:54 PM, Szakáts Viktor <[EMAIL PROTECTED]> wrote: >* contrib/hbtip/thtml.prg >* contrib/hbtip/popcln.prg >* contrib/hbtip/sendmail.prg >* contrib/hbtip/cgi.prg >* contrib/hbtip/url.prg >* contrib/hbtip/mail.prg >* contrib/hbtip/ftpcln.prg > ! Fixed ambigous "=" and "!=" to "==" or ":=" >or "!( == )" contructs. >Someone pls verify if these fixes are right in >the broader context. My apps heavily depends on contrib/hbtip and I don't have any problem with the actual code. Testing things like cgi,ftp,mail takes a lot of time since it depends on different clients and servers often on different OSes. May I ask to revert these changes and move them to the next release? best regards, Lorenzo ___ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
