ASC bug - re: Barbara THIAM's post

ASC bug - re: Barbara THIAM's post

Postby D Babin » Fri Oct 07, 2005 1:38 pm

Since the change in the fivetech forum I could not reply to Barbara's post.

However the following code worked flawlessly under FWH using Harbour Alpha build 44.0 and also using xHarbour build 99.3

// Test of ASC function

FUNCTION MAIN()

LOCAL n, cStr := "", lf := CHR(13)+CHR(10)

FOR n := 0 TO 255
cStr += LSTR( ASC(CHR(n)) )+IF(n%10=0,lf," - ")
NEXT


MSGINFO( cStr )

RETURN NIL


FUNCTION LSTR( val )
RETURN LTRIM(STR( val ))
User avatar
D Babin
 
Posts: 1
Joined: Fri Oct 07, 2005 1:32 pm
Location: Chicago - USA

Re: ASC bug - re: Barbara THIAM's post

Postby Badara Thiam » Thu Oct 13, 2005 8:24 am

Hello Mr Babin,
Hello Everybody,

I am testing xHarbour build 0.99.5, waiting new release of Harbour.
I get an executable, but when i run it, this message appears at first :

"ALERT.PRG was compiled by older version, PCODE version 5 is no longer supported - Please recompile."

Are the FWH 2.5 lib's not compatibles with xHarbour 0.99.5 ?

Regards,
Badara
Badara Thiam
 

Re: ASC bug - re: Barbara THIAM's post

Postby Enrico Maria Giordano » Thu Oct 13, 2005 9:11 am

You have to recompile *all* your PRGs and *all* FWH PRGs.

EMG
User avatar
Enrico Maria Giordano
 
Posts: 8246
Joined: Thu Oct 06, 2005 8:17 pm
Location: Roma - Italia

Re: ASC bug - re: Barbara THIAM's post

Postby Badara Thiam » Fri Oct 14, 2005 9:48 am

Hello EMG,

Can you tell me the betters compiler options to compile
all Fivewin for Harbour .prg with xHarbour in one pass (if possible) ?

I have some compiler errors with these options : "-l -n -w -m -gc0"

ie error :

"dbms.ch (84) Warning I0003 : No markers in repeatable group
[;#undef _Dbms_ ] - group will never be used."

Regards,
Badara
Badara Thiam
 

Re: ASC bug - re: Barbara THIAM's post

Postby Enrico Maria Giordano » Fri Oct 14, 2005 11:05 am

This is what I use:

SET HARBOURCMD=/a /es1 /gc0 /l /m /n /q /w

Anyway, you don't have to recompile the following PRGs:

expbuild.prg
db10.prg
odbc32.prg
dbm.prg
vbxctrl.prg
_index.prg
dbms.prg
ddeserv.prg
field.prg
tnewsins.prg
c3.prg

EMG
User avatar
Enrico Maria Giordano
 
Posts: 8246
Joined: Thu Oct 06, 2005 8:17 pm
Location: Roma - Italia

Re: ASC bug - re: Barbara THIAM's post

Postby Badara Thiam » Fri Oct 14, 2005 11:25 pm

Thanks Enrico.
Now i can run the program, but this code work bad :

*************
FUNCTION TEST()
**********
LOCAL cName := SPACE(10)
SET EXACT ON
IF cName = ""
MessageBox("OK : This work like Clipper")
ELSE
MessageBox("STOP : This work bad")
ENDIF
RETURN NIL

This is too hard...
(But i confirm, Asc() and ReadInsert() work fine with xHarbour 0.99.5)

Badara
http://www.icim.fr
Badara Thiam
 

Re: ASC bug - re: Barbara THIAM's post

Postby Enrico Maria Giordano » Sat Oct 15, 2005 8:23 am

This works fine for me:

*************
FUNCTION TEST()
**********
LOCAL cName := SPACE(10)
SET EXACT ON
IF cName = ""
? "OK : This work like Clipper"
ELSE
? "STOP : This work bad"
ENDIF
INKEY(0)
RETURN NIL

EMG
User avatar
Enrico Maria Giordano
 
Posts: 8246
Joined: Thu Oct 06, 2005 8:17 pm
Location: Roma - Italia

Re: ASC bug - re: Barbara THIAM's post

Postby Badara Thiam » Sat Oct 15, 2005 6:09 pm

With all these lib it's always impossible for me.
Perhaps the order of one lib ?

*********
e:\borland\bcc55\lib\c0w32.obj +
E:\MAINTEST\MAINTEST.obj +
, +
E:\MAINTEST\TEST.exe,, +
E:\PROGS\LIB32\Ace32.LIB +
E:\XHARBOU\XHARBO~1.BCC\LIB\rdd.LIB +
E:\XHARBOU\XHARBO~1.BCC\LIB\rddads.LIB +
+
E:\FWH\LIB\FIVEHX.LIB +
E:\FWH\LIB\FIVEHC.LIB +
+
E:\XHARBOU\XHARBO~1.BCC\LIB\DBFCDX.LIB +
E:\XHARBOU\XHARBO~1.BCC\LIB\DBFFPT.LIB +
E:\XHARBOU\XHARBO~1.BCC\LIB\DBFDBT.LIB +
E:\XHARBOU\XHARBO~1.BCC\LIB\DBFNTX.LIB +
E:\XHARBOU\XHARBO~1.BCC\LIB\rtl.LIB +
E:\XHARBOU\XHARBO~1.BCC\LIB\vm.LIB +
E:\XHARBOU\XHARBO~1.BCC\LIB\gtstd.LIB +
E:\XHARBOU\XHARBO~1.BCC\LIB\gtwin.LIB +
E:\XHARBOU\XHARBO~1.BCC\LIB\lang.LIB +
E:\XHARBOU\XHARBO~1.BCC\LIB\macro.LIB +
E:\XHARBOU\XHARBO~1.BCC\LIB\common.LIB +
E:\XHARBOU\XHARBO~1.BCC\LIB\pp.LIB +
E:\XHARBOU\XHARBO~1.BCC\LIB\codepage.LIB +
E:\XHARBOU\XHARBO~1.BCC\LIB\hbzip.LIB +
+
E:\XHARBOU\XHARBO~1.BCC\LIB\nulsys.LIB +
E:\XHARBOU\XHARBO~1.BCC\LIB\ct.LIB +
E:\XHARBOU\XHARBO~1.BCC\LIB\dllmain.LIB +
E:\XHARBOU\XHARBO~1.BCC\LIB\hbcc.LIB +
E:\XHARBOU\XHARBO~1.BCC\LIB\hbodbc.LIB +
E:\XHARBOU\XHARBO~1.BCC\LIB\optcon.LIB +
E:\XHARBOU\XHARBO~1.BCC\LIB\optgui.LIB +
E:\XHARBOU\XHARBO~1.BCC\LIB\tip.LIB +
E:\XHARBOU\XHARBO~1.BCC\LIB\libmisc.LIB +
E:\XHARBOU\XHARBO~1.BCC\LIB\libnf.LIB +
E:\XHARBOU\XHARBO~1.BCC\LIB\whoo.LIB +
E:\XHARBOU\XHARBO~1.BCC\LIB\design.LIB +
E:\XHARBOU\XHARBO~1.BCC\LIB\html.LIB +
E:\XHARBOU\XHARBO~1.BCC\LIB\internet.LIB +
E:\XHARBOU\XHARBO~1.BCC\LIB\what32.LIB +
E:\XHARBOU\XHARBO~1.BCC\LIB\telepath.LIB +
E:\XHARBOU\XHARBO~1.BCC\LIB\xwt.LIB +
E:\XHARBOU\XHARBO~1.BCC\LIB\wvtgui.LIB +
+
E:\BORLAND\BCC55\LIB\cw32.LIB +
E:\BORLAND\BCC55\LIB\import32.LIB +
E:\BORLAND\BCC55\LIB\psdk\odbc32.LIB +
E:\BORLAND\BCC55\LIB\psdk\nddeapi.LIB +
E:\BORLAND\BCC55\LIB\psdk\iphlpapi.LIB +
E:\BORLAND\BCC55\LIB\psdk\rasapi32.LIB
***********
Badara Thiam
 

Re: ASC bug - re: Barbara THIAM's post

Postby Enrico Maria Giordano » Sat Oct 15, 2005 6:20 pm

What is the exact error message you get?

EMG
User avatar
Enrico Maria Giordano
 
Posts: 8246
Joined: Thu Oct 06, 2005 8:17 pm
Location: Roma - Italia

Re: ASC bug - re: Barbara THIAM's post

Postby Badara Thiam » Sat Oct 15, 2005 7:00 pm

No error message now.

When there is SET EXACT ON, a cVariable with space(s),
like cVar := " ", is not equal to "" for xHarbour.
When SET EXACT OFF, it's ok, " " = "".
With Clipper, " " = "", always.

Badara
Badara Thiam
 

Re: ASC bug - re: Barbara THIAM's post

Postby Enrico Maria Giordano » Sat Oct 15, 2005 8:44 pm

From your sample

*************
FUNCTION TEST()
**********
LOCAL cName := SPACE(10)
SET EXACT ON
IF cName = ""
? "OK : This work like Clipper"
ELSE
? "STOP : This work bad"
ENDIF
INKEY(0)
RETURN NIL

I get

"OK : This work like Clipper"

using the latest xHarbour from CVS.

EMG
User avatar
Enrico Maria Giordano
 
Posts: 8246
Joined: Thu Oct 06, 2005 8:17 pm
Location: Roma - Italia

Re: ASC bug - re: Barbara THIAM's post

Postby Badara Thiam » Sun Oct 16, 2005 10:04 am

Hello EMG,

Thanks for your answer. When post the message below
to "join@xharbour.org", i get a non-delivery message :
"Invalid final delivery userid: patrick@xharbour.com".

**************
Hello,
I am Fivewin user and i want to join the xHarbour team
and access to the developpers mailing list and CVS.

I want help you to extract all bugs from xHarbour,
by report you all problems found.

Regards,
Badara Thiam
Author of ICIM Sofware
Contact : tb@icim.fr
Site internet : http://www.icim.fr

**************
Badara Thiam
 

Re: ASC bug - re: Barbara THIAM's post

Postby Enrico Maria Giordano » Sun Oct 16, 2005 10:11 am

I just forward your message to the xHarbour developer's list.

EMG
User avatar
Enrico Maria Giordano
 
Posts: 8246
Joined: Thu Oct 06, 2005 8:17 pm
Location: Roma - Italia

Re: ASC bug - re: Barbara THIAM's post

Postby Enrico Maria Giordano » Sun Oct 16, 2005 5:32 pm

And this is the answer from Ron Pinkas:

"You may tell Badara, that he may report any issues on the
xHarbour.Unstable.CVS NG which is the forum dedicated to such activity. IOTH
he has development plans, please ask him to forward an email with his
development proposals. xHarbour is always interested in additional
developers, but otherwise the Developers list dedicated to Developers only."

EMG
User avatar
Enrico Maria Giordano
 
Posts: 8246
Joined: Thu Oct 06, 2005 8:17 pm
Location: Roma - Italia

Re: ASC bug - re: Barbara THIAM's post

Postby Badara Thiam » Mon Oct 17, 2005 7:57 am

Enrico,

This is my response to Ron Pinkas

------------
Ron,

My actual developpement plan is to obtain the latest xHarbour lib and bin possible to test with my several code lines, to be sure xHarbour has no others very important bugs.

Today i can't continue my tests because " " is not equal to ""
when Set Exact is On, with the version of xHarbour i use.
I could give you others informations to debug xHarbour today,
if the latest update was in my pc.

It's not only for help you, i am before all interested to create the 32 bit version of my sofware.

If i can accelerate the processus of developpement of [x]Harbour,
tell me how please. If i must wait few months to test again, i think
this is not the better way.

The first project of developpement in my head is :
Give to [x]Harbour the real ability to work exactly like Clipper,
where Clipper do what [x]Harbour do. I am not interested
by others projects of [x]Harbour today.

Just Clipper -> [x]Harbour compatibility.

My source code writted in Clipper 5.3b is 235000 lines big. If a bug
is not fixed, i am sure it occur in my code. My tests have, and can again,
greatly help to increase the reliability of [x]Harbour.

Regards,
Badara Thiam
http://www.icim.fr
Badara Thiam
 

Next

Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 13 guests