Tcl Source Code

Artifact [9a77db07e9]
Login

Artifact 9a77db07e92011b1a8c8f2f731329c5bf3289e64:

Attachment "pid.errs" to ticket [678412ffff] added by kennykb 2003-02-01 04:48:11.
pid.test

==== pid-1.2 pid command FAILED
==== Contents of test case:

    set f [open [format {| echo foo | cat >%s} $path(test1)] w]
    set pids [pid $f]
    close $f
    catch {removeFile test1}
    list [llength $pids] [regexp {^[0-9]+$} [lindex $pids 0]]  [regexp {^[0-9]+$} [lindex $pids 1]]  [expr {[lindex $pids 0] == [lindex $pids 1]}]

---- Result was:
/cygdrive/c/Program Files/cygwin/bin/cat: and: No such file or directory
/cygdrive/c/Program Files/cygwin/bin/cat: Settings/kennykb/My: No such file or directory
/cygdrive/c/Program Files/cygwin/bin/cat: Documents/SourceForge/tcl/win/test1: No such file or directory
---- Result should have been (exact matching):
2 1 1 0
---- Test generated error; Return code was: 1
---- Return code should have been one of: 0 2
==== pid-1.2 FAILED