Fix consult/1 to report loading time to current output
A misplaced '.' prevented all parts of the predicate from going
together into a single sequence of steps.
diff --git a/src/builtin/builtins.pl b/src/builtin/builtins.pl
index 1fa2405..f0e3178 100644
--- a/src/builtin/builtins.pl
+++ b/src/builtin/builtins.pl
@@ -2064,8 +2064,8 @@
print_message(info, [consulting,File,'...']),
statistics(runtime, _),
consult_stream(File, In),
- statistics(runtime, [_,T]).
- print_message(info, [File,'consulted,',T,msec]),
+ statistics(runtime, [_,T]),
+ print_message(info, [File,consulted,T,msec]),
close(In).
consult_stream(File, In) :-