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.

src/builtin/builtins.pl

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