Changeset 47941c in git

Timestamp:

Nov 21, 1997, 12:22:42 PM (26 years ago)

Author:

Jens Schmidt <schmidt@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

67ff588575b5a7b666f803b5e3d46b80a67bf483

Parents:

7bc1161231cd803772e20ee3147cfc57fdb17380

Message:

	* gcd.m4 (gcdCheck): error messages for checks added


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

File:

• factory/ftest/gcd.m4 (modified) (3 diffs)

factory/ftest/gcd.m4

@@ -1 +1 @@
 /* emacs edit mode for this file is -*- C++ -*- */
-/* $Id: gcd.m4,v 1.5 1997-11-05 16:26:23 schmidt Exp $ */
+/* $Id: gcd.m4,v 1.6 1997-11-21 11:22:42 schmidt Exp $ */
 
 ftestSetNameOfGame( gcd, `"
@@ -44 +44 @@
         else if ( -realResult == result )
             return Passed;
-        else
+        else {
+            ftestError( CheckError, "result and real result differ\n" );
             return Failed;
+        }
 
     if ( result.isZero() )
         if ( f.isZero() && g.isZero() )
             return Passed;
-        else
+        else {
+            ftestError( CheckError, "result is zero but f and g are not\n" );
             return Failed;
+        }
 
     if ( divides( result, f ) && divides( result, g ) )
         if ( gcd( f/result, g/result ).isOne() )
             return Passed;
-        else
+        else {
+            ftestError( CheckError, "result is not greatest common divisor\n" );
             return Failed;
-    else
+        }
+    else {
+        ftestError( CheckError, "result is not a common divisor\n" );
         return Failed;
+    }
 }
 //}}}
@@ -90 +98 @@
 
     // do the check
-    ftestCheck( gcdCheck( f, g, result, realResult ) );
+    ftestCheck(
+        gcdCheck( f, g, result, realResult ) );
 
     // print results