#!/usr/local/bin/perl -w =head1 NAME 00logger.t - See if the logger compiles properly. =cut use strict ; use Carp ; use Test ; use VCP::Logger qw( lg ); ## TODO: Add lots of tests to 00rev.t my @tests = ( ## Test some utility functions first sub { lg "logger test"; ok 1; }, ) ; plan tests => scalar( @tests ) ; $_->() for @tests ;
# | Change | User | Description | Committed | |
---|---|---|---|---|---|
#1 | 6118 | Dimitry Andric | Integ from //public/revml to //guest/dimitry_andric/revml/main. | ||
//guest/perforce_software/revml/t/00logger.t | |||||
#1 | 3155 | Barrie Slaymaker |
Convert to logging using VCP::Logger to reduce stdout/err spew. Simplify & speed up debugging quite a bit. Provide more verbose information in logs. Print to STDERR progress reports to keep users from wondering what's going on. Breaks test; halfway through upgrading run3() to an inline function for speed and for VCP specific features. |