Valtype and type show differrent result (sample below). Who is wrong me,
valtype or type?
FUNCTION main( )
LOCAL str_sep := "()", yy_sep, xx_sep, xy
local str_arr:='("ID","C",1,0)("CVAR","C",20,0)("ZVAR","C",100,0)'
xx_sep := NumToken( str_arr, str_sep )
for ii := 1 TO xx_sep
ss := token( str_arr, str_sep, ii )
?ss
yy_sep := NumToken( ss, "," )
IF yy_sep == 4
for y := 1 TO yy_sep
xy := token(ss,",",y)
?y,xy,valtype(xy),type(xy)
next
ENDIF
next
RETURN nil
My result is
C:\hrb\test\token\>testtoken.exe
"ID","C",1,0
1 "ID" C C
2 "C" C C
3 1 C N
4 0 C N
"CVAR","C",20,0
1 "CVAR" C C
2 "C" C C
3 20 C N
4 0 C N
"ZVAR","C",100,0
1 "ZVAR" C C
2 "C" C C
3 100 C N
4 0 C N
Regards,
Alexey Myronenko
_______________________________________________
Harbour mailing list (attachment size limit: 40KB)
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour