fixes to support condor better

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

C/sysbits.c

@@ -817,6 +817,7 @@ p_srandom (void)
   srandom(current_seed);
 #elif HAVE_RAND
   srand(current_seed);
+
 #endif
   return (TRUE);
 }
@@ -2015,6 +2016,9 @@ p_alarm(void)
     return(unify(ARG2,tout));
   }
 #else
+  /* not actually trying to set the alarm */
+  if (IntegerOfTerm(t) == 0)
+    return(TRUE);
   Error(SYSTEM_ERROR, TermNil,
 	"alarm not available in this configuration");
   return(FALSE);