[m-rev.] trivial diff: wrap long line

[Fergus Henderson]

Estimated hours taken: 0.05
Branches: main

extras/moose/tables.m:
	Wrap a long line.

Workspace: /mnt/ceres/home/ceres/fjh/mercury
Index: extras/moose/tables.m
===================================================================
RCS file: /home/mercury1/repository/mercury/extras/moose/tables.m,v
retrieving revision 1.2
diff -u -d -r1.2 tables.m
--- extras/moose/tables.m	16 Jul 2003 07:16:03 -0000	1.2
+++ extras/moose/tables.m	24 Feb 2004 08:52:36 -0000
@@ -129,7 +129,9 @@
 			map__search(ILAs, A, Alphas)
 		->
 			set__to_sorted_list(Alphas, AlphaList),
-			list__foldl2((pred(T::in, !.Actions::in, !:Actions::out, 					!.Errs::in, !:Errs::out) is det :-
+			list__foldl2((pred(T::in,
+					!.Actions::in, !:Actions::out,
+					!.Errs::in, !:Errs::out) is det :-
 				( Ip = 0, T = ($) ->
 					addaction(Sn, T, accept, !Actions, 
 						!Errs)

-- 
Fergus Henderson <fjh at cs.mu.oz.au>  |  "I have always known that the pursuit
The University of Melbourne         |  of excellence is a lethal habit"
WWW: <http://www.cs.mu.oz.au/~fjh>  |     -- the last words of T. S. Garp.
--------------------------------------------------------------------------
mercury-reviews mailing list
post:  mercury-reviews at cs.mu.oz.au
administrative address: owner-mercury-reviews at cs.mu.oz.au
unsubscribe: Address: mercury-reviews-request at cs.mu.oz.au Message: unsubscribe
subscribe:   Address: mercury-reviews-request at cs.mu.oz.au Message: subscribe
--------------------------------------------------------------------------