Author: fperrad
Date: Fri Mar 21 07:12:08 2008
New Revision: 26509
Modified:
trunk/compilers/imcc/main.c
Log:
[imcc]
fix version message when building a release :
- DEVELOPING is removed
- so Parrot_revision & Parrot_config_revision give 0
(see lib/Parrot/Revision/Util.pm)
with the latest release, the current message is :
This is parrot version 0.6.0 (r26483) built for i386-MSWin32.
Warning: runtime has revision 0!
Warning: used Configure.pl revision 0!
Copyright (C) 2001-2008, The Perl Foundation.
Modified: trunk/compilers/imcc/main.c
==============================================================================
--- trunk/compilers/imcc/main.c (original)
+++ trunk/compilers/imcc/main.c Fri Mar 21 07:12:08 2008
@@ -236,17 +236,17 @@
static void
Parrot_version(PARROT_INTERP)
{
- int rev = PARROT_REVISION;
+ int rev;
printf("This is parrot version " PARROT_VERSION);
+ rev = Parrot_revision();
if (rev != 0)
- printf(" (r%d)", rev);
+ printf(" (r%d)", PARROT_REVISION);
printf(" built for " PARROT_ARCHNAME ".\n");
- rev = Parrot_revision();
- if (PARROT_REVISION != rev) {
+ if (rev != 0 && PARROT_REVISION != rev) {
printf("Warning: runtime has revision %d!\n", rev);
}
rev = Parrot_config_revision();
- if (PARROT_REVISION != rev) {
+ if (rev != 0 && PARROT_REVISION != rev) {
printf("Warning: used Configure.pl revision %d!\n", rev);
}
printf("Copyright (C) 2001-2008, The Perl Foundation.\n\
