Finalize 1.7.6 release.

[ginac.git] / check / parser_bugs.cpp

diff --git a/check/parser_bugs.cpp b/check/parser_bugs.cpp
index 340fe20fb2cc4da5b038172e0e5d8204e8bbb16c..38210493a954e39d5c52b4e50724e20a06d31a56 100644 (file)
--- a/check/parser_bugs.cpp
+++ b/check/parser_bugs.cpp
@@ -1,10 +1,32 @@
-/// @file parser_a_b.cpp Check for some silly bugs in the parser.
+/** @file parser_bugs.cpp
+ *
+ *  Check for some silly bugs in the parser. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2019 Johannes Gutenberg University Mainz, Germany
+ *
+ *  This program is free software; you can redistribute it and/or modify
+ *  it under the terms of the GNU General Public License as published by
+ *  the Free Software Foundation; either version 2 of the License, or
+ *  (at your option) any later version.
+ *
+ *  This program is distributed in the hope that it will be useful,
+ *  but WITHOUT ANY WARRANTY; without even the implied warranty of
+ *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ *  GNU General Public License for more details.
+ *
+ *  You should have received a copy of the GNU General Public License
+ *  along with this program; if not, write to the Free Software
+ *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
 #include "ginac.h"
-#include <string>
+using namespace GiNaC;
+
 #include <iostream>
-#include <stdexcept>
 #include <sstream>
-using namespace GiNaC;
+#include <stdexcept>
+#include <string>
 
 // - a - b was misparsed as -a + b due to a bug in parser::parse_unary_expr()
 static int check1(std::ostream& err_str)
@@ -41,6 +63,39 @@ static int check2(std::ostream& err_str)
        return 0;
 }
 
+/// parse_literal_expr forget to consume the token, so parser get
+/// very confused.
+static int check3(std::ostream& err_str)
+{
+       const std::string srep("5-(2*I)/3");
+       parser reader;
+       ex e = reader(srep);
+       ex g = numeric(5) - (numeric(2)*I)/3;
+       ex d = (e - g).expand();
+       if (!d.is_zero()) {
+               err_str << "\"" << srep << "\" was misparsed as \""
+                       << e << "\"" << std::endl;
+               return 1;
+       }
+       return 0;
+}
+
+/// parser happily accepted various junk like 'x^2()+1'
+static int check4(std::ostream& err_str)
+{
+       const std::string junk("x^2()+1");
+       parser reader;
+       ex e;
+       try {
+               e = reader(junk);
+               err_str << "parser accepts junk: \"" << junk << "\"" << std::endl;
+               return 1;
+       } catch (parse_error& err) {
+               // Ok, parser rejects the nonsense.
+               return 0;
+       }
+}
+
 int main(int argc, char** argv)
 {
        std::cout << "checking for parser bugs. " << std::flush;
@@ -48,6 +103,8 @@ int main(int argc, char** argv)
        int errors = 0;
        errors += check1(err_str);
        errors += check2(err_str);
+       errors += check3(err_str);
+       errors += check4(err_str);
        if (errors) {
                std::cout << "Yes, unfortunately:" << std::endl;
                std::cout << err_str.str();
@@ -56,4 +113,3 @@ int main(int argc, char** argv)
        }
        return errors;
 }
-