Author: jkeenan
Date: Sat Aug 9 08:01:13 2008
New Revision: 30142
Modified:
branches/stepdescription/config/auto/aio.pm
branches/stepdescription/config/auto/alignptrs.pm
branches/stepdescription/config/auto/arch.pm
branches/stepdescription/config/auto/attributes.pm
branches/stepdescription/config/auto/backtrace.pm
branches/stepdescription/config/auto/byteorder.pm
branches/stepdescription/config/auto/cgoto.pm
branches/stepdescription/config/auto/cpu.pm
branches/stepdescription/config/auto/crypto.pm
branches/stepdescription/config/auto/ctags.pm
branches/stepdescription/config/auto/env.pm
branches/stepdescription/config/auto/fink.pm
branches/stepdescription/config/auto/format.pm
branches/stepdescription/config/auto/funcptr.pm
branches/stepdescription/config/auto/gc.pm
branches/stepdescription/config/auto/gcc.pm
branches/stepdescription/config/auto/gdbm.pm
branches/stepdescription/config/auto/gettext.pm
branches/stepdescription/config/auto/glibc.pm
branches/stepdescription/config/auto/gmp.pm
branches/stepdescription/config/auto/headers.pm
branches/stepdescription/config/auto/icu.pm
branches/stepdescription/config/auto/inline.pm
branches/stepdescription/config/auto/isreg.pm
branches/stepdescription/config/auto/jit.pm
branches/stepdescription/config/auto/macports.pm
branches/stepdescription/config/auto/memalign.pm
branches/stepdescription/config/auto/msvc.pm
branches/stepdescription/config/auto/opengl.pm
branches/stepdescription/config/auto/ops.pm
branches/stepdescription/config/auto/pcre.pm
branches/stepdescription/config/auto/perldoc.pm
branches/stepdescription/config/auto/pmc.pm
branches/stepdescription/config/auto/readline.pm
branches/stepdescription/config/auto/revision.pm
branches/stepdescription/config/auto/signal.pm
branches/stepdescription/config/auto/sizes.pm
branches/stepdescription/config/auto/snprintf.pm
branches/stepdescription/config/auto/socklen_t.pm
branches/stepdescription/config/auto/va_ptr.pm
branches/stepdescription/config/auto/warnings.pm
branches/stepdescription/config/gen/call_list.pm
branches/stepdescription/config/gen/config_h.pm
branches/stepdescription/config/gen/config_pm.pm
branches/stepdescription/config/gen/core_pmcs.pm
branches/stepdescription/config/gen/crypto.pm
branches/stepdescription/config/gen/languages.pm
branches/stepdescription/config/gen/makefiles.pm
branches/stepdescription/config/gen/parrot_include.pm
branches/stepdescription/config/gen/platform.pm
branches/stepdescription/config/init/defaults.pm
branches/stepdescription/config/init/headers.pm
branches/stepdescription/config/init/hints.pm
branches/stepdescription/config/init/install.pm
branches/stepdescription/config/init/manifest.pm
branches/stepdescription/config/init/miniparrot.pm
branches/stepdescription/config/init/optimize.pm
branches/stepdescription/config/inter/charset.pm
branches/stepdescription/config/inter/encoding.pm
branches/stepdescription/config/inter/lex.pm
branches/stepdescription/config/inter/libparrot.pm
branches/stepdescription/config/inter/make.pm
branches/stepdescription/config/inter/progs.pm
branches/stepdescription/config/inter/shlibs.pm
branches/stepdescription/config/inter/types.pm
branches/stepdescription/config/inter/yacc.pm
branches/stepdescription/lib/Parrot/Configure.pm
Log:
Trim all configuration step descriptions so that we can fit step name and
description on one line as Configure.pl runs.
Modified: branches/stepdescription/config/auto/aio.pm
==============================================================================
--- branches/stepdescription/config/auto/aio.pm (original)
+++ branches/stepdescription/config/auto/aio.pm Sat Aug 9 08:01:13 2008
@@ -35,7 +35,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining if your platform supports AIO};
+ $data{description} = q{Does your platform support AIO};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/auto/alignptrs.pm
==============================================================================
--- branches/stepdescription/config/auto/alignptrs.pm (original)
+++ branches/stepdescription/config/auto/alignptrs.pm Sat Aug 9 08:01:13 2008
@@ -23,7 +23,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining your minimum pointer alignment};
+ $data{description} = q{Determine your minimum pointer alignment};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/auto/arch.pm
==============================================================================
--- branches/stepdescription/config/auto/arch.pm (original)
+++ branches/stepdescription/config/auto/arch.pm Sat Aug 9 08:01:13 2008
@@ -24,7 +24,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining CPU architecture and OS};
+ $data{description} = q{Determine CPU architecture and OS};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/auto/attributes.pm
==============================================================================
--- branches/stepdescription/config/auto/attributes.pm (original)
+++ branches/stepdescription/config/auto/attributes.pm Sat Aug 9 08:01:13 2008
@@ -25,7 +25,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Detecting compiler attributes (-DHASATTRIBUTE_xxx)};
+ $data{description} = q{Detect compiler attributes};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/auto/backtrace.pm
==============================================================================
--- branches/stepdescription/config/auto/backtrace.pm (original)
+++ branches/stepdescription/config/auto/backtrace.pm Sat Aug 9 08:01:13 2008
@@ -26,7 +26,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining whether libc has the backtrace*
functions};
+ $data{description} = q{Does libc have the backtrace* functions};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/auto/byteorder.pm
==============================================================================
--- branches/stepdescription/config/auto/byteorder.pm (original)
+++ branches/stepdescription/config/auto/byteorder.pm Sat Aug 9 08:01:13 2008
@@ -23,7 +23,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Computing native byteorder for Parrot's wordsize};
+ $data{description} = q{Compute native byteorder for wordsize};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/auto/cgoto.pm
==============================================================================
--- branches/stepdescription/config/auto/cgoto.pm (original)
+++ branches/stepdescription/config/auto/cgoto.pm Sat Aug 9 08:01:13 2008
@@ -23,7 +23,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining whether your compiler supports computed
goto};
+ $data{description} = q{Does your compiler support computed goto};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/auto/cpu.pm
==============================================================================
--- branches/stepdescription/config/auto/cpu.pm (original)
+++ branches/stepdescription/config/auto/cpu.pm Sat Aug 9 08:01:13 2008
@@ -25,7 +25,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Generating CPU specific stuff};
+ $data{description} = q{Generate CPU specific stuff};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/auto/crypto.pm
==============================================================================
--- branches/stepdescription/config/auto/crypto.pm (original)
+++ branches/stepdescription/config/auto/crypto.pm Sat Aug 9 08:01:13 2008
@@ -24,7 +24,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining if your platform supports crypto};
+ $data{description} = q{Does your platform support crypto};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/auto/ctags.pm
==============================================================================
--- branches/stepdescription/config/auto/ctags.pm (original)
+++ branches/stepdescription/config/auto/ctags.pm Sat Aug 9 08:01:13 2008
@@ -27,7 +27,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining whether (exuberant) ctags is installed};
+ $data{description} = q{Is (exuberant) ctags installed};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/auto/env.pm
==============================================================================
--- branches/stepdescription/config/auto/env.pm (original)
+++ branches/stepdescription/config/auto/env.pm Sat Aug 9 08:01:13 2008
@@ -27,7 +27,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining if your C library has setenv /
unsetenv};
+ $data{description} = q{Does your C library have setenv / unsetenv};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/auto/fink.pm
==============================================================================
--- branches/stepdescription/config/auto/fink.pm (original)
+++ branches/stepdescription/config/auto/fink.pm Sat Aug 9 08:01:13 2008
@@ -26,7 +26,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining Fink location on Darwin};
+ $data{description} = q{Determine Fink location on Darwin};
$data{result} = q{};
# Per fink(8), this is location for Fink configuration file, presumably
# regardless of where Fink itself is installed.
Modified: branches/stepdescription/config/auto/format.pm
==============================================================================
--- branches/stepdescription/config/auto/format.pm (original)
+++ branches/stepdescription/config/auto/format.pm Sat Aug 9 08:01:13 2008
@@ -24,7 +24,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Figuring out what formats should be used for
sprintf};
+ $data{description} = q{What formats should be used for sprintf};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/auto/funcptr.pm
==============================================================================
--- branches/stepdescription/config/auto/funcptr.pm (original)
+++ branches/stepdescription/config/auto/funcptr.pm Sat Aug 9 08:01:13 2008
@@ -24,7 +24,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Verifying that the compiler supports function
pointer casts};
+ $data{description} = q{Does compiler support function pointer casts};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/auto/gc.pm
==============================================================================
--- branches/stepdescription/config/auto/gc.pm (original)
+++ branches/stepdescription/config/auto/gc.pm Sat Aug 9 08:01:13 2008
@@ -54,7 +54,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining what allocator to use};
+ $data{description} = q{Determine allocator to use};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/auto/gcc.pm
==============================================================================
--- branches/stepdescription/config/auto/gcc.pm (original)
+++ branches/stepdescription/config/auto/gcc.pm Sat Aug 9 08:01:13 2008
@@ -24,7 +24,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining if your C compiler is actually gcc};
+ $data{description} = q{Is your C compiler actually gcc};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/auto/gdbm.pm
==============================================================================
--- branches/stepdescription/config/auto/gdbm.pm (original)
+++ branches/stepdescription/config/auto/gdbm.pm Sat Aug 9 08:01:13 2008
@@ -29,7 +29,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining if your platform supports gdbm};
+ $data{description} = q{Does your platform support gdbm};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/auto/gettext.pm
==============================================================================
--- branches/stepdescription/config/auto/gettext.pm (original)
+++ branches/stepdescription/config/auto/gettext.pm Sat Aug 9 08:01:13 2008
@@ -29,7 +29,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Seeing if your configuration includes gettext};
+ $data{description} = q{Does your configuration include gettext};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/auto/glibc.pm
==============================================================================
--- branches/stepdescription/config/auto/glibc.pm (original)
+++ branches/stepdescription/config/auto/glibc.pm Sat Aug 9 08:01:13 2008
@@ -24,7 +24,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Seeing if GNU libc is installed};
+ $data{description} = q{Is GNU libc installed};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/auto/gmp.pm
==============================================================================
--- branches/stepdescription/config/auto/gmp.pm (original)
+++ branches/stepdescription/config/auto/gmp.pm Sat Aug 9 08:01:13 2008
@@ -32,7 +32,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining if your platform supports GMP};
+ $data{description} = q{Does your platform support GMP};
$data{result} = q{};
$data{cc_run_expected} =
"6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151
0\n";
Modified: branches/stepdescription/config/auto/headers.pm
==============================================================================
--- branches/stepdescription/config/auto/headers.pm (original)
+++ branches/stepdescription/config/auto/headers.pm Sat Aug 9 08:01:13 2008
@@ -22,7 +22,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Probing for C headers};
+ $data{description} = q{Probe for C headers};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/auto/icu.pm
==============================================================================
--- branches/stepdescription/config/auto/icu.pm (original)
+++ branches/stepdescription/config/auto/icu.pm Sat Aug 9 08:01:13 2008
@@ -32,7 +32,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining whether ICU is installed};
+ $data{description} = q{Is ICU installed};
$data{result} = q{};
# The following key-value pairs are defined here rather than being buried
# deep inside subroutines below. Also, so that they can be overridden
Modified: branches/stepdescription/config/auto/inline.pm
==============================================================================
--- branches/stepdescription/config/auto/inline.pm (original)
+++ branches/stepdescription/config/auto/inline.pm Sat Aug 9 08:01:13 2008
@@ -24,7 +24,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining if your compiler supports inline};
+ $data{description} = q{Does your compiler support inline};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/auto/isreg.pm
==============================================================================
--- branches/stepdescription/config/auto/isreg.pm (original)
+++ branches/stepdescription/config/auto/isreg.pm Sat Aug 9 08:01:13 2008
@@ -24,7 +24,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining if your C library has a working
S_ISREG};
+ $data{description} = q{Does your C library have a working S_ISREG};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/auto/jit.pm
==============================================================================
--- branches/stepdescription/config/auto/jit.pm (original)
+++ branches/stepdescription/config/auto/jit.pm Sat Aug 9 08:01:13 2008
@@ -28,7 +28,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining JIT capability};
+ $data{description} = q{Determine JIT capability};
$data{result} = q{};
$data{jit_is_working} = {
i386 => 1,
Modified: branches/stepdescription/config/auto/macports.pm
==============================================================================
--- branches/stepdescription/config/auto/macports.pm (original)
+++ branches/stepdescription/config/auto/macports.pm Sat Aug 9 08:01:13 2008
@@ -35,7 +35,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining Macports location on Darwin};
+ $data{description} = q{Determine Macports location on Darwin};
$data{result} = q{};
my $optlocal = File::Spec->catdir( '/', 'opt', 'local' );
$data{ports_root} = (defined $ENV{TEST_MACPORTS})
Modified: branches/stepdescription/config/auto/memalign.pm
==============================================================================
--- branches/stepdescription/config/auto/memalign.pm (original)
+++ branches/stepdescription/config/auto/memalign.pm Sat Aug 9 08:01:13 2008
@@ -24,7 +24,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining if your C library supports memalign};
+ $data{description} = q{Does your C library support memalign};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/auto/msvc.pm
==============================================================================
--- branches/stepdescription/config/auto/msvc.pm (original)
+++ branches/stepdescription/config/auto/msvc.pm Sat Aug 9 08:01:13 2008
@@ -24,7 +24,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining if your C compiler is actually Visual
C++};
+ $data{description} = q{Is your C compiler actually Visual C++};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/auto/opengl.pm
==============================================================================
--- branches/stepdescription/config/auto/opengl.pm (original)
+++ branches/stepdescription/config/auto/opengl.pm Sat Aug 9 08:01:13 2008
@@ -139,7 +139,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining if your platform supports OpenGL};
+ $data{description} = q{Does your platform support OpenGL};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/auto/ops.pm
==============================================================================
--- branches/stepdescription/config/auto/ops.pm (original)
+++ branches/stepdescription/config/auto/ops.pm Sat Aug 9 08:01:13 2008
@@ -24,7 +24,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining what opcode files should be compiled
in};
+ $data{description} = q{Which opcode files should be compiled in};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/auto/pcre.pm
==============================================================================
--- branches/stepdescription/config/auto/pcre.pm (original)
+++ branches/stepdescription/config/auto/pcre.pm Sat Aug 9 08:01:13 2008
@@ -24,7 +24,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining if your platform supports pcre};
+ $data{description} = q{Does your platform support pcre};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/auto/perldoc.pm
==============================================================================
--- branches/stepdescription/config/auto/perldoc.pm (original)
+++ branches/stepdescription/config/auto/perldoc.pm Sat Aug 9 08:01:13 2008
@@ -28,7 +28,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining whether perldoc is installed};
+ $data{description} = q{Is perldoc installed};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/auto/pmc.pm
==============================================================================
--- branches/stepdescription/config/auto/pmc.pm (original)
+++ branches/stepdescription/config/auto/pmc.pm Sat Aug 9 08:01:13 2008
@@ -26,7 +26,7 @@
sub _init {
my $self = shift;
return {
- description => 'Determining what pmc files should be compiled in',
+ description => 'Which pmc files should be compiled in',
result => '',
PMC_PARENTS => {},
srcpmc => [ sort map { basename($_) } glob "./src/pmc/*.pmc" ],
Modified: branches/stepdescription/config/auto/readline.pm
==============================================================================
--- branches/stepdescription/config/auto/readline.pm (original)
+++ branches/stepdescription/config/auto/readline.pm Sat Aug 9 08:01:13 2008
@@ -28,7 +28,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining if your platform supports readline};
+ $data{description} = q{Does your platform support readline};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/auto/revision.pm
==============================================================================
--- branches/stepdescription/config/auto/revision.pm (original)
+++ branches/stepdescription/config/auto/revision.pm Sat Aug 9 08:01:13 2008
@@ -24,7 +24,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining Parrot's revision};
+ $data{description} = q{Determine Parrot's revision};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/auto/signal.pm
==============================================================================
--- branches/stepdescription/config/auto/signal.pm (original)
+++ branches/stepdescription/config/auto/signal.pm Sat Aug 9 08:01:13 2008
@@ -24,7 +24,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining some signal stuff};
+ $data{description} = q{Determine some signal stuff};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/auto/sizes.pm
==============================================================================
--- branches/stepdescription/config/auto/sizes.pm (original)
+++ branches/stepdescription/config/auto/sizes.pm Sat Aug 9 08:01:13 2008
@@ -24,7 +24,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining some sizes};
+ $data{description} = q{Determine some sizes};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/auto/snprintf.pm
==============================================================================
--- branches/stepdescription/config/auto/snprintf.pm (original)
+++ branches/stepdescription/config/auto/snprintf.pm Sat Aug 9 08:01:13 2008
@@ -21,7 +21,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Testing snprintf};
+ $data{description} = q{Test snprintf};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/auto/socklen_t.pm
==============================================================================
--- branches/stepdescription/config/auto/socklen_t.pm (original)
+++ branches/stepdescription/config/auto/socklen_t.pm Sat Aug 9 08:01:13 2008
@@ -24,7 +24,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining whether there is socklen_t};
+ $data{description} = q{Determine whether there is socklen_t};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/auto/va_ptr.pm
==============================================================================
--- branches/stepdescription/config/auto/va_ptr.pm (original)
+++ branches/stepdescription/config/auto/va_ptr.pm Sat Aug 9 08:01:13 2008
@@ -24,8 +24,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} =
- q{Test the type of va_ptr (this test is likely to segfault)};
+ $data{description} = q{Test the type of va_ptr};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/auto/warnings.pm
==============================================================================
--- branches/stepdescription/config/auto/warnings.pm (original)
+++ branches/stepdescription/config/auto/warnings.pm Sat Aug 9 08:01:13 2008
@@ -31,7 +31,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Detecting supported compiler warnings (-Wxxx)};
+ $data{description} = q{Detect supported compiler warnings};
$data{result} = q{};
# potential addition? -fvisibility=hidden
Modified: branches/stepdescription/config/gen/call_list.pm
==============================================================================
--- branches/stepdescription/config/gen/call_list.pm (original)
+++ branches/stepdescription/config/gen/call_list.pm Sat Aug 9 08:01:13 2008
@@ -32,7 +32,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Generating NCI signature list};
+ $data{description} = q{Generate NCI signature list};
$data{result} = q{};
$data{fragment_files} = [ sort glob 'config/gen/call_list/*.in' ];
return \%data;
Modified: branches/stepdescription/config/gen/config_h.pm
==============================================================================
--- branches/stepdescription/config/gen/config_h.pm (original)
+++ branches/stepdescription/config/gen/config_h.pm Sat Aug 9 08:01:13 2008
@@ -27,7 +27,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Generating C headers};
+ $data{description} = q{Generate C headers};
$data{result} = q{};
$data{templates} = {
config_h => 'config/gen/config_h/config_h.in',
Modified: branches/stepdescription/config/gen/config_pm.pm
==============================================================================
--- branches/stepdescription/config/gen/config_pm.pm (original)
+++ branches/stepdescription/config/gen/config_pm.pm Sat Aug 9 08:01:13 2008
@@ -27,7 +27,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Recording configuration data for later retrieval};
+ $data{description} = q{Record configuration data for later retrieval};
$data{result} = q{};
$data{templates} = {
myconfig => 'config/gen/config_pm/myconfig.in',
Modified: branches/stepdescription/config/gen/core_pmcs.pm
==============================================================================
--- branches/stepdescription/config/gen/core_pmcs.pm (original)
+++ branches/stepdescription/config/gen/core_pmcs.pm Sat Aug 9 08:01:13 2008
@@ -24,7 +24,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Generating core pmc list};
+ $data{description} = q{Generate core pmc list};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/gen/crypto.pm
==============================================================================
--- branches/stepdescription/config/gen/crypto.pm (original)
+++ branches/stepdescription/config/gen/crypto.pm Sat Aug 9 08:01:13 2008
@@ -24,7 +24,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Generating Digest PMC files};
+ $data{description} = q{Generate Digest PMC files};
$data{result} = q{};
$data{digest} = {
MD2 => {},
Modified: branches/stepdescription/config/gen/languages.pm
==============================================================================
--- branches/stepdescription/config/gen/languages.pm (original)
+++ branches/stepdescription/config/gen/languages.pm Sat Aug 9 08:01:13 2008
@@ -34,7 +34,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Configuring languages};
+ $data{description} = q{Configure languages};
$data{result} = q{};
$data{default_languages} = qq{
APL abc
Modified: branches/stepdescription/config/gen/makefiles.pm
==============================================================================
--- branches/stepdescription/config/gen/makefiles.pm (original)
+++ branches/stepdescription/config/gen/makefiles.pm Sat Aug 9 08:01:13 2008
@@ -24,7 +24,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Generating makefiles and other build files};
+ $data{description} = q{Generate makefiles and other build files};
$data{result} = q{};
$data{makefiles} = {
'Makefile' => { SOURCE => 'config/gen/makefiles/root.in' },
Modified: branches/stepdescription/config/gen/parrot_include.pm
==============================================================================
--- branches/stepdescription/config/gen/parrot_include.pm (original)
+++ branches/stepdescription/config/gen/parrot_include.pm Sat Aug 9
08:01:13 2008
@@ -24,7 +24,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Generating runtime/parrot/include};
+ $data{description} = q{Generate runtime/parrot/include};
$data{result} = q{};
$data{source_files} = [ qw(
include/parrot/cclass.h
Modified: branches/stepdescription/config/gen/platform.pm
==============================================================================
--- branches/stepdescription/config/gen/platform.pm (original)
+++ branches/stepdescription/config/gen/platform.pm Sat Aug 9 08:01:13 2008
@@ -24,7 +24,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Moving platform files into place};
+ $data{description} = q{Move platform files into place};
$data{result} = q{};
$data{platform_interface} = q{config/gen/platform/platform_interface.h};
$data{coda} = <<'CODA';
Modified: branches/stepdescription/config/init/defaults.pm
==============================================================================
--- branches/stepdescription/config/init/defaults.pm (original)
+++ branches/stepdescription/config/init/defaults.pm Sat Aug 9 08:01:13 2008
@@ -29,7 +29,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Setting up Configure's default values};
+ $data{description} = q{Set Configure's default values};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/init/headers.pm
==============================================================================
--- branches/stepdescription/config/init/headers.pm (original)
+++ branches/stepdescription/config/init/headers.pm Sat Aug 9 08:01:13 2008
@@ -26,7 +26,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Finding header files distributed with Parrot};
+ $data{description} = q{Find header files distributed with Parrot};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/init/hints.pm
==============================================================================
--- branches/stepdescription/config/init/hints.pm (original)
+++ branches/stepdescription/config/init/hints.pm Sat Aug 9 08:01:13 2008
@@ -23,7 +23,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Loading platform and local hints files};
+ $data{description} = q{Load platform and local hints files};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/init/install.pm
==============================================================================
--- branches/stepdescription/config/init/install.pm (original)
+++ branches/stepdescription/config/init/install.pm Sat Aug 9 08:01:13 2008
@@ -21,7 +21,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Setting up installation paths};
+ $data{description} = q{Set up installation paths};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/init/manifest.pm
==============================================================================
--- branches/stepdescription/config/init/manifest.pm (original)
+++ branches/stepdescription/config/init/manifest.pm Sat Aug 9 08:01:13 2008
@@ -26,7 +26,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Checking MANIFEST};
+ $data{description} = q{Check MANIFEST};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/init/miniparrot.pm
==============================================================================
--- branches/stepdescription/config/init/miniparrot.pm (original)
+++ branches/stepdescription/config/init/miniparrot.pm Sat Aug 9 08:01:13 2008
@@ -26,7 +26,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Tweaking settings for miniparrot};
+ $data{description} = q{Tweak settings for miniparrot};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/init/optimize.pm
==============================================================================
--- branches/stepdescription/config/init/optimize.pm (original)
+++ branches/stepdescription/config/init/optimize.pm Sat Aug 9 08:01:13 2008
@@ -22,7 +22,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Enabling optimization};
+ $data{description} = q{Enable optimization};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/inter/charset.pm
==============================================================================
--- branches/stepdescription/config/inter/charset.pm (original)
+++ branches/stepdescription/config/inter/charset.pm Sat Aug 9 08:01:13 2008
@@ -26,7 +26,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining what charset files should be compiled
in};
+ $data{description} = q{Which charset files should be compiled in};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/inter/encoding.pm
==============================================================================
--- branches/stepdescription/config/inter/encoding.pm (original)
+++ branches/stepdescription/config/inter/encoding.pm Sat Aug 9 08:01:13 2008
@@ -26,7 +26,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining what encoding files should be compiled
in};
+ $data{description} = q{Which encoding files should be compiled in};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/inter/lex.pm
==============================================================================
--- branches/stepdescription/config/inter/lex.pm (original)
+++ branches/stepdescription/config/inter/lex.pm Sat Aug 9 08:01:13 2008
@@ -25,7 +25,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining whether lex is installed};
+ $data{description} = q{Is lex installed};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/inter/libparrot.pm
==============================================================================
--- branches/stepdescription/config/inter/libparrot.pm (original)
+++ branches/stepdescription/config/inter/libparrot.pm Sat Aug 9 08:01:13 2008
@@ -25,7 +25,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determine if parrot should be linked against a
shared library};
+ $data{description} = q{Should parrot link against a shared library};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/inter/make.pm
==============================================================================
--- branches/stepdescription/config/inter/make.pm (original)
+++ branches/stepdescription/config/inter/make.pm Sat Aug 9 08:01:13 2008
@@ -23,7 +23,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining whether make is installed};
+ $data{description} = q{Is make installed};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/inter/progs.pm
==============================================================================
--- branches/stepdescription/config/inter/progs.pm (original)
+++ branches/stepdescription/config/inter/progs.pm Sat Aug 9 08:01:13 2008
@@ -26,7 +26,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining what C compiler and linker to use};
+ $data{description} = q{Determine what C compiler and linker to use};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/inter/shlibs.pm
==============================================================================
--- branches/stepdescription/config/inter/shlibs.pm (original)
+++ branches/stepdescription/config/inter/shlibs.pm Sat Aug 9 08:01:13 2008
@@ -29,7 +29,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining flags for building shared libraries};
+ $data{description} = q{Determine flags for building shared libraries};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/inter/types.pm
==============================================================================
--- branches/stepdescription/config/inter/types.pm (original)
+++ branches/stepdescription/config/inter/types.pm Sat Aug 9 08:01:13 2008
@@ -25,7 +25,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining what types Parrot should use};
+ $data{description} = q{What types should Parrot use};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/config/inter/yacc.pm
==============================================================================
--- branches/stepdescription/config/inter/yacc.pm (original)
+++ branches/stepdescription/config/inter/yacc.pm Sat Aug 9 08:01:13 2008
@@ -25,7 +25,7 @@
sub _init {
my $self = shift;
my %data;
- $data{description} = q{Determining whether yacc is installed};
+ $data{description} = q{Is yacc installed};
$data{result} = q{};
return \%data;
}
Modified: branches/stepdescription/lib/Parrot/Configure.pm
==============================================================================
--- branches/stepdescription/lib/Parrot/Configure.pm (original)
+++ branches/stepdescription/lib/Parrot/Configure.pm Sat Aug 9 08:01:13 2008
@@ -392,8 +392,14 @@
}
}
+ my $stub = qq{$step_name - };
+ my $message = $stub .
+ (q{ } x (22 - length($stub))) .
+ $step->description .
+ '...';
+ my $length_message = length($message);
unless ($args->{silent}) {
- print "\n", $step->description, '...';
+ print "\n", $message;
print "\n" if $args->{verbose} && $args->{verbose} == 2;
}
@@ -415,6 +421,7 @@
step_name => $step_name,
args => $args,
description => $step->description,
+ length_message => $length_message,
}
);
}
@@ -452,7 +459,7 @@
if ( $argsref->{args}->{verbose} && $argsref->{args}->{verbose} == 2 ) {
print "...";
}
- print "." x ( 71 - length($argsref->{description}) - length($result) );
+ print "." x ( 78 - ( $argsref->{length_message} + length($result) ) );
unless ( $argsref->{step_name} =~ m{^inter} && $argsref->{args}->{ask} ) {
print "$result.";
}
