| /openbsd/gnu/usr.bin/perl/t/lib/ |
| H A D | dbmt_common.pl | 235 is($fetch_key, $fk);
246 $db->filter_fetch_key (sub { $fetch_key = $_ });
257 ($fetch_key, $store_key, $fetch_value, $store_value) = ("") x 4;
262 ($fetch_key, $store_key, $fetch_value, $store_value) = ("") x 4;
269 (sub { $_ = uc $_; $fetch_key = $_ });
277 ($fetch_key, $store_key, $fetch_value, $store_value) = ("") x 4;
282 ($fetch_key, $store_key, $fetch_value, $store_value) = ("") x 4;
287 ($fetch_key, $store_key, $fetch_value, $store_value) = ("") x 4;
298 ($fetch_key, $store_key, $fetch_value, $store_value) = ("") x 4;
302 ($fetch_key, $store_key, $fetch_value, $store_value) = ("") x 4;
[all …]
|
| /openbsd/gnu/usr.bin/perl/cpan/DB_File/t/ |
| H A D | db-hash.t | 515 print "# Fetch Key : expected '$fk' got '$fetch_key'\n"
516 if $fetch_key ne $fk ;
527 $fetch_key eq $fk && $store_key eq $sk &&
534 $db->filter_fetch_key (sub { $fetch_key = $_ }) ;
545 ($fetch_key, $store_key, $fetch_value, $store_value) = ("") x 4 ;
550 ($fetch_key, $store_key, $fetch_value, $store_value) = ("") x 4 ;
561 (sub { $_ = uc $_ ; $fetch_key = $_ }) ;
569 ($fetch_key, $store_key, $fetch_value, $store_value) = ("") x 4 ;
574 ($fetch_key, $store_key, $fetch_value, $store_value) = ("") x 4 ;
579 ($fetch_key, $store_key, $fetch_value, $store_value) = ("") x 4 ;
[all …]
|
| H A D | db-recno.t | 576 print "# Fetch Key : expected '$fk' got '$fetch_key'\n"
577 if $fetch_key ne $fk ;
588 $fetch_key eq $fk && $store_key eq $sk &&
595 $db->filter_fetch_key (sub { $fetch_key = $_ }) ;
606 ($fetch_key, $store_key, $fetch_value, $store_value) = ("") x 4 ;
611 ($fetch_key, $store_key, $fetch_value, $store_value) = ("") x 4 ;
618 (sub { ++ $_ ; $fetch_key = $_ }) ;
626 ($fetch_key, $store_key, $fetch_value, $store_value) = ("") x 4 ;
631 ($fetch_key, $store_key, $fetch_value, $store_value) = ("") x 4 ;
636 ($fetch_key, $store_key, $fetch_value, $store_value) = ("") x 4 ;
[all …]
|
| H A D | db-btree.t | 734 $fetch_key eq $fk && $store_key eq $sk &&
741 $db->filter_fetch_key (sub { $fetch_key = $_ }) ;
752 ($fetch_key, $store_key, $fetch_value, $store_value) = ("") x 4 ;
757 ($fetch_key, $store_key, $fetch_value, $store_value) = ("") x 4 ;
764 (sub { $_ = uc $_ ; $fetch_key = $_ }) ;
772 ($fetch_key, $store_key, $fetch_value, $store_value) = ("") x 4 ;
777 ($fetch_key, $store_key, $fetch_value, $store_value) = ("") x 4 ;
782 ($fetch_key, $store_key, $fetch_value, $store_value) = ("") x 4 ;
793 ($fetch_key, $store_key, $fetch_value, $store_value) = ("") x 4 ;
797 ($fetch_key, $store_key, $fetch_value, $store_value) = ("") x 4 ;
[all …]
|
| /openbsd/gnu/usr.bin/perl/ext/SDBM_File/ |
| H A D | SDBM_File.xs | 7 #define fetch_key 0 macro
129 SDBM_File::filter_fetch_key = fetch_key
|
| H A D | typemap | 39 DBM_ckFilter($arg, filter[fetch_key],\"filter_fetch_key\");
|
| /openbsd/gnu/usr.bin/perl/ext/NDBM_File/ |
| H A D | NDBM_File.xs | 30 #define fetch_key 0 macro
162 NDBM_File::filter_fetch_key = fetch_key
|
| H A D | typemap | 39 DBM_ckFilter($arg, filter[fetch_key], \"filter_fetch_key\");
|
| /openbsd/gnu/usr.bin/perl/ext/ODBM_File/ |
| H A D | ODBM_File.xs | 46 #define fetch_key 0 macro
228 ODBM_File::filter_fetch_key = fetch_key
|
| H A D | typemap | 53 DBM_ckFilter($arg, filter[fetch_key],\"filter_fetch_key\");
|
| /openbsd/gnu/usr.bin/perl/ext/GDBM_File/ |
| H A D | typemap | 52 DBM_ckFilter($arg, filter[fetch_key],\"filter_fetch_key\");
|
| H A D | GDBM_File.xs | 10 #define fetch_key 0 macro
980 GDBM_File::filter_fetch_key = fetch_key
|