| /osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Tie/File/t/ |
| H A D | 10_splice_rs.t | 6 # Each call to 'check_contents' actually performs two tests.
34 check_contents("rec4blah$data");
36 check_contents("rec5blah$data");
38 check_contents("record5blah$data");
41 check_contents("r5blah$data");
43 check_contents("$data");
45 check_contents("$data");
47 check_contents("r7blahrec8blah$data");
49 check_contents("rec7blahrecord8blahrec9blah$data");
52 check_contents("record9blahrec10bla
184 sub check_contents { subroutine
[all...] |
| H A D | 25_gen_nocache.t | 22 check_contents("rec0");
26 check_contents("rec0", "rec1");
28 check_contents("rec0", "rec1", "rec2");
32 check_contents("new0", "rec1", "rec2");
34 check_contents("new0", "new1", "rec2");
36 check_contents("new0", "new1", "new2");
40 check_contents("long0", "new1", "new2");
42 check_contents("long0", "long1", "new2");
44 check_contents("long0", "long1", "long2");
46 check_contents("long
89 sub check_contents { subroutine
[all...] |
| H A D | 04_splice.t | 7 # Each call to 'check_contents' actually performs two tests.
36 check_contents("rec4$:$data");
38 check_contents("rec5$:$data");
40 check_contents("record5$:$data");
43 check_contents("r5$:$data");
45 check_contents("$data");
47 check_contents("$data");
49 check_contents("r7$:rec8$:$data");
51 check_contents("rec7$:record8$:rec9$:$data");
54 check_contents("record
232 sub check_contents { subroutine
[all...] |
| H A D | 01_gen.t | 21 check_contents("rec0");
25 check_contents("rec0", "rec1");
27 check_contents("rec0", "rec1", "rec2");
31 check_contents("new0", "rec1", "rec2");
33 check_contents("new0", "new1", "rec2");
35 check_contents("new0", "new1", "new2");
39 check_contents("long0", "new1", "new2");
41 check_contents("long0", "long1", "new2");
43 check_contents("long0", "long1", "long2");
45 check_contents("long
117 sub check_contents { subroutine
[all...] |
| H A D | 33_defer_vs.t | 35 check_contents($data); # nothing written yet
37 check_contents($data); # nothing written yet
41 check_contents($data . "333$:4444$:"); # now it's written
45 check_contents("${data}999999999$:4444$:");
47 check_contents("${data}999999999$:88888888$:");
53 check_contents($data); # nothing written yet
55 check_contents($data); # nothing written yet
57 check_contents("55555$:1$:aaaaaaaaaa$:");
62 check_contents("55555$:1$:aaaaaaaaaa$:");
64 check_contents("5555
91 sub check_contents { subroutine
[all...] |
| H A D | 16_handle.t | 31 check_contents("rec0");
35 check_contents("rec0", "rec1");
37 check_contents("rec0", "rec1", "rec2");
41 check_contents("new0", "rec1", "rec2");
43 check_contents("new0", "new1", "rec2");
45 check_contents("new0", "new1", "new2");
49 check_contents("long0", "new1", "new2");
51 check_contents("long0", "long1", "new2");
53 check_contents("long0", "long1", "long2");
55 check_contents("long
115 sub check_contents { subroutine
[all...] |
| H A D | 31_autodefer.t | 41 check_contents($data . "rec3$:rec4$:"); # only the first two were written
44 check_contents($data . "rec3$:rec4$:"); # still nothing written
47 check_contents($data . "rec3$:rec4$:"); # still nothing written
50 check_contents("recX$:rec1$:rec2$:rec3$:rec4$:rec5$:rec6$:rec7$:");
53 check_contents("recX$:recY$:rec2$:rec3$:rec4$:rec5$:rec6$:rec7$:");
56 check_contents("recX$:recY$:rec2$:rec3$:rec4$:rec5$:rec6$:rec7$:");
61 check_contents("recX$:recY$:recZ$:rec3$:rec4$:rec5$:rec6$:rec7$:");
69 check_contents("$:$:$:$:$:");
72 check_contents("r0$:r1$:fish$:r3$:r4$:");
80 check_contents("##r
147 sub check_contents { subroutine
[all...] |
| H A D | 09_gen_rs.t | 20 check_contents("rec0");
24 check_contents("rec0", "rec1");
26 check_contents("rec0", "rec1", "rec2");
30 check_contents("new0", "rec1", "rec2");
32 check_contents("new0", "new1", "rec2");
34 check_contents("new0", "new1", "new2");
38 check_contents("long0", "new1", "new2");
40 check_contents("long0", "long1", "new2");
42 check_contents("long0", "long1", "long2");
44 check_contents("long
178 sub check_contents { subroutine
[all...] |
| H A D | 22_autochomp.t | 18 check_contents("rec0");
22 check_contents("rec0", "rec1");
24 check_contents("rec0", "rec1", "rec2");
28 check_contents("new0", "rec1", "rec2");
30 check_contents("new0", "new1", "rec2");
32 check_contents("new0", "new1", "new2");
36 check_contents("long0", "new1", "new2");
38 check_contents("long0", "long1", "new2");
40 check_contents("long0", "long1", "long2");
42 check_contents("long
103 sub check_contents { subroutine
[all...] |
| H A D | 15_pushpop.t | 5 # Each call to 'check_contents' actually performs two tests.
33 check_contents($data);
38 check_contents("$ {data}rec3$:rec4$:");
44 check_contents("$ {data}rec3$:rec4$:");
50 check_contents("$ {data}rec3$:");
57 check_contents("");
62 check_contents("");
69 check_contents($data);
74 check_contents("rec3$:rec4$:$data");
80 check_contents("rec
103 sub check_contents { subroutine
[all...] |
| H A D | 06_fixrec.t | 18 check_contents("rec0$:");
20 check_contents("rec0$:rec1$:");
22 check_contents("rec0$:rec1$:rec2$:$:");
24 sub check_contents { subroutine
|
| H A D | 18_rs_fixrec.t | 18 check_contents("rec0blah");
20 check_contents("rec0blahrec1blah");
22 check_contents("rec0blahrec1blahrec2blahblah");
24 sub check_contents { subroutine
|
| H A D | 13_size_rs.t | 47 check_contents("${data}blahblah");
51 check_contents("${data}blahblahblahblah");
55 check_contents("${data}blahblah");
59 check_contents($data);
63 check_contents('');
66 sub check_contents { subroutine
|
| H A D | 17_misc_meth.t | 23 check_contents("$:$:$:");
25 check_contents("$:$:$:$:");
27 check_contents("$:$:$:$:");
31 check_contents("");
73 check_contents("$:$:GIVE ME PIE$:");
77 check_contents("$:$:");
80 check_contents("$:$:");
83 check_contents("$:");
89 check_contents("$:");
103 sub check_contents { subroutine
[all...] |
| H A D | 30_defer.t | 33 check_contents($data); # nothing written yet
35 check_contents($data); # nothing written yet
39 check_contents($data . "rec3$:rec4$:"); # now it's written
43 check_contents("${data}rec9$:rec4$:");
45 check_contents("${data}rec9$:rec8$:");
51 check_contents($data); # nothing written yet
53 check_contents($data); # nothing written yet
55 check_contents("record0$:rec1$:record2$:");
60 check_contents("record0$:rec1$:record2$:");
62 check_contents("record
294 sub check_contents { subroutine
[all...] |
| H A D | 05_size.t | 55 check_contents("$data$:$:");
60 check_contents("$data$:$:$:$:");
65 check_contents("$data$:$:");
70 check_contents($data);
75 check_contents('');
97 sub check_contents { subroutine
|
| H A D | 32_defer_misc.t | 35 check_contents($data); # nothing written yet
50 check_contents($data); # nothing written yet
56 check_contents($data); # nothing written yet
60 check_contents("$data$:$:"); # two extra empty records
66 check_contents($data); # written data was unwritten
68 check_contents($data); # nothing left to write
73 check_contents($data); # nothing written yet
75 check_contents(""); # this happens right away
78 check_contents(""); # nothing left to write
85 check_contents(""); # nothin
174 sub check_contents { subroutine
[all...] |
| H A D | 26_twrite.t | 311 sub check_contents { subroutine
|
| H A D | 29_downcopy.t | 316 sub check_contents { subroutine
|
| H A D | 29a_upcopy.t | 163 sub check_contents { subroutine
|