代码搜索结果
找到约 10,000 项符合
T 的代码
destroy.t
#!./perl -w
use strict ;
use lib 't' ;
use BerkeleyDB;
use util ;
print "1..15\n";
my $Dfile = "dbhash.tmp";
my $home = "./fred" ;
umask(0);
{
# let object destruction kill everything
hash.t
#!./perl -w
# ID: %I%, %G%
use strict ;
use lib 't' ;
use BerkeleyDB;
use util ;
print "1..212\n";
my $Dfile = "dbhash.tmp";
my $Dfile2 = "dbhash2.tmp";
my $Dfile3 = "dbhash3.tmp";
unlink $Df
txn.t
#!./perl -w
use strict ;
use lib 't' ;
use BerkeleyDB;
use util ;
print "1..58\n";
my $Dfile = "dbhash.tmp";
umask(0);
{
# error cases
my $lex = new LexFile $Dfile ;
my %hash ;
btree.t
#!./perl -w
use strict ;
use lib 't';
use BerkeleyDB;
use util ;
print "1..244\n";
my $Dfile = "dbhash.tmp";
my $Dfile2 = "dbhash2.tmp";
my $Dfile3 = "dbhash3.tmp";
unlink $Dfile;
umask(0) ;
#
t.d
// T.d -- 5.3 Thu Jan 3 18:42:58 EST 2002
// Copyright (c) 1993 Axel T. Schreiner
//
line 1 root and meta root class
line 2 // comment
% Class T {
const Class @ class;
%
void s (_self);
void S
t.dc
// T.dc -- 5.1 Jun 8 17:55:47 1993
// Copyright (c) 1993 Axel T. Schreiner
// T
% s {
%casts
}
% S {
%casts
}
%+ T c {
}
%+ T C {
}
%- T ctor {
return _self;
}
%- T D {
}
// Class
% cc {
%