[m-rev.] for review: remove -w perl option in mtags

[Ian MacLarty]

For review by anyone.

Estimated hours taken: 0.2
Branches: main

scripts/mtags.in:
	Remove -w flag.  Otherwise mtags prints a whole lot of warnings for the
	following input:

:- some [Store]
     ( pred minitstore(db_details,options,options,Store,io__state,io__state)
	      => (rdfStore__rdfStore(Store), rdfStore__rdfStoreTStore(Store) ) ).

	The warnings it prints are:

Use of uninitialized value in pattern match (m//) at mtags line 382, <SRCFILE> line 1.
Use of uninitialized value in pattern match (m//) at mtags line 382, <SRCFILE> line 1.
Use of uninitialized value in string eq at mtags line 392, <SRCFILE> line 1.
Use of uninitialized value in string eq at mtags line 392, <SRCFILE> line 1.
Use of uninitialized value in string eq at mtags line 392, <SRCFILE> line 1.
Use of uninitialized value in string eq at mtags line 392, <SRCFILE> line 1.
Use of uninitialized value in string eq at mtags line 392, <SRCFILE> line 1.
Use of uninitialized value in string eq at mtags line 392, <SRCFILE> line 1.
Use of uninitialized value in string eq at mtags line 392, <SRCFILE> line 1.

	I couldn't work out what uninitialized value it is complaining about.
	Even if I explicitly initialize $decl I still get the same warning.

Index: scripts/mtags.in
===================================================================
RCS file: /home/mercury1/repository/mercury/scripts/mtags.in,v
retrieving revision 1.1
diff -u -r1.1 mtags.in
--- scripts/mtags.in	18 Dec 2007 22:35:36 -0000	1.1
+++ scripts/mtags.in	30 Jan 2008 02:52:35 -0000
@@ -1,7 +1,7 @@
-#!@PERL@ -w
+#!@PERL@
 # vim: ts=4 sw=4 et
 #---------------------------------------------------------------------------#
-# Copyright (C) 1994-2001, 2003, 2005-2007 The University of Melbourne.
+# Copyright (C) 1994-2001, 2003, 2005-2008 The University of Melbourne.
 # This file may only be copied under the terms of the GNU General
 # Public License - see the file COPYING in the Mercury distribution.
 #---------------------------------------------------------------------------#
--------------------------------------------------------------------------
mercury-reviews mailing list
Post messages to:       mercury-reviews at csse.unimelb.edu.au
Administrative Queries: owner-mercury-reviews at csse.unimelb.edu.au
Subscriptions:          mercury-reviews-request at csse.unimelb.edu.au
--------------------------------------------------------------------------