diff --git a/C/iopreds.c b/C/iopreds.c index aabff3d5b..3136eb8c4 100644 --- a/C/iopreds.c +++ b/C/iopreds.c @@ -454,9 +454,9 @@ PlIOError (yap_error_number type, Term culprit, char *who) if (Yap_GetValue(Yap_LookupAtom("fileerrors")) == MkIntTerm(1)) { Yap_Error(type, culprit, who); /* and fail */ - return(FALSE); + return FALSE; } else { - return(FALSE); + return FALSE; } } diff --git a/pl/boot.yap b/pl/boot.yap index d5420bffb..261ba0220 100644 --- a/pl/boot.yap +++ b/pl/boot.yap @@ -47,6 +47,7 @@ true :- true. true ), '$set_yap_flags'(10,0), + set_value(fileerrors,1), set_value('$gc',on), set_value('$verbose',on), ('$exit_undefp' -> true ; true),