39 lines
790 B
C
39 lines
790 B
C
/* $XConsortium: dlp_test.cc /main/4 1996/07/18 16:02:00 drk $ */
|
|
|
|
#ifdef REGRESSION_TEST
|
|
|
|
#include "oliasdb/dlp_test.h"
|
|
|
|
int dlp_test( info_lib* infolib_ptr, const char* base_name, const char* oid_str )
|
|
{
|
|
oid_t id((char*)oid_str, true, false);
|
|
|
|
dlp_smart_ptr* y = new dlp_smart_ptr( infolib_ptr, base_name, id );
|
|
|
|
dlp_smart_ptr* z;
|
|
cerr << form("run backward from %s:\n", oid_str);
|
|
|
|
do {
|
|
y -> node_id().asciiOut(cerr); cerr << "\n";
|
|
z = y->prev();
|
|
delete y;
|
|
y = z;
|
|
} while ( y );
|
|
|
|
|
|
cerr << form("run forward from %s:\n", oid_str);
|
|
|
|
y = new dlp_smart_ptr( infolib_ptr, base_name, id );
|
|
|
|
do {
|
|
y -> node_id().asciiOut(cerr); cerr << "\n";
|
|
z = y->prev();
|
|
delete y;
|
|
y = z;
|
|
} while ( z );
|
|
|
|
|
|
return 0;
|
|
}
|
|
#endif
|