Merge branch 'master' of yap.dcc.fc.up.pt:yap-6

C/save.c

@@ -608,6 +608,8 @@ do_save(int mode) {
 static Int 
 p_save(void)
 {
+  Int res;
+
 #if defined(YAPOR) && !defined(THREADS)
   if (number_workers != 1) {
     Yap_Error(SYSTEM_ERROR,TermNil,"cannot perform save: more than a worker/thread running");
@@ -620,7 +622,10 @@ p_save(void)
   }
 #endif
   which_save = 1;
-  return(do_save(DO_EVERYTHING));
+  Yap_StartSlots();
+  res = do_save(DO_EVERYTHING);
+  Yap_CloseSlots();
+  return res;
 }
 
 /* Saves a complete prolog environment */

library/block_diagram.yap

@@ -219,7 +219,7 @@
 
 parameter(texts((+inf))).
 parameter(depth((+inf))).
-parameter(default_ext('.dot')).
+parameter(default_ext('.yap')).
 make_diagram(InputFile, OutputFile):-
   tell(OutputFile),
   write('digraph G {\nrankdir=BT'), nl,

library/charsio.yap

@@ -28,7 +28,8 @@
 	open_chars_stream/2,
 	with_output_to_chars/2,
 	with_output_to_chars/3,
-	with_output_to_chars/4
+	with_output_to_chars/4,
+ term_to_atom/2 
     ]).
 
 :- meta_predicate(with_output_to_chars(0,?)).