[m-rev.] diff: fix bug with rethrow/1 on .NET

Fergus Henderson fjh at cs.mu.OZ.AU
Wed Jul 23 18:07:41 AEST 2003


Estimated hours taken: 0.5
Branches: main

library/exception.m:
	Fix a bug: rethrow/1 should call throw_impl/1, not builtin_throw/1,
	since builtin_throw/1 only works for the C back-end, whereas
	throw_impl/1 works for both the C and .NET back-ends.

Workspace: /home/ceres/fjh/mercury
Index: library/exception.m
===================================================================
RCS file: /home/mercury1/repository/mercury/library/exception.m,v
retrieving revision 1.77
diff -u -d -r1.77 exception.m
--- library/exception.m	29 May 2003 12:08:25 -0000	1.77
+++ library/exception.m	15 Jul 2003 00:00:51 -0000
@@ -283,7 +283,7 @@
 	throw(Exception).
 
 rethrow(exception(Univ)) :-
-	builtin_throw(Univ).
+	throw_impl(Univ).
 
 rethrow(ExceptionResult) = _ :-
 	rethrow(ExceptionResult).

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



More information about the reviews mailing list