Bug 15407

Summary: AB-INT PTEST: tcl io.test test failure
Product: [QA/Testing] Package Testing (ptest) Reporter: João Marcos Costa <joaomarcos.costa>
Component: ptestAssignee: Ross Burton <ross.burton>
Status: RESOLVED FIXED QA Contact:
Severity: normal    
Priority: Medium+ CC: randy.macleod
Version: unspecified   
Target Milestone: 5.2 M1   
Hardware: x86   
OS: Multiple   
Whiteboard: AB-INT
OS type for building Yocto: --- Type of Regression: ---
Verified: Documentation change: Don't know

Description João Marcos Costa 2024-02-22 13:53:53 UTC 
https://autobuilder.yoctoproject.org/typhoon/#/builders/81/builds/6302/steps/12/logs/stdio

Failed ptests:
{'tcl': ['io.test']}

qemux86-64-ptest fedora38-ty-4
Comment 1 João Marcos Costa 2024-03-06 12:08:24 UTC 
https://autobuilder.yoctoproject.org/typhoon/#/builders/82/builds/6145/steps/13/logs/stdio

qemuarm64-ptest ubuntu1804-arm-1
Comment 2 Ross Burton 2024-03-21 17:32:39 UTC 
==== io-46.1 Tcl event loop vs multiple interpreters FAILED
Comment 3 Ross Burton 2024-03-21 20:12:00 UTC 
.
Comment 4 Ross Burton 2024-03-21 20:12:11 UTC 
Patch on the list.
Comment 5 Ross Burton 2024-04-30 15:40:38 UTC 
Fixed with 1617b98491c5293567674e4b9c49c2017fb5c8b2.
Comment 6 João Marcos Costa 2024-09-20 09:47:16 UTC 
Reopening, since it happened again. This time for 'io-13.6' rather than 'io-46.1' (fixed by Ross's patch).

https://autobuilder.yoctoproject.org/typhoon/#/builders/82/builds/6833/steps/13/logs/stdio

qemuarm64-ptest ubuntu1804-arm-1


==== io-13.6 TranslateInputEOL: auto mode: saw cr in last segment FAILED
==== Contents of test case:

    # (chanPtr->flags & INPUT_SAW_CR)
    # This test may fail on slower machines.

    set f [open "|[list [interpreter] $path(cat)]" w+]
    fconfigure $f -blocking 0 -buffering none -translation {auto lf}

    fileevent $f read [namespace code "ready $f"]
    proc ready {f} {
	variable x
	lappend x [read $f] [testchannel queuedcr $f]
    }
    variable x {}
    variable y {}

    puts -nonewline $f "abcdefghj\r"
    after 500 [namespace code {set y ok}]
    vwait [namespace which -variable y]

    puts -nonewline $f "\n01234"
    after 500 [namespace code {set y ok}]
    vwait [namespace which -variable y]

    close $f
    set x

---- Result was:
{abcdefghj
01234} 0
---- Result should have been (exact matching):
{abcdefghj
} 1 01234 0
==== io-13.6 FAILED


Tests ended at Thu Sep 19 13:26:30 BST 2024
all.tcl:	Total	830	Passed	815	Skipped	14	Failed	1
Sourced 1 Test Files.
Files with failing tests: io.test
Number of tests skipped for each constraint:
	8	emptyTest
	2	nonPortable
	1	thread
	2	win
FAIL: io.test
Comment 7 Stephen K Jolley 2024-09-26 14:40:24 UTC 
Ross Accepted this.
Comment 8 Ross Burton 2024-10-14 12:22:51 UTC 
Another patch on the list.
Comment 9 Ross Burton 2024-11-19 13:00:46 UTC 
Fixed with oe-core f69183586655294c9aed6687cebe57767c2f3eb8.