382 lines
14 KiB
Plaintext
382 lines
14 KiB
Plaintext
/*
|
|
* $Id$
|
|
*/
|
|
|
|
/* Use this format for the entry headers:
|
|
YYYY-MM-DD HH:MM UTC[-|+]hhmm Your Full Name <your_email@address>
|
|
For example:
|
|
2002-12-01 13:30 UTC+0100 Foo Bar <foo.bar@foobar.org>
|
|
*/
|
|
|
|
2007-02-09 00:10 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)
|
|
* harbour/source/common/hbstr.c
|
|
! Fixed three BCC5.5 warnings.
|
|
|
|
2007-02-08 23:55 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
|
|
* harbour/include/hbgtinfo.ch
|
|
* harbour/contrib/libct/ctwin.c
|
|
* harbour/source/rtl/gtalleg/gtalleg.c
|
|
* harbour/source/rtl/gtcrs/gtcrs.c
|
|
* harbour/source/rtl/gtdos/gtdos.c
|
|
* harbour/source/rtl/gtos2/gtos2.c
|
|
* harbour/source/rtl/gtpca/gtpca.c
|
|
* harbour/source/rtl/gtsln/gtsln.c
|
|
* harbour/source/rtl/gtstd/gtstd.c
|
|
* harbour/source/rtl/gtwin/gtwin.c
|
|
* harbour/source/rtl/gtwvt/gtwvt.c
|
|
* harbour/source/rtl/gtxwc/gtxwc.c
|
|
+ added support for GTI_FULLSCREEN, GTI_KBDSUPPORT, GTI_ISCTWIN
|
|
|
|
* harbour/source/rtl/hbgtcore.c
|
|
! fixed line and box drawing when the coordinates are out of screen size
|
|
|
|
* harbour/include/hbapi.h
|
|
* harbour/include/hbcomp.h
|
|
* harbour/include/hbpcode.h
|
|
* harbour/include/hbstack.h
|
|
* harbour/include/hbvm.h
|
|
* harbour/include/hbxvm.h
|
|
* harbour/source/compiler/complex.c
|
|
* harbour/source/compiler/genc.c
|
|
* harbour/source/compiler/gencc.c
|
|
* harbour/source/compiler/harbour.c
|
|
* harbour/source/compiler/harbour.y
|
|
* harbour/source/compiler/harbour.yyc
|
|
* harbour/source/compiler/harbour.yyh
|
|
* harbour/source/compiler/hbdead.c
|
|
* harbour/source/compiler/hbfix.c
|
|
* harbour/source/compiler/hblbl.c
|
|
* harbour/source/compiler/hbpcode.c
|
|
* harbour/source/compiler/hbstripl.c
|
|
* harbour/source/vm/classes.c
|
|
* harbour/source/vm/estack.c
|
|
* harbour/source/vm/hvm.c
|
|
* harbour/source/vm/itemapi.c
|
|
! added protection against cyclic references in arrays
|
|
* eliminated action parameter from hb_vmRequestReenter() /
|
|
hb_vmRequestRestore()
|
|
* moved s_lRecoverBase and s_uiActionRequest to HB_STACK structure
|
|
for future MT HVM version
|
|
+ added internal item structure hb_struRecover - it's not real item
|
|
but this structure is used to keep information about BEGIN SEQUENCE
|
|
data - it reduce HB_STACK usage
|
|
+ added support for ALWAYS clause in BEGIN SEQUENCE
|
|
The syntax is:
|
|
BEGIN SEQUENCE
|
|
<code>
|
|
[ RECOVER [ USING oErr ] ]
|
|
<recoverCode>
|
|
[ ALWAYS ]
|
|
<alwaysCode>
|
|
END [ SEQUENCE ]
|
|
It's guaranteed that <alwaysCode> is _ALWAYS_ executed even if
|
|
inside <code> or <recoverCode> some new exceptions like RETURN,
|
|
BREAK or QUIT will appear.
|
|
Please note that when the following code is executed:
|
|
BEGIN SEQUENCE
|
|
<code>
|
|
ALWAYS
|
|
<alwaysCode>
|
|
END
|
|
(without RECOVER clause) then BREAK exception inside <code> is not
|
|
recovered, <alwaysCode> is executed and then BREAK exception is
|
|
passed to outer BEGIN SEQUENCE. This is the same semantic as
|
|
used in TRY / [ CATCH ] / FINALLY / END
|
|
Those of you who prefer to use TRY / CATCH / FINALLY / END instead
|
|
of BEGIN SEQUENCE / RECOVER / ALWAYS / END can simply add to your
|
|
source code:
|
|
#command TRY => BEGIN SEQUENCE
|
|
#command CATCH [ oErr ] => RECOVER [ USING <oErr> ]
|
|
and:
|
|
errorBlock( {|oErr| break( oErr ) } )
|
|
Though instead of 'break( oErr )' I suggest to use some small function
|
|
which will support some basic recovery/substitute operations like in
|
|
default errorsys() and LockErrHandler() to not break existing code
|
|
which may depends on the default behavior.
|
|
If you want I can add direct support for TRY / CATCH / FINALLY / END
|
|
but I'm not sure it's really necessary.
|
|
Please note also that in Harbour ALWAYS code is execute even for QUIT
|
|
excpetion.
|
|
When <alwaysCode> is executed current exception is stored and restored
|
|
when is finished. If new exception appears inside <alwaysCode> then
|
|
restored exception depends on the priority in the following order:
|
|
QUIT // highest priority
|
|
BREAK
|
|
RETURN
|
|
If both exceptions have the same priority and contain additional value
|
|
(error object in BREAK or return value in RETURN) then the recently set
|
|
one is restored. It's similar behavior to destructor code.
|
|
|
|
* harbour/source/common/hbstr.c
|
|
* moved one character length string table (hb_szAscii) from hvm.c
|
|
to use it also in compiler and preprocessor
|
|
|
|
* harbour/source/compiler/ppcomp.c
|
|
* harbour/source/pp/ppcore.c
|
|
* harbour/source/pp/pplib.c
|
|
* tuned error messages to be more Clipper compatible
|
|
% use static strings from hb_szAscii
|
|
|
|
* harbour/source/rtl/alert.prg
|
|
* use hb_gtInfo( GTI_FULLSCREEN ) to detect type of GT driver
|
|
! some minor fixes
|
|
TOFIX: we have to also use GTI_ISCTWIN or add window allocation
|
|
to standard GT drivers to be Clipper compatible when CTWIN
|
|
is used - In Clipper Tools ALERT() works in differ way then
|
|
the standard one. It creates separate window box to display
|
|
data, supports SETKEY(), etc. I'll think about adding some
|
|
extended support for ALERT() and similar operations (f.e.
|
|
separate debugger windows) to GT API so it will be also
|
|
possible to overload standard alert() command by GUI message
|
|
box in GTGUI and similar GT drivers.
|
|
|
|
* harbour/source/rtl/binnumx.c
|
|
! fixed U2BIN() - wrong casting
|
|
|
|
2007-01-24 23:10 UTC+0200 Tomaz Zupan <tomaz.zupan@orpo.si>
|
|
* harbour.spec
|
|
* Aded Mandriva One distro to platforms
|
|
* bin/hb-func.sh
|
|
* Aded Mandriva and Mandriva One distro to platforms
|
|
|
|
2007-01-24 10:25 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
|
|
* harbour/config/w32/bcc32.cf
|
|
* harbour/include/hbexprb.c
|
|
* harbour/include/hbpcode.h
|
|
* harbour/include/hbxvm.h
|
|
* harbour/source/compiler/genc.c
|
|
* harbour/source/compiler/gencc.c
|
|
* harbour/source/compiler/hbdead.c
|
|
* harbour/source/compiler/hbfix.c
|
|
* harbour/source/compiler/hblbl.c
|
|
* harbour/source/compiler/hbpcode.c
|
|
* harbour/source/compiler/hbstripl.c
|
|
* harbour/source/rtl/set.c
|
|
* harbour/source/rtl/gtsln/gtsln.c
|
|
* harbour/source/vm/hvm.c
|
|
* recent fixes from Beta1
|
|
|
|
* harbour/contrib/libct/Makefile
|
|
- harbour/contrib/libct/bit1.c
|
|
- harbour/contrib/libct/bit2.c
|
|
- harbour/contrib/libct/bit3.c
|
|
+ harbour/contrib/libct/bitnum.c
|
|
! rewritten bit functions
|
|
|
|
* harbour/contrib/libct/addascii.c
|
|
* cleanup
|
|
|
|
* harbour/contrib/odbc/Makefile
|
|
* harbour/contrib/odbc/odbc.c
|
|
* harbour/contrib/odbc/sql.ch
|
|
- harbour/contrib/odbc/sql.h
|
|
- harbour/contrib/odbc/sqlext.h
|
|
- harbour/contrib/odbc/sqltypes.h
|
|
* harbour/contrib/odbc/todbc.prg
|
|
! synced with xHarbour
|
|
|
|
* harbour/contrib/rdd_ads/ads1.c
|
|
! fixed typo in DBI_GETHEADERSIZE
|
|
|
|
* harbour/contrib/rdd_ads/adsfunc.c
|
|
+ added ADSDDREMOVEINDEXFILE - borrowed from xHarbour
|
|
|
|
* harbour/source/rtl/alert.prg
|
|
* minor cleanup
|
|
|
|
* harbour/source/rtl/gtfunc.c
|
|
* use HB_ERR_ARGS_BASEPARAMS in error messages
|
|
|
|
* harbour/source/rtl/transfrm.c
|
|
* casting
|
|
|
|
2007-01-17 13:50 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
|
|
* harbour/source/compiler/gencc.c
|
|
* harbour/source/vm/hvm.c
|
|
! fixed typo in hb_xvmGreaterEqualThenIntIs() - <= was used instead
|
|
of >=
|
|
! fixed :¯o() messages used in WITH OBJECT structure and -gc3
|
|
output
|
|
+ added some missing optimizations in -gc3 output
|
|
|
|
2007-01-17 03:55 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
|
|
* harbour/contrib/libct/ctc.c
|
|
* harbour/contrib/libct/files.c
|
|
* harbour/contrib/libnf/ftattr.c
|
|
* harbour/contrib/libnf/n2color.c
|
|
* cleaned some BCC warnings
|
|
|
|
* harbour/include/hbapi.h
|
|
* harbour/include/hbexpra.c
|
|
* harbour/include/hbexprb.c
|
|
* harbour/include/hbsetup.ch
|
|
* harbour/source/common/expropt1.c
|
|
* harbour/source/common/expropt2.c
|
|
* harbour/source/common/hbver.c
|
|
* harbour/source/common/hbverdsp.c
|
|
* harbour/source/compiler/hbcomp.c
|
|
* harbour/source/vm/arrays.c
|
|
* harbour/source/vm/arrayshb.c
|
|
* harbour/source/vm/cmdarg.c
|
|
* harbour/source/vm/hvm.c
|
|
! fixed Harbour support for accessing string characters with array
|
|
index operators []
|
|
+ added support for #define HB_COMPAT_XHB - it's disabled by default.
|
|
When set it enables some of xHarbour features like negative array
|
|
indexes calculated from tail, accessing string characters with []
|
|
operators (warning it's not compatible with default Harbour version
|
|
enabled by -ks during compilation and //flags:s at runtime - in
|
|
xHarbour compatibility mode "ABC"[2] returns "B" when in Harbour 66)
|
|
and some other minor features.
|
|
|
|
* harbour/source/compiler/cmdcheck.c
|
|
* added support for optional setting C output type in -go switch
|
|
Now it accepts optional digit [0123] after -go in the same way
|
|
as -gc, f.e.: -go3
|
|
|
|
* harbour/source/compiler/harbour.c
|
|
* call hb_compExprLstDealloc() only when errors appeared during
|
|
compilation - it disable automatic freeing all allocated expressions
|
|
in clean compilation. I make it intentionally for easier detecting
|
|
problems one some expressions are not freed. So far the final cleanup
|
|
code always deallocated expressions what can hide some real bugs.
|
|
|
|
* harbour/source/vm/hvm.c
|
|
! fixed very serious bug in HVM closing. The s_uiActionRequest flag
|
|
was not cleared before hb_rddShutDown() so when RDD buffers were
|
|
hot and flushing required some PCODE evaluation (f.e. index KEY
|
|
or FOR expression) then they were not properly evaluated.
|
|
|
|
* harbour/source/vm/macro.c
|
|
* minor improvement
|
|
|
|
* harbour/utils/hbtest/rt_misc.prg
|
|
! fixed one of expected result, it was neither Harbour nor Clipper
|
|
result (I've just made some test with Clipper), I do not know why
|
|
it existed
|
|
|
|
2007-01-14 16:05 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
|
|
* harbour/source/macro/macro.y
|
|
* formatting
|
|
|
|
* harbour/source/vm/macro.c
|
|
! fixed macrocompiler for proper compilation of string with embedded
|
|
ASCII NUL byte (chr(0)), f.e.:
|
|
? &("'["+chr(0)+"]'")
|
|
|
|
2007-01-13 14:05 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
|
|
* harbour/contrib/rdd_ads/adsfunc.c
|
|
* harbour/source/rdd/workarea.c
|
|
* formatting
|
|
|
|
* harbour/include/hbapi.h
|
|
* harbour/source/vm/extend.c
|
|
+ added missing hb_storptrGC()
|
|
|
|
* harbour/include/hbapicdp.h
|
|
* harbour/source/rtl/cdpapi.c
|
|
+ added parameter to unicode translation function to protect control
|
|
code translation
|
|
* formatting
|
|
|
|
* harbour/source/rtl/gtsln/kbsln.c
|
|
* harbour/source/rtl/gtxwc/gtxwc.c
|
|
* use new unicode translation function format. It also fixes problem
|
|
with space translation in GTLSN used in UTF8 mode
|
|
|
|
* harbour/include/hbapiitm.h
|
|
* harbour/source/vm/itemapi.c
|
|
+ added hb_itemCopyToRef(), hb_itemMoveToRef(), hb_itemMoveRef(),
|
|
hb_itemUnRefWrite()
|
|
|
|
* harbour/include/hbexprb.c
|
|
! use HB_P_DUPLUNREF instead of HB_P_DUPLICATE when assign is used in
|
|
push context - Clipper compatible behavior, see:
|
|
x:=10
|
|
f(y:=iif(.t.,@x,))
|
|
? x, y
|
|
func f(x)
|
|
x+=100
|
|
return nil
|
|
|
|
* harbour/include/hbver.h
|
|
* harbour/source/common/hbver.c
|
|
* changed status to "devel"
|
|
|
|
* harbour/source/common/expropt2.c
|
|
* disabled setting NIL when iif(.t.,,sth()) is optimized to avoid
|
|
warning when iif() is used as statement - to fix number of parameters
|
|
passed to function in code like f(iif(.t.,,sth())) we will need a
|
|
little bit deeper modification
|
|
|
|
* harbour/source/compiler/complex.c
|
|
* added hack for potential problems caused by WITH OBJECT syntax, f.e.
|
|
in code like:
|
|
proc p(obj,x)
|
|
case:=myCaseClass():new()
|
|
retu:=myCaseClass():new()
|
|
WITH OBJECT obj
|
|
do case
|
|
case x==nil
|
|
case:value()
|
|
case:action()
|
|
retu:sth()
|
|
end
|
|
END
|
|
case:action()
|
|
retu:sth()
|
|
return
|
|
case:action(), case:value(), retu:sth() can means two different things
|
|
and compiler cannot guess which one should use. It cannot be fixed
|
|
because it's caused by bad WITH OBJECT syntax. In xHarbour constractions
|
|
like case:value() or retu:sth() are always used as in WITH OBJECT
|
|
context what is not Clipper compatible. I do not want to introduce
|
|
such limitations. We have two choices: change WITH OBJECT syntax or
|
|
add some hack to "hide" the problem a little bit. Now I intorduce
|
|
ugly hack which check number of spaces between ':' so
|
|
case :action()
|
|
is compiled as case condition using WITH OBJECT message and
|
|
case:action() as sending message to object in case variable
|
|
|
|
* harbour/source/compiler/harbour.y
|
|
* harbour/source/compiler/harbour.yyc
|
|
+ added support for passing base value to FOR EACH by reference.
|
|
|
|
* harbour/source/vm/arrays.c
|
|
* use hb_itemMoveRef() in AINS()/ADEL() to avoid creation of cyclic
|
|
reference chains
|
|
|
|
* harbour/source/vm/debug.c
|
|
* harbour/source/vm/memvars.c
|
|
* use hb_itemCopyToRef() to avoid creation of cyclic reference chains
|
|
|
|
* harbour/source/vm/classes.c
|
|
* harbour/source/vm/hvm.c
|
|
* use hb_itemMoveToRef() to avoid creation of cyclic reference chains
|
|
+ added support for for writable string enumerators, f.e.:
|
|
proc main()
|
|
local s, c
|
|
s:="abcdefghijklmnopqrst"
|
|
for each c in @s
|
|
if c$"aeio"
|
|
c:="*"
|
|
endif
|
|
next
|
|
? s // "*bcd*fgh*jklmn*pqrst"
|
|
return
|
|
|
|
2007-01-09 16:10 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
|
|
* harbour/harbour.spec
|
|
* harbour/include/hbver.h
|
|
* updated version number to 1.1.0
|
|
|
|
2007-01-09 15:34 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
|
|
* harbour/ChangeLog
|
|
+ harbour/ChangeLog.017
|
|
* new ChangeLog file created
|
|
* harbour/doc/whatsnew.txt
|
|
* harbour/harbour.spec
|
|
* harbour/include/hbver.h
|
|
* updated version number to 0.47.0
|
|
* tagged CVS as build47
|