[m-rev.] diff: fix compilation of extras/stream

[Julien Fischer]

Estimated hours taken: 0.1
Branches: main, release

Fix compilation fo extras/stream.

extras/stream/stream.m:
	Provide a dummy definition for the stream type, since we don't
	allow abstract types to not have a definition anymore.

	Fix the ordering of module imports so that it conforms
	to our current coding standard.

Julien.

Index: stream.m
===================================================================
RCS file: /home/mercury1/repository/mercury/extras/stream/stream.m,v
retrieving revision 1.2
diff -u -r1.2 stream.m
--- stream.m	22 Nov 2001 11:04:41 -0000	1.2
+++ stream.m	29 Apr 2005 00:36:47 -0000
@@ -192,16 +192,23 @@
 		<= (stream__input(InputS), stream__output(OutputS)).

 %-----------------------------------------------------------------------------%
+%-----------------------------------------------------------------------------%

 :- implementation.

 	% These two imports are only so that when building a stand-alone
 	% stream library we include the following modules in the
 	% library.
-:- import_module (impure), lowlevel.
-
+:- import_module (impure).
+:- import_module lowlevel.
 :- import_module mvar.
-:- import_module int, string.
+
+:- import_module int.
+:- import_module string.
+
+%-----------------------------------------------------------------------------%
+
+:- type stream(S) ---> stream.

 :- type putback(S)
 	--->	pb(

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