Changeset 085370c in git for factory/ftest/ftest_io.cc

Timestamp:

Mar 11, 1998, 5:11:28 PM (26 years ago)

Author:

Jens Schmidt <schmidt@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

0e083a79e79fdba1836c125232887812195dd9b8

Parents:

d636adca8e47219c329f1d05ef6a4b1712a88b48

Message:

***** merge from branch `factory-gcd' to main trunk


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

File:

• factory/ftest/ftest_io.cc (modified) (2 diffs)

factory/ftest/ftest_io.cc

@@ -1 +1 @@
 /* emacs edit mode for this file is -*- C++ -*- */
-/* $Id: ftest_io.cc,v 1.10 1997-11-21 13:59:07 schmidt Exp $ */
+/* $Id: ftest_io.cc,v 1.11 1998-03-11 16:10:54 schmidt Exp $ */
 
 //{{{ docu
@@ -141 +141 @@
 //}}}
 
+//{{{ bool ftestGetbool ( const char * stringBool )
+//{{{ docu
+//
+// ftestGetbool() - read an boolean from stringBool,
+//   return it.
+//
+//}}}
+bool
+ftestGetbool ( const char * stringBool )
+{
+    const char * tokenCursor;
+
+    bool b;
+    // skip blancs
+    stringBool = ftestSkipBlancs( stringBool );
+
+    // look for "true" or "false"
+    tokenCursor = ftestSubStr( "true", stringBool );
+    if ( stringBool != tokenCursor )
+        b = true;
+    else {
+        tokenCursor = ftestSubStr( "false", stringBool );
+        b = false;
+    }
+
+    // do error checks
+    if ( stringBool == tokenCursor )
+        ftestError( CommandlineError,
+                    "bool expected at `%s'\n", stringBool );
+
+    // check for extra characters
+    stringBool = ftestSkipBlancs( tokenCursor );
+    if ( *stringBool )
+        ftestError( CommandlineError,
+                    "extra characters after bool spec `%s'\n", stringBool );
+
+    return b;
+}
+//}}}
+
 //{{{ void ftestPrintResult ( const char * resultName, const CanonicalForm & result )
 //{{{ docu