With you undo correct 1 problem but generate the next problems
Please review with previous code, thanks ( you can test with hbtest.exe )
! 2913 MAIN_MISC(194) ( o:colorSpec := "T"
Result: "T,T,T,T"
Expected: "N/N,N/N,N/N,N/N"
! 2914 MAIN_MISC(195) ( o:colorSpec := "A"
Result: "A,A,A,A"
Expected: "N/N,N/N,N/N,N/N"
! 2915 MAIN_MISC(196) ( o:colorSpec := "B"
Result: "B,B,B,B"
Expected: "B/N,B/N,B/N,B/N"
! 2916 MAIN_MISC(197) ( o:colorSpec := "C"
Result: "C,C,C,C"
Expected: "N/N,N/N,N/N,N/N"
! 2917 MAIN_MISC(198) ( o:colorSpec := "D"
Result: "D,D,D,D"
Expected: "N/N,N/N,N/N,N/N"
! 2918 MAIN_MISC(199) ( o:colorSpec := "E"
Result: "E,E,E,E"
Expected: "N/N,N/N,N/N,N/N"
! 2919 MAIN_MISC(200) ( o:colorSpec := "F"
Result: "F,F,F,F"
Expected: "N/N,N/N,N/N,N/N"
! 2920 MAIN_MISC(201) ( o:colorSpec := "G"
Result: "G,G,G,G"
Expected: "G/N,G/N,G/N,G/N"
! 2921 MAIN_MISC(202) ( o:colorSpec := "H"
Result: "H,H,H,H"
Expected: "N/N,N/N,N/N,N/N"
! 2922 MAIN_MISC(203) ( o:colorSpec := "I"
Result: "I,I,I,I"
Expected: "N/W,N/W,N/W,N/W"
! 2923 MAIN_MISC(204) ( o:colorSpec := "J"
Result: "J,J,J,J"
Expected: "N/N,N/N,N/N,N/N"
! 2924 MAIN_MISC(205) ( o:colorSpec := "K"
Result: "K,K,K,K"
Expected: "N/N,N/N,N/N,N/N"
! 2925 MAIN_MISC(206) ( o:colorSpec := "L"
Result: "L,L,L,L"
Expected: "N/N,N/N,N/N,N/N"
! 2926 MAIN_MISC(207) ( o:colorSpec := "M"
Result: "M,M,M,M"
Expected: "N/N,N/N,N/N,N/N"
! 2927 MAIN_MISC(208) ( o:colorSpec := "N"
Result: "N,N,N,N"
Expected: "N/N,N/N,N/N,N/N"
! 2928 MAIN_MISC(209) ( o:colorSpec := "O"
Result: "O,O,O,O"
Expected: "N/N,N/N,N/N,N/N"
! 2929 MAIN_MISC(210) ( o:colorSpec := "P"
Result: "P,P,P,P"
Expected: "N/N,N/N,N/N,N/N"
! 2930 MAIN_MISC(211) ( o:colorSpec := "Q"
Result: "Q,Q,Q,Q"
Expected: "N/N,N/N,N/N,N/N"
! 2931 MAIN_MISC(212) ( o:colorSpec := "R"
Result: "R,R,R,R"
Expected: "R/N,R/N,R/N,R/N"
! 2932 MAIN_MISC(213) ( o:colorSpec := "S"
Result: "S,S,S,S"
Expected: "N/N,N/N,N/N,N/N"
! 2933 MAIN_MISC(214) ( o:colorSpec := "T"
Result: "T,T,T,T"
Expected: "N/N,N/N,N/N,N/N"
! 2934 MAIN_MISC(215) ( o:colorSpec := "U"
Result: "U,U,U,U"
Expected: "U/N,U/N,U/N,U/N"
! 2935 MAIN_MISC(216) ( o:colorSpec := "V"
Result: "V,V,V,V"
Expected: "N/N,N/N,N/N,N/N"
! 2936 MAIN_MISC(217) ( o:colorSpec := "W"
Result: "W,W,W,W"
Expected: "W/N,W/N,W/N,W/N"
! 2937 MAIN_MISC(218) ( o:colorSpec := "X"
Result: "X,X,X,X"
Expected: "N/N,N/N,N/N,N/N"
! 2938 MAIN_MISC(219) ( o:colorSpec := "Y"
Result: "Y,Y,Y,Y"
Expected: "N/N,N/N,N/N,N/N"
! 2939 MAIN_MISC(220) ( o:colorSpec := "Z"
Result: "Z,Z,Z,Z"
Expected: "N/N,N/N,N/N,N/N"
! 2940 MAIN_MISC(221) ( o:colorSpec := "0"
Result: "0,0,0,0"
Expected: "N/N,N/N,N/N,N/N"
! 2941 MAIN_MISC(222) ( o:colorSpec := "1"
Result: "1,1,1,1"
Expected: "B/N,B/N,B/N,B/N"
! 2942 MAIN_MISC(223) ( o:colorSpec := "2"
Result: "2,2,2,2"
Expected: "G/N,G/N,G/N,G/N"
! 2943 MAIN_MISC(224) ( o:colorSpec := "3"
Result: "3,3,3,3"
Expected: "BG/N,BG/N,BG/N,BG/N"
! 2944 MAIN_MISC(225) ( o:colorSpec := "4"
Result: "4,4,4,4"
Expected: "R/N,R/N,R/N,R/N"
! 2945 MAIN_MISC(226) ( o:colorSpec := "5"
Result: "5,5,5,5"
Expected: "BR/N,BR/N,BR/N,BR/N"
! 2946 MAIN_MISC(227) ( o:colorSpec := "6"
Result: "6,6,6,6"
Expected: "GR/N,GR/N,GR/N,GR/N"
! 2947 MAIN_MISC(228) ( o:colorSpec := "7"
Result: "7,7,7,7"
Expected: "W/N,W/N,W/N,W/N"
! 2948 MAIN_MISC(229) ( o:colorSpec := "8"
Result: "8,8,8,8"
Expected: "N+/N,N+/N,N+/N,N+/N"
! 2949 MAIN_MISC(230) ( o:colorSpec := "9"
Result: "9,9,9,9"
Expected: "B+/N,B+/N,B+/N,B+/N"
! 2950 MAIN_MISC(231) ( o:colorSpec := "10"
Result: "10,10,10,10"
Expected: "G+/N,G+/N,G+/N,G+/N"
! 2951 MAIN_MISC(232) ( o:colorSpec := "11"
Result: "11,11,11,11"
Expected: "BG+/N,BG+/N,BG+/N,BG+/N"
! 2952 MAIN_MISC(233) ( o:colorSpec := "12"
Result: "12,12,12,12"
Expected: "R+/N,R+/N,R+/N,R+/N"
! 2953 MAIN_MISC(234) ( o:colorSpec := "13"
Result: "13,13,13,13"
Expected: "BR+/N,BR+/N,BR+/N,BR+/N"
! 2954 MAIN_MISC(235) ( o:colorSpec := "14"
Result: "14,14,14,14"
Expected: "GR+/N,GR+/N,GR+/N,GR+/N"
! 2955 MAIN_MISC(236) ( o:colorSpec := "15"
Result: "15,15,15,15"
Expected: "W+/N,W+/N,W+/N,W+/N"
! 2956 MAIN_MISC(237) ( o:colorSpec := "16"
Result: "16,16,16,16"
Expected: "N/N,N/N,N/N,N/N"
! 2957 MAIN_MISC(238) ( o:colorSpec := "@"
Result: "@,@,@,@"
Expected: "N/N,N/N,N/N,N/N"
! 2958 MAIN_MISC(239) ( o:colorSpec := "!"
Result: "!,!,!,!"
Expected: "N/N,N/N,N/N,N/N"
! 2959 MAIN_MISC(240) ( o:colorSpec := "-"
Result: "-,-,-,-"
Expected: "N/N,N/N,N/N,N/N"
! 2960 MAIN_MISC(241) ( o:colorSpec := "/"
Result: "/,/,/,/"
Expected: "N/N,N/N,N/N,N/N"
! 2961 MAIN_MISC(242) ( o:colorSpec := "//"
Result: "//,//,//,//"
Expected: "N/N,N/N,N/N,N/N"
! 2962 MAIN_MISC(243) ( o:colorSpec := ","
Result: ",,,,,,,"
Expected: "N/N,N/N,N/N,N/N"
! 2963 MAIN_MISC(244) ( o:colorSpec := ",,"
Result: ",,,,"
Expected: "N/N,N/N,N/N,N/N"
! 2964 MAIN_MISC(245) ( o:colorSpec := "+"
Result: "+,+,+,+"
Expected: "N+/N,N+/N,N+/N,N+/N"
! 2965 MAIN_MISC(247) ( o:colorSpec := "+*"
Result: "+*,+*,+*,+*"
Expected: "N+/N*,N+/N*,N+/N*,N+/N*"
! 2966 MAIN_MISC(248) ( o:colorSpec := "*"
Result: "*,*,*,*"
Expected: "N/N*,N/N*,N/N*,N/N*"
! 2967 MAIN_MISC(249) ( o:colorSpec := "*+"
Result: "*+,*+,*+,*+"
Expected: "N+/N*,N+/N*,N+/N*,N+/N*"
! 2968 MAIN_MISC(255) ( o:colorSpec := "BR/W+"
Result: "BR/W+,BR/W+,BR/W+,BR/W+"
Expected: "BR+/W,BR+/W,BR+/W,BR+/W"
! 2969 MAIN_MISC(256) ( o:colorSpec := "BR/W+"
Result: "BR/W+,BR/W+,BR/W+,BR/W+"
Expected: "BR+/W,BR+/W,BR+/W,BR+/W"
! 2970 MAIN_MISC(257) ( o:colorSpec := "RB/W+"
Result: "RB/W+,RB/W+,RB/W+,RB/W+"
Expected: "BR+/W,BR+/W,BR+/W,BR+/W"
! 2971 MAIN_MISC(258) ( o:colorSpec := "0123456789"
Result: "0123456789,0123456789,0123456789,0123456789"
Expected: "BR/N,BR/N,BR/N,BR/N"
! 2972 MAIN_MISC(259) ( o:colorSpec := "1234567890"
Result: "1234567890,1234567890,1234567890,1234567890"
Expected: "G/N,G/N,G/N,G/N"
! 2973 MAIN_MISC(260) ( o:colorSpec := "1"
Result: "1,1,1,1"
Expected: "B/N,B/N,B/N,B/N"
! 2974 MAIN_MISC(261) ( o:colorSpec := "11"
Result: "11,11,11,11"
Expected: "BG+/N,BG+/N,BG+/N,BG+/N"
! 2975 MAIN_MISC(262) ( o:colorSpec := "1111111111"
Result: "1111111111,1111111111,1111111111,1111111111"
Expected: "W/N,W/N,W/N,W/N"
! 2976 MAIN_MISC(263) ( o:colorSpec := "2"
Result: "2,2,2,2"
Expected: "G/N,G/N,G/N,G/N"
! 2977 MAIN_MISC(264) ( o:colorSpec := "22"
Result: "22,22,22,22"
Expected: "GR/N,GR/N,GR/N,GR/N"
! 2978 MAIN_MISC(265) ( o:colorSpec := "2222222222"
Result: "2222222222,2222222222,2222222222,2222222222"
Expected: "GR+/N,GR+/N,GR+/N,GR+/N"
! 2979 MAIN_MISC(266) ( o:colorSpec := "ABCDEFGHIJKLMNOPQRSTUV
Result:
"ABCDEFGHIJKLMNOPQRSTUVWXYZ,ABCDEFGHIJKLMNOPQRSTUVWXYZ,ABCDEFGHIJKLMNOPQRSTUVWXYZ,ABCDEFGHIJKLMNOPQRSTUVWXYZ"
Expected: "N/N,N/N,N/N,N/N"
! 2980 MAIN_MISC(267) ( o:colorSpec := "ABCDEFGHIJKLMNOPQRSTUV
Result:
"ABCDEFGHIJKLMNOPQRSTUVW,ABCDEFGHIJKLMNOPQRSTUVW,ABCDEFGHIJKLMNOPQRSTUVW,ABCDEFGHIJKLMNOPQRSTUVW"
Expected: "N/U,N/U,N/U,N/U"
! 2981 MAIN_MISC(268) ( o:colorSpec := "N/W+"
Result: "N/W+,N/W+,N/W+,N/W+"
Expected: "N+/W,N+/W,N+/W,N+/W"
! 2982 MAIN_MISC(269) ( o:colorSpec := '"W"'+"/"+'"R"'
Result: ""W"/"R","W"/"R","W"/"R","W"/"R""
Expected: "W/R,W/R,W/R,W/R"
! 2983 MAIN_MISC(270) ( o:colorSpec := "'W'"+"/"+"'R'"
Result: "'W'/'R','W'/'R','W'/'R','W'/'R'"
Expected: "W/R,W/R,W/R,W/R"
Eduardo Fernandes escribió:
> * source/rtl/tget.prg
> * restored buildgetcolor() function from previous version (1.145).
>
> regards,
> Eduardo
>
>
> Veja quais são os assuntos do momento no Yahoo! +Buscados
> http://br.maisbuscados.yahoo.com
>
> -------------------------------------------------------------------------
> This SF.Net email is sponsored by the Moblin Your Move Developer's challenge
> Build the coolest Linux based applications with Moblin SDK & win great prizes
> Grand prize is a trip for two to an Open Source event anywhere in the world
> http://moblin-contest.org/redirect.php?banner_id=100&url=/
> _______________________________________________
> xHarbour-developers mailing list
> xHarbour-developers@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/xharbour-developers
>
> __________ Información de ESET NOD32 Antivirus, versión de la base de firmas
> de virus 3652 (20081130) __________
>
> ESET NOD32 Antivirus ha comprobado este mensaje.
> http://www.eset.com
>
>
>
>
-------------------------------------------------------------------------
This SF.Net email is sponsored by the Moblin Your Move Developer's challenge
Build the coolest Linux based applications with Moblin SDK & win great prizes
Grand prize is a trip for two to an Open Source event anywhere in the world
http://moblin-contest.org/redirect.php?banner_id=100&url=/
_______________________________________________
xHarbour-developers mailing list
xHarbour-developers@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/xharbour-developers
