cvsuser 04/10/09 05:35:15
Modified: build_tools ops2pm.pl
Log:
0.1.1 - no ops.num warning
Revision Changes Path
1.16 +8 -8 parrot/build_tools/ops2pm.pl
Index: ops2pm.pl
===================================================================
RCS file: /cvs/public/parrot/build_tools/ops2pm.pl,v
retrieving revision 1.15
retrieving revision 1.16
diff -u -w -r1.15 -r1.16
--- ops2pm.pl 4 Apr 2004 23:44:33 -0000 1.15
+++ ops2pm.pl 9 Oct 2004 12:35:15 -0000 1.16
@@ -1,6 +1,6 @@
#! perl -w
# Copyright: 2001-2003 The Perl Foundation. All Rights Reserved.
-# $Id: ops2pm.pl,v 1.15 2004/04/04 23:44:33 mikescott Exp $
+# $Id: ops2pm.pl,v 1.16 2004/10/09 12:35:15 leo Exp $
=head1 NAME
@@ -194,7 +194,7 @@
return $ParrotOps::optable{$opname};
} else {
my $n = $ParrotOps::optable{$opname} = ++$ParrotOps::max_op_num;
- warn "$opname\t$n\tnot mentioned in ops.num\n";
+ warn "$opname\t$n\tnot mentioned in ops.num\n" if -e "DEVELOPING";
return $n;
}
}