[Bug testsuite/17120] New: tcl testsuite error in gtod.exp/prcwildcard.exp

["dsmith at redhat dot com" <sourceware-bugzilla at sourceware dot org>]

https://sourceware.org/bugzilla/show_bug.cgi?id=17120

            Bug ID: 17120
           Summary: tcl testsuite error in gtod.exp/prcwildcard.exp
           Product: systemtap
           Version: unspecified
            Status: NEW
          Severity: normal
          Priority: P2
         Component: testsuite
          Assignee: systemtap at sourceware dot org
          Reporter: dsmith at redhat dot com

On 3.10.0-123.el7.s390x, I'm seeing the following oddity. When run by itself,
prcwildcard.exp works fine:

====
# make installcheck RUNTESTFLAGS=prcwildcard.exp
... stuff deleted ...
Native configuration is s390x-ibm-linux

        === systemtap tests ===

Schedule of variations:
    unix

Running target unix
Using /usr/share/dejagnu/baseboards/unix.exp as board description file for
target.
Using /usr/share/dejagnu/config/unix.exp as generic interface file for target.
Using ../../src/testsuite/config/unix.exp as tool-and-target-specific interface
file.

Host: Linux ibm-z10-73.rhts.eng.bos.redhat.com 3.10.0-123.el7.s390x #1 SMP Mon
May 5 11:18:08 EDT 2014 s390x s390x s390x GNU/Linux
Snapshot: version 2.6/0.158, commit release-2.5-206-gcbaf758e2ba0 + changes
GCC: 4.8.2 [gcc (GCC) 4.8.2 20140120 (Red Hat 4.8.2-16)]
Distro: Red Hat Enterprise Linux Server release 7.0 (Maipo)
SElinux: Enforcing


Running ../../src/testsuite/systemtap.base/prcwildcard.exp ...

        === systemtap Summary ===

# of expected passes        2
====

However when I run prcwildcard.exp with gtod.exp (as in a full testsuite run):

====
[root@ibm-z10-73 s390x]# make installcheck RUNTESTFLAGS="gtod.exp
prcwildcard.exp"
... stuff deleted ...
Native configuration is s390x-ibm-linux

        === systemtap tests ===

Schedule of variations:
    unix

Running target unix
Using /usr/share/dejagnu/baseboards/unix.exp as board description file for
target.
Using /usr/share/dejagnu/config/unix.exp as generic interface file for target.
Using ../../src/testsuite/config/unix.exp as tool-and-target-specific interface
file.

Host: Linux ibm-z10-73.rhts.eng.bos.redhat.com 3.10.0-123.el7.s390x #1 SMP Mon
May 5 11:18:08 EDT 2014 s390x s390x s390x GNU/Linux
Snapshot: version 2.6/0.158, commit release-2.5-206-gcbaf758e2ba0 + changes
GCC: 4.8.2 [gcc (GCC) 4.8.2 20140120 (Red Hat 4.8.2-16)]
Distro: Red Hat Enterprise Linux Server release 7.0 (Maipo)
SElinux: Enforcing


Running ../../src/testsuite/systemtap.base/gtod.exp ...
Running ../../src/testsuite/systemtap.base/prcwildcard.exp ...
ERROR: tcl error sourcing ../../src/testsuite/systemtap.base/prcwildcard.exp.
ERROR: can't set "count": variable is array
    while executing
"set count 0"
    invoked from within
"if {[stripped_p $stap_path]} {
    untested $test
} else {
    spawn stap -L "process(\"$stap_path\").function(\"*\")"
    set count 0
    expect {
    -..."
    (file "../../src/testsuite/systemtap.base/prcwildcard.exp" line 5)
    invoked from within
"source ../../src/testsuite/systemtap.base/prcwildcard.exp"
    ("uplevel" body line 1)
    invoked from within
"uplevel #0 source ../../src/testsuite/systemtap.base/prcwildcard.exp"
    invoked from within
"catch "uplevel #0 source $test_file_name""

        === systemtap Summary ===

# of expected passes        3
make[2]: Leaving directory `/root/s390x/testsuite'
if test -n ""; then mail  < systemtap.sum; fi
make[1]: Leaving directory `/root/s390x/testsuite'
====

It looks like that since gtod.exp has a variable named 'count' that is an array
and prcwildcard.exp has a variable named 'count' that isn't an array, we get
this error.

-- 
You are receiving this mail because:
You are the assignee for the bug.