[m-dev.] trivial diff: fix undocumented `no's

Simon Taylor stayl at cs.mu.OZ.AU
Fri Jul 16 16:42:49 AEST 1999


Estimated hours taken: 0.1

compiler/magic.m:
	Fix uncommented `no's in construction goals
	that I missed in the review.

Index: magic.m
===================================================================
RCS file: /home/staff/zs/imp/mercury/compiler/magic.m,v
retrieving revision 1.7
diff -u -u -r1.7 magic.m
--- magic.m	1999/07/14 04:17:13	1.7
+++ magic.m	1999/07/14 06:22:34
@@ -1158,7 +1158,10 @@
 	instmap_delta_init_reachable(Delta0),
 	instmap_delta_insert(Delta0, Var, Inst, Delta),
 	UnifyMode = (free -> Inst) - (Inst -> Inst),
-	Uni = construct(Var, ConsId, [], [], no, cell_is_unique, no),
+	ReuseVar = no,
+	RLExprnId = no,
+	Uni = construct(Var, ConsId, [], [],
+		ReuseVar, cell_is_unique, RLExprnId),
 	Context = unify_context(explicit, []),
 	goal_info_init(NonLocals, Delta, det, GoalInfo),
 	Goal = unify(Var, functor(ConsId, []), UnifyMode, Uni, Context) -
--------------------------------------------------------------------------
mercury-developers mailing list
Post messages to:       mercury-developers at cs.mu.oz.au
Administrative Queries: owner-mercury-developers at cs.mu.oz.au
Subscriptions:          mercury-developers-request at cs.mu.oz.au
--------------------------------------------------------------------------



More information about the developers mailing list