Simplify parsing a bit, and make sure the prolog loader calls read_term with the correct module to pick up the correct operators

1 files changed, 2 insertions, 2 deletions

diff --git a/streams.c b/streams.c
index 5706566..4b4b965 100644
--- a/streams.c
+++ b/streams.c
@@ -217,14 +217,14 @@ canreposition(Term *t)
 }
 
 int
-readterm(Term *stream, Term **term)
+readterm(Term *stream, Term **term, Module *mod)
 {
 	Stream *s = getstream(stream);
 	if(s == nil){
 		*term = existenceerror(L"stream", stream);
 		return 1;
 	}
-	*term = parse(0, s->bio, 1);
+	*term = parse(s->bio, mod);
 
 	return 0;
 }