[m-rev.] trivial diff: avoid a warning in samples/rot13

[Julien Fischer]

Estimated hours taken: 0
Branches: main, release

samples/rot13/rot13_ralph.m:
 	Avoid a warning about a variable having overlapping scopes.

Julien.

Index: rot13_ralph.m
===================================================================
RCS file: /home/mercury/mercury1/repository/mercury/samples/rot13/rot13_ralph.m,v
retrieving revision 1.1
diff -u -r1.1 rot13_ralph.m
--- rot13_ralph.m	31 Jan 2001 09:22:07 -0000	1.1
+++ rot13_ralph.m	11 Sep 2006 02:34:50 -0000
@@ -44,7 +44,7 @@
        else X
      )
   :-
-    Rot13 = ( func(X, A) = ((13 + X - A) `rem` 26) + A ).
+    Rot13 = ( func(C, A) = ((13 + C - A) `rem` 26) + A ).

  % ---------------------------------------------------------------------------- %
  % ---------------------------------------------------------------------------- %

--------------------------------------------------------------------------
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
--------------------------------------------------------------------------