-Interface issues

2019-05-01 01:34:58 +01:00
parent 54a222e5df
commit 7c16af4edf
15 changed files with 201 additions and 168 deletions
--- a/os/writeterm.c
+++ b/os/writeterm.c
@@ -729,6 +729,7 @@ char *Yap_TermToBuffer(Term t, int flags) {
    t = Deref(t);
  GLOBAL_Stream[sno].encoding = LOCAL_encoding;
  GLOBAL_Stream[sno].status |= CloseOnException_Stream_f;
+  GLOBAL_Stream[sno].status &= ~FreeOnClose_Stream_f;
  Yap_plwrite(t, GLOBAL_Stream + sno, 0, flags, GLOBAL_MaxPriority);

  char *new = Yap_MemExportStreamPtr(sno);