dump_main_branch_id #2

  • //
  • guest/
  • perforce_software/
  • revml/
  • bin/
  • dump_main_branch_id
  • View
  • Commits
  • Open Download .zip Download (258 B)
#!/usr/local/bin/perl -w

use strict;
use VCP::Debug qw( :debug );
BEGIN { enable_debug ".*"; }

use VCP::MainBranchIdDB;

my $db = VCP::MainBranchIdDB->new( @ARGV ? ( StoreLoc => shift ) : () );
$db->open_existing_db;
$db->dump( \*STDOUT );
$db->close_db;

# Change User Description Committed
#2 2959 John Fetkovich added dump method to lib/VCP/DB_File/sdbm.pm to dump keys => values
       from a sdbm file.  removed similar code from bin/dump_head_revs,
       bin/dump_rev_map and bin/dump_main_branch_id and called this method
       instead.  also made parse_files_and_revids_from_head_revs_db sub
       in TestUtils to use in test suites instead of
       parse_files_and_revids_from_p4_files et. al.
#1 2873 Barrie Slaymaker Add MainBranchIdDB and a dump util.