| /onnv/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/t/op/ |
| defins.t | 26 my $seen = 0;
30 $seen++ if $name eq '0';
32 print "not " unless $seen;
36 $seen = 0;
40 $seen++ if $line eq '0';
43 print "not " unless $seen;
48 $seen = 0;
49 while (($seen ? $dummy : $name) = <FILE>)
51 $seen++ if $name eq '0';
53 print "not " unless $seen;
[all...] |
| tiearray.t | 9 my %seen;
15 $seen{'TIEARRAY'}++;
22 $seen{'STORESIZE'}++;
29 $seen{'EXTEND'}++;
36 $seen{'FETCHSIZE'}++;
42 $seen{'FETCH'}++;
49 $seen{'STORE'}++;
56 $seen{'UNSHIFT'}++;
63 $seen{'PUSH'}++;
70 $seen{'CLEAR'}++
[all...] |
| groups.t | 119 $seen{$pwgid}++;
125 next if (! defined $group or ! grep { $_ eq $group } @gr) and $seen{$_}++;
172 if ($pwgid == 0 || $seen{0} < 2) {
|
| grent.t | 86 my %seen;
98 push @{ $seen{$name_s} }, $.;
|
| inccode.t | 196 @INC = sub { $filename = 'seen'; return undef; };
198 is( $filename, 'seen', 'the coderef sees fully-qualified pathnames' );
|
| pwent.t | 81 my %seen;
99 push @{ $seen{$name_s} }, $.;
|
| runlevel.t | 185 %seen = ();
191 print $t if ($seen{$t}++ == 0);
|
| /onnv/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/Test/Harness/t/ |
| strap-analyze.t | 40 seen => 10,
78 seen => 5,
110 seen => 11,
128 seen => 4,
146 seen => 4,
164 seen => 4,
184 seen => 0,
201 seen => 5,
219 seen => 5,
241 seen => 5
[all...] |
| /onnv/onnv-gate/usr/src/cmd/hal/addons/network-devices/ |
| cache.c | 24 * that we have already seen and those that have gone missing. This allows
34 static GHashTable *seen = NULL; variable
75 if (seen != NULL) {
81 g_hash_table_foreach_remove(seen, device_remove_if_stale, args);
92 if (seen == NULL)
93 seen = g_hash_table_new_full(g_str_hash, g_str_equal,
96 result = g_hash_table_lookup_extended(seen, name,
100 g_hash_table_insert(seen, strdup(name), val);
103 HAL_DEBUG(("seen: %s (%d)", name, *val));
|
| /onnv/onnv-gate/usr/src/cmd/dtrace/test/tst/common/usdt/ |
| tst.reeval.ksh | 81 seen = 1;
87 exit(seen ? 0 : 2);
|
| /onnv/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/t/io/ |
| crlf.t | 82 my $seen = 0;
83 $seen++ while $text =~ /$chars/g;
84 return $seen;
|
| /onnv/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/Text/ |
| Abbrev.pm | 59 my $seen = ++$table{$abbrev};
60 if ($seen == 1) { # We're the first word so far to have
63 } elsif ($seen == 2) { # We're the second word to have this
|
| /onnv/onnv-gate/usr/src/cmd/sgs/lex/common/ |
| yyless.c | 116 static int seen = 0; local
118 if (!seen) {
122 seen = 1;
|
| /onnv/onnv-gate/usr/src/cmd/dtrace/test/tst/common/nfs/ |
| tst.call3.d | 73 /seen[probename] == 0/
76 seen[probename] = 1;
77 printf("%d ops seen, latest op is %s\n", numberseen, probename);
89 printf("%d nfsv3 ops seen; should be 22\n", numberseen);
|
| /onnv/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/t/uni/ |
| case.pl | 20 my %seen;
23 $seen{$i}++;
30 if (++$seen{$i} == 2) {
31 warn sprintf "$base: $i seen twice\n";
43 $none{$i}++ unless $seen{$i};
|
| /onnv/onnv-gate/usr/src/tools/onbld/Checks/ |
| CmtBlk.py | 38 def __init__(self, lineno, seen, shouldbe):
41 self.seen = seen
122 e.lineno, e.shouldbe, e.seen))
|
| /onnv/onnv-gate/usr/src/cmd/mdb/common/modules/genunix/ |
| kgrep.c | 83 int seen = 0; local
94 seen = 1;
104 if (seen)
137 int seen = 0; \
151 seen = 1; \
166 if (seen) \
|
| /onnv/onnv-gate/usr/src/cmd/device_remap/ |
| device_remap.pl | 202 my ($self, $nodeid, $nameid, $arcid, $ret, $seen) = @_;
205 return if ($seen->[$nodeid] == 1);
206 $seen->[$nodeid] = 1;
216 $self->scan_node($node{'idx'}, $nameid, $arcid, $ret, $seen);
228 my ($nameid, $arcid, @ret, @seen);
232 $self->scan_node($start, $nameid, $arcid, \@ret, \@seen);
|
| /onnv/onnv-gate/usr/src/cmd/psrinfo/ |
| psrinfo.pl | 105 # Count how many times we've seen each element and remove elements seen more
110 my %seen; # Have we seen this element already?
111 return (grep { ++$seen{$_} == 1 } @_);
116 # Convert the first list to a hash with seen entries marked as 1-values
123 my %seen; # Set to 1 for everything in the first list
128 map { $seen{$_} = 1 } @$left;
130 return (grep { $seen{$_} } @$right);
140 my %seen; # Set to 1 for everything in the first lis
[all...] |
| /onnv/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/Class/ |
| ISA.pm | 186 my %seen = ($_[0] => 1);
200 $seen{$c}++ ? () : $c;
204 # I.e., if this class has any parents (at least, ones I've never seen
|
| /onnv/onnv-gate/usr/src/uts/common/fs/zfs/ |
| zfs_acl.c | 781 mode_t seen = 0; local
808 (!(seen & S_IRUSR))) {
809 seen |= S_IRUSR;
815 (!(seen & S_IWUSR))) {
816 seen |= S_IWUSR;
822 (!(seen & S_IXUSR))) {
823 seen |= S_IXUSR;
830 (!(seen & S_IRGRP))) {
831 seen |= S_IRGRP;
837 (!(seen & S_IWGRP)))
[all...] |
| /onnv/onnv-gate/usr/src/cmd/perl/contrib/Sun/Solaris/Exacct/Catalog/ |
| Catalog.pm | 89 my %seen;
96 if ($seen{$v}++);
98 undef(%seen);
|
| /onnv/onnv-gate/usr/src/cmd/cmd-inet/usr.sbin/in.routed/ |
| rtquery.c | 369 struct seen { struct
370 struct seen *next;
372 } *seen, *sp; local
420 seen = NULL;
460 for (sp = seen; sp != NULL; sp = sp->next) {
468 sp->next = seen;
469 seen = sp;
|
| /onnv/onnv-gate/usr/src/cmd/refer/ |
| glue5.c | 391 static struct words *seen[50]; variable in typeref:struct:words
398 if (seen[i] == x)
400 seen[i] = x;
|
| /onnv/onnv-gate/usr/src/cmd/projadd/ |
| projmod.pl | 111 my %seen;
112 my @dups = grep($seen{$_}++ == 1, @$new);
274 my %seen;
275 my @dups = grep($seen{$_}++ == 1, map { $_->{'name'} } @$new);
|
