Learn how easy it is to sync an existing GitHub or Google Code repo to a SourceForge project! See Demo

Close

#566 tk 8.1 test suite failures

obsolete: 8.1
closed-fixed
nobody
99. Other (73)
2
2000-10-31
2000-10-31
Brent B. Welch
No

OriginalBugID: 1977 Bug
Version: 8.1
SubmitDate: '1999-05-04'
LastModified: '1999-08-14'
Severity: MED
Status: Released
Submitter: pat
ChangedBy: hobbs
OS: Solaris
OSVersion: 2.6 and CDE
Machine: Other
FixedDate: '1999-08-14'
FixedInVersion: 8.2

Name:
Larry W. Virden

Extensions:
none

CustomShell:
none

ReproducibleScript:
configure
make all test

ObservedBehavior:
The following test suite tests failed:

clipboard.test

==== clipboard-6.2 Tk_ClipboardAppend procedure FAILED
==== Contents of test case:

setupbg
clipboard clear
clipboard append -f INTEGER -t TEST "16"
set result [dobg {selection get -s CLIPBOARD TEST}]
cleanupbg
set result

---- Result was:
CLIPBOARD selection doesn't exist or form "TEST" not defined
---- Result should have been:
0x10
==== clipboard-6.2 FAILED

focus.test

==== focus-5.1 ChangeXFocus procedure, don't take focus unless have it
FAILED
==== Contents of test case:

focusSetup
focus -force .t
update
set result [focus]
send [dobg {tk appname}] {focus -force .; update}
lappend result [focus]
focus .t.b2
update
lappend result [focus]

---- Result was:
.t .t {}
---- Result should have been:
.t {} {}
==== focus-5.1 FAILED

focusTcl.test
font.test

==== font-46.4 TkFontGetAliasList: match FAILED
==== Contents of test case:

font actual {{times new roman} 10} -family

---- Result was:
times new roman
---- Result should have been:
times
==== font-46.4 FAILED

unixFont.test

==== unixfont-2.2 TkpGetFontFromAttributes procedure: Times relatives
FAILED
==== Contents of test case:

set x {}
lappend x [lindex [font actual {-family "Times New Roman"}] 1]
lappend x [lindex [font actual {-family "New York"}] 1]
lappend x [lindex [font actual {-family "Times"}] 1]

---- Result was:
{times new roman} times times
---- Result should have been:
times times times
==== unixfont-2.2 FAILED

==== unixfont-2.3 TkpGetFontFromAttributes procedure: Courier relatives
FAILED
==== Contents of test case:

set x {}
lappend x [lindex [font actual {-family "Courier New"}] 1]
lappend x [lindex [font actual {-family "Monaco"}] 1]
lappend x [lindex [font actual {-family "Courier"}] 1]

---- Result was:
{courier new} courier courier
---- Result should have been:
courier courier courier
==== unixfont-2.3 FAILED

==== unixfont-2.4 TkpGetFontFromAttributes procedure: Helvetica
relatives FAILED
==== Contents of test case:

set x {}
lappend x [lindex [font actual {-family "Arial"}] 1]
lappend x [lindex [font actual {-family "Geneva"}] 1]
lappend x [lindex [font actual {-family "Helvetica"}] 1]
---- Result was:
arial helvetica helvetica
---- Result should have been:
helvetica helvetica helvetica
==== unixfont-2.4 FAILED

Tests ended at Mon May 03 11:19:35 EDT 1999
all.tcl: Total 6539 Passed 6112 Skipped 421 Failed
6
Sourced 83 Test Files.
Files with failing tests: clipboard.test focus.test font.test
unixFont.test
Number of tests skipped for each constraint:
2 altDisplay
2 emptyTest
44 macOnly
11 macOrPc
1 nonPOrtable
131 nonPortable
229 pcOnly
1 userInteraction

DesiredBehavior:
All test suite tests pass.

None of the above errors occur for us when running a make test
on Solaris 5.7 with 8.2.0.
-- 08/14/1999 hobbs

Discussion

  • Brent B. Welch
    Brent B. Welch
    2000-10-31

    • priority: 5 --> 2
    • status: open --> closed-fixed