have println go out user_io

logicmoo · Dec 24, 2024 · fdcf0ff · fdcf0ff
1 parent ec5fed2
commit fdcf0ff
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/prolog/metta_lang/metta_eval.pl b/prolog/metta_lang/metta_eval.pl
@@ -682,7 +682,7 @@
   maplist(println_impl,Out),
   make_nop(RetType,[],Res),check_returnval(Eq,RetType,Res).
 
-println_impl(X):- format("~N~@~N",[write_sln(X)]),!,flush_output.
+println_impl(X):- ttyflush,user_io((format("~N~@~N",[write_sln(X)]))),!,flush_output,ttyflush.
 %println_impl(X):- user_io((ansi_format(fg('#c7ea46'),"~N~@~N",[write_sln(X)]))),flush_output.
 %println_impl(X):- ((ansi_format(fg('#c7ea46'),"~N~@~N",[write_sln(X)]))),flush_output.