Changeset 55a68f in git for Singular

Timestamp:

Oct 27, 1999, 5:08:20 PM (25 years ago)

Author:

Olaf Bachmann <obachman@…>

Branches:

(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'fc741b6502fd8a97288eaa3eba6e5220f3c3df87')

Children:

9e64e2384885d3a295833c1b6b89b032a2521b96

Parents:

bbe0d8c8be70a9d889fbef7f37918ed72c3f6b92

Message:

* only explicit reference watch


git-svn-id: file:///usr/local/Singular/svn/trunk@3801 2c84dea3-7e68-4137-9b89-c4e89433aadc

File:

• Singular/kutil.cc (modified) (4 diffs)

Singular/kutil.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: kutil.cc,v 1.46 1999-10-27 15:04:45 Singular Exp $ */
+/* $Id: kutil.cc,v 1.47 1999-10-27 15:08:20 obachman Exp $ */
 /*
 * ABSTRACT: kernel: utils for kStd
@@ -310 +310 @@
   // test P
 #ifdef MDEBUG
-  if (pref) mmStartReferenceWatch();
+  if (pref >= 2) mmStartReferenceWatch();
 #endif
   ret = K_Test_L(f, l, &(strat->P),
@@ -325 +325 @@
   {
 #ifdef MDEBUG
-    if (! pref) mmStartReferenceWatch();
+    if (pref && pref <= 1) mmStartReferenceWatch();
 #endif
     for (i=0; i<=strat->tl; i++)
@@ -336 +336 @@
   }
 #ifdef MDEBUG
-  mmStopReferenceWatch();
+  if (pref) mmStopReferenceWatch();
 #endif
   // test L