/osnet-11/usr/src/cmd/perl/5.8.4/distrib/x2p/ |
H A D | hash.h | 45 bool hdelete (HASH *tb, char *key); 46 STR * hfetch ( HASH *tb, char *key ); 47 int hiterinit ( HASH *tb ); 49 HENT * hiternext ( HASH *tb ); 51 HASH * hnew ( void ); 52 void hsplit ( HASH *tb ); 53 bool hstore ( HASH *tb, char *key, STR *val );
|
H A D | hash.c | 22 hfetch(register HASH *tb, char *key) 48 hstore(register HASH *tb, char *key, STR *val) 97 hdelete(register HASH *tb, char *key) 134 hsplit(HASH *tb) 170 HASH * 173 register HASH *tb = (HASH*)safemalloc(sizeof(HASH)); 184 hshow(register HASH *tb) 194 hiterinit(register HASH *t [all...] |
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Data/Dumper/t/ |
H A D | pair.t | 27 my $HASH = { alpha => 'beta', gamma => 'vlissides' }; 43 is (Data::Dumper::DumperX($HASH), $WANT, 46 is (Data::Dumper::DumperX($HASH), $want_colon, 'XS: $Data::Dumper::Pair = " : "'); 47 my $dd = Data::Dumper->new([ $HASH ])->Pair(','); 49 'XS: Data::Dumper->new([ $HASH ])->Pair(",")->Dumpxs()'); 56 is (Data::Dumper::Dumper($HASH), $WANT, 59 is (Data::Dumper::Dumper($HASH), $want_colon, 'Perl: $Data::Dumper::Pair = " : "'); 60 my $dd = Data::Dumper->new([ $HASH ])->Pair(','); 62 'Perl: Data::Dumper->new([ $HASH ])->Pair(",")->Pair() eq ","'); 63 is ($dd->Dump(), $want_comma, 'Perl: Data::Dumper->new([ $HASH ]) [all...] |
/osnet-11/usr/src/lib/pkcs11/pkcs11_softtoken/common/ |
H A D | softMAC.h | 92 /* Generic MAC envelop macros. Substitute HASH with MD5, SHA1, & SHA2 mechs */ 94 #define SOFT_MAC_INIT_CTX(HASH, mac_ctx, ipad, opad, len) \ 95 /* Perform HASH on ipad */ \ 96 HASH##Init(&((mac_ctx)->hc_icontext)); \ 97 HASH##Update(&((mac_ctx)->hc_icontext), (ipad), (len)); \ 98 /* Perform HASH on opad */ \ 99 HASH##Init(&((mac_ctx)->hc_ocontext)); \ 100 HASH##Update(&((mac_ctx)->hc_ocontext), (opad), (len)); 102 #define SOFT_MAC_UPDATE(HASH, mac_ctx, pPart, PartLen) \ 103 HASH##Updat [all...] |
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Attribute/Handlers/demo/ |
H A D | demo_range.pl | 5 sub Ranged : ATTR(HASH) {
|
H A D | MyClass.pm | 36 sub Good : ATTR(HASH) { 41 print "MyClass::Good:ATTR(HASH)(@_);\n";
|
H A D | Demo.pm | 22 sub Demo : ATTR(HASH) {
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/comp/ |
H A D | term.t | 39 if (ref($a) eq 'HASH') {print "ok 15\n";} else {print "not ok 15\n";} 43 if (ref($a) eq 'HASH') {print "ok 16\n";} else {print "not ok 16\n";} 47 if (ref($a) eq 'HASH') {print "ok 17\n";} else {print "not ok 17\n";} 51 if (ref($a) eq 'HASH') {print "ok 18\n";} else {print "not ok 18\n";} 55 if (ref($a) eq 'HASH') {print "ok 19\n";} else {print "not ok 19\n";} 59 if (ref($a) eq 'HASH') {print "ok 20\n";} else {print "not ok 20\n";} 64 if (ref($a) eq 'HASH') {print "ok 21\n";} else {print "not ok 21\n";} 68 if (ref($a) eq 'HASH') {print "ok 22\n";} else {print "not ok 22\n";}
|
H A D | parser.t | 124 is(ref $result, $expect ? 'HASH' : '', $eval);
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Memoize/t/ |
H A D | tiefeatures.t | 38 # Test HASH 41 memoize 'nul', SCALAR_CACHE => [HASH => \%s], LIST_CACHE => [HASH => \%l];
|
H A D | tie_ndbm.t | 51 SCALAR_CACHE => [HASH => \%cache], 65 SCALAR_CACHE => [HASH => \%cache],
|
H A D | tie_sdbm.t | 50 SCALAR_CACHE => [HASH => \%cache], 64 SCALAR_CACHE => [HASH => \%cache],
|
H A D | tie_storable.t | 55 SCALAR_CACHE => [HASH => \%cache], 71 SCALAR_CACHE => [HASH => \%cache],
|
H A D | expire.t | 22 SCALAR_CACHE => [HASH => \%cache],
|
H A D | expmod_n.t | 27 SCALAR_CACHE => [HASH => \%cache],
|
H A D | errors.t | 33 memoize(sub {}, LIST_CACHE => [HASH => \%cache ]);
|
H A D | expfile.t | 44 SCALAR_CACHE => [HASH => \%cache],
|
H A D | expmod_t.t | 68 SCALAR_CACHE => [HASH => \%cache ],
|
H A D | tie.t | 55 SCALAR_CACHE => [HASH => \%cache], 69 SCALAR_CACHE => ['HASH', \%cache],
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/List/Util/t/ |
H A D | reftype.t | 27 [ HASH => {} ],
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Memoize/ |
H A D | ExpireFile.pm | 20 my $cache = $args{HASH} || {};
|
H A D | Expire.pm | 135 memoize 'function', SCALAR_CACHE => [HASH => \%cache ]; 143 to the HASH feature. 166 You can use the C<HASH> option to Memoize::Expire to supply a tied 192 HASH => \%disk_cache; 195 memoize 'function', SCALAR_CACHE => [ HASH => \%cache ]; 243 memoize 'function', SCALAR_CACHE => [HASH => \%cache]; 275 my $cache = $args{HASH} || {}; 304 memoize 'function', SCALAR_CACHE => [HASH => \%cache10sec]; 309 You should always support a C<HASH> argument to C<TIEHASH> that ties
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/op/ |
H A D | avhv.t | 141 is (ref($avhv->[0]), 'HASH'); 169 is (ref $avhv->[0], 'HASH');
|
H A D | ref.t | 118 print ref $refref eq HASH ? "ok 27\n" : "not ok 27\n"; 123 print ref $anonhash eq HASH ? "ok 28\n" : "not ok 28\n"; 162 print ref shift ne HASH ? "ok 35\n" : "not ok 35\n";
|
/osnet-11/usr/src/lib/libast/common/hash/ |
H A D | hashlib.h | 84 #define HASH(r,n,h) if (r->local->hash) h = r->namesize ? (*r->local->hash)(n, r->namesize) : (*r->local->hash)(n);\ macro
|