Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | 2 pcOnly tests require c drive to be shared, so I added a sharedCdrive constraint. |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | core-8-1-branch-old |
| Files: | files | file ages | folders |
| SHA1: |
eae342ae0831066b9b11640932c27a6b |
| User & Date: | hershey 1999-04-06 22:01:43 |
Context
|
1999-04-07
| ||
| 00:05 | Decreased the timeout for DDE. check-in: ef9fdecc87 user: redman tags: core-8-1-branch-old | |
|
1999-04-06
| ||
| 22:01 | 2 pcOnly tests require c drive to be shared, so I added a sharedCdrive constraint. check-in: eae342ae08 user: hershey tags: core-8-1-branch-old | |
| 20:59 | Adjusted error reporting in TclpRename to better handle common error condition on IRIX. The change... check-in: b03aba6368 user: rjohnson tags: core-8-1-branch-old | |
Changes
Changes to tests/fileName.test.
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
....
1375
1376
1377
1378
1379
1380
1381
1382
1383
1384
1385
1386
1387
1388
1389
1390
1391
1392
1393
1394
1395
1396
1397
1398
|
# # Copyright (c) 1995-1996 Sun Microsystems, Inc. # Copyright (c) 1999 by Scriptics Corporation. # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # # RCS: @(#) $Id: fileName.test,v 1.1.2.8 1999/04/06 20:21:25 stanton Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { source [file join [pwd] [file dirname [info script]] defs.tcl] } if {[info commands testsetplatform] == {}} { puts "This application hasn't been compiled with the \"testsetplatform\"" ................................................................................ test filename-16.10 {windows specific globbing} {pcOnly} { lsort [glob c:globTest\\\\*.bat] } {c:globTest/x1.BAT c:globTest/y1.Bat c:globTest/z1.bat} test filename-16.11 {windows specific globbing} {pcOnly} { lsort [glob c:\\\\globTest\\\\*.bat] } {c:/globTest/x1.BAT c:/globTest/y1.Bat c:/globTest/z1.bat} test filename-16.12 {windows specific globbing} {pcOnly} { cd //[info hostname]/c removeDirectory globTest makeDirectory globTest close [open globTest/x1.BAT w] close [open globTest/y1.Bat w] close [open globTest/z1.bat w] glob //[info hostname]/c/*Test } //[info hostname]/c/globTest test filename-16.13 {windows specific globbing} {pcOnly} { cd //[info hostname]/c removeDirectory globTest makeDirectory globTest close [open globTest/x1.BAT w] close [open globTest/y1.Bat w] close [open globTest/z1.bat w] glob "\\\\\\\\[info hostname]\\\\c\\\\*Test" |
|
>
>
>
>
>
>
>
>
|
|
|
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
....
1375
1376
1377
1378
1379
1380
1381
1382
1383
1384
1385
1386
1387
1388
1389
1390
1391
1392
1393
1394
1395
1396
1397
1398
1399
1400
1401
1402
1403
1404
1405
1406
|
# # Copyright (c) 1995-1996 Sun Microsystems, Inc. # Copyright (c) 1999 by Scriptics Corporation. # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # # RCS: @(#) $Id: fileName.test,v 1.1.2.9 1999/04/06 22:01:43 hershey Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { source [file join [pwd] [file dirname [info script]] defs.tcl] } if {[info commands testsetplatform] == {}} { puts "This application hasn't been compiled with the \"testsetplatform\"" ................................................................................ test filename-16.10 {windows specific globbing} {pcOnly} { lsort [glob c:globTest\\\\*.bat] } {c:globTest/x1.BAT c:globTest/y1.Bat c:globTest/z1.bat} test filename-16.11 {windows specific globbing} {pcOnly} { lsort [glob c:\\\\globTest\\\\*.bat] } {c:/globTest/x1.BAT c:/globTest/y1.Bat c:/globTest/z1.bat} # some tests require a shared C drive if {[catch {cd //[info hostname]/c}]} { set ::tcltest::testConfig(sharedCdrive) 0 } else { set ::tcltest::testConfig(sharedCdrive) 1 } test filename-16.12 {windows specific globbing} {pcOnly sharedCdrive} { cd //[info hostname]/c removeDirectory globTest makeDirectory globTest close [open globTest/x1.BAT w] close [open globTest/y1.Bat w] close [open globTest/z1.bat w] glob //[info hostname]/c/*Test } //[info hostname]/c/globTest test filename-16.13 {windows specific globbing} {pcOnly sharedCdrive} { cd //[info hostname]/c removeDirectory globTest makeDirectory globTest close [open globTest/x1.BAT w] close [open globTest/y1.Bat w] close [open globTest/z1.bat w] glob "\\\\\\\\[info hostname]\\\\c\\\\*Test" |