fix copy_term

2018-06-27 16:38:17 +01:00
parent f2d6c99c8a
commit cdd892c012
16 changed files with 138 additions and 122 deletions
--- a/C/c_interface.c
+++ b/C/c_interface.c
@@ -2167,7 +2167,7 @@ X_API FILE *YAP_TermToStream(Term t) {
 X_API void YAP_EndConsult(int sno, int *osnop, const char *full) {
  BACKUP_MACHINE_REGS();
  Yap_CloseStream(sno);
-  Yap_ChDir(full);
+  Yap_ChDir(dirname(full));
  if (osnop >= 0)
    Yap_AddAlias(AtomLoopStream, *osnop);
  Yap_end_consult();