From 6fe55c580f3e55b5333fcc918855d12f0d09b4d1 Mon Sep 17 00:00:00 2001
From: vsc <vsc@b08c6af1-5177-4d33-ba66-4b1c6b8b522a>
Date: Sat, 15 Mar 2008 12:19:33 +0000
Subject: [PATCH] fix flags

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@2152 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
---
 C/stdpreds.c | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

diff --git a/C/stdpreds.c b/C/stdpreds.c
index 216cdb979..a64349d7d 100644
--- a/C/stdpreds.c
+++ b/C/stdpreds.c
@@ -11,8 +11,11 @@
 * File:		stdpreds.c						 *
 * comments:	General-purpose C implemented system predicates		 *
 *									 *
-* Last rev:     $Date: 2008-02-15 12:41:33 $,$Author: vsc $						 *
+* Last rev:     $Date: 2008-03-15 12:19:33 $,$Author: vsc $						 *
 * $Log: not supported by cvs2svn $
+* Revision 1.128  2008/02/15 12:41:33  vsc
+* more fixes to modules
+*
 * Revision 1.127  2008/02/13 10:15:35  vsc
 * fix some bugs from yesterday plus improve support for modules in
 * operators.
@@ -3637,6 +3640,11 @@ p_set_yap_flags(void)
       return(FALSE);
     yap_flags[VARS_CAN_HAVE_QUOTE_FLAG] = value;
     break;
+  case QUIET_MODE_FLAG:
+    if (value != 0  && value != 1)
+      return(FALSE);
+    yap_flags[VARS_CAN_HAVE_QUOTE_FLAG] = value;
+    break;
   default:
     return(FALSE);
   }