valgrind it!

enable atom garbage collection.


git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@2055 b08c6af1-5177-4d33-ba66-4b1c6b8b522a

C/iopreds.c

@@ -3087,6 +3087,8 @@ static Int
 init_cur_s (void)
 {				/* Init current_stream */
   Term t3 = Deref(ARG3);
+  /* make valgrind happy by always filling in memory */
+  EXTRA_CBACK_ARG (3, 1) = MkIntTerm (0);
   if (!IsVarTerm(t3)) {
     
     Int i;
@@ -3107,7 +3109,6 @@ init_cur_s (void)
       cut_fail();
     }
   } else {
-    EXTRA_CBACK_ARG (3, 1) = MkIntTerm (0);
     return (cont_cur_s ());
   }
 }