add temporary definitions.

2011-02-14 11:46:27 -08:00 · 2011-02-14 11:46:27 -08:00 · 6469a0d464
commit 6469a0d464
parent 5fda308e23
1 changed files with 4 additions and 0 deletions
--- a/pl/boot.yap
+++ b/pl/boot.yap
@ -1439,6 +1439,10 @@ flush_output(Stream) :-
 ttyflush :-
 	swi_ttyflush.

+current_input(Stream) :-
+	swi_current_input(Stream).
+current_output(Stream) :-
+	swi_current_output(Stream).
 set_input(Stream) :-
 	swi_set_input(Stream).
 set_output(Stream) :-