[m-rev.] trivial diff: avoid compiler warning in opengl binding

[Julien Fischer]

Estimated hours taken: 0.1
Branches: main

Avoid a compiler warning in the opengl binding.

extras/graphics/mercury_opengl/mogl.m:
	Avoid a compiler warning.

Julien.


Index: mogl.m
===================================================================
RCS file: /home/mercury1/repository/mercury/extras/graphics/mercury_opengl/mogl.m,v
retrieving revision 1.10
diff -u -r1.10 mogl.m
--- mogl.m	17 May 2004 08:23:55 -0000	1.10
+++ mogl.m	6 Jun 2004 13:44:36 -0000
@@ -4317,7 +4317,7 @@
 	IO = IO0;
 ").

-push_attrib([], !IO) :- error("No server attribute groups specified").
+push_attrib([], _, _) :- error("No server attribute groups specified.").
 push_attrib(Groups @ [_|_], !IO) :-
 	Mask = list__foldr((\/), list__map(server_attrib_group_to_bit, Groups),
 		0),
--------------------------------------------------------------------------
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
--------------------------------------------------------------------------