- New file.

diff --git a/cint/Makefile.am b/cint/Makefile.am
index 5af0bca0b9982b4e6d927b23a9c7ae3c1f6b86ea..8d49963b07959a1a45d26fd9fad6e9230030e302 100644 (file)
--- a/cint/Makefile.am
+++ b/cint/Makefile.am
@@ -10,7 +10,7 @@ man_MANS = ginaccint.1
 ginaccint.bin: ginaccint.bin.cpp
        (export CINTSYSDIR=$(CINTSYSDIR); $(MAKE) -f Makefile.makecint PATH=$(PATH):$(CINTSYSDIR))
 
 ginaccint.bin: ginaccint.bin.cpp
        (export CINTSYSDIR=$(CINTSYSDIR); $(MAKE) -f Makefile.makecint PATH=$(PATH):$(CINTSYSDIR))
 

-TESTS = exam_paranoia.cpp exam_mansamples.cpp
+TESTS = exam_paranoia.cpp exam_mansamples.cpp exam_misc.cpp

 
 EXTRA_DIST = $(man_MANS) $(TESTS)
 
 
 EXTRA_DIST = $(man_MANS) $(TESTS)
 

diff --git a/cint/Makefile.in b/cint/Makefile.in
index 42d1ce27c6325878d85c8352687112d09b81472f..fa7aac5be567329cdaa928136125f2bbf5b51879 100644 (file)
--- a/cint/Makefile.in
+++ b/cint/Makefile.in
@@ -111,7 +111,7 @@ ginaccint_SOURCES = ginaccint.cpp
 ginaccint_bin_SOURCES = ginaccint.bin.cpp
 man_MANS = ginaccint.1
 
 ginaccint_bin_SOURCES = ginaccint.bin.cpp
 man_MANS = ginaccint.1
 

-TESTS = exam_paranoia.cpp exam_mansamples.cpp
+TESTS = exam_paranoia.cpp exam_mansamples.cpp exam_misc.cpp

 
 EXTRA_DIST = $(man_MANS) $(TESTS)
 mkinstalldirs = $(SHELL) $(top_srcdir)/mkinstalldirs
 
 EXTRA_DIST = $(man_MANS) $(TESTS)
 mkinstalldirs = $(SHELL) $(top_srcdir)/mkinstalldirs

diff --git a/cint/exam_mansamples.cpp b/cint/exam_mansamples.cpp
index 6703571ba2be7dacf71cbe6546ce226c71c3ade9..6f1b404eec026aaa5ff2662335908b247ad6874b 100755 (executable)
--- a/cint/exam_mansamples.cpp
+++ b/cint/exam_mansamples.cpp
@@ -1,5 +1,5 @@
 #! ./run_exams --silent
 #! ./run_exams --silent

-int result = 0;
+unsigned result = 0;

 symbol x("x"), y("y"), z("z");
 {
     ex a = pow(x,2)-x-2;
 symbol x("x"), y("y"), z("z");
 {
     ex a = pow(x,2)-x-2;


@@ -19,7 +19,7 @@ ex EulerNumber(unsigned n)
     const ex generator = pow(cosh(xi),-1);
     return generator.diff(xi,n).subs(xi==0);
 }
     const ex generator = pow(cosh(xi),-1);
     return generator.diff(xi,n).subs(xi==0);
 }

-if (EulerNumber(42) != ex(numeric("-10364622733519612119397957304745185976310201"))) {
+if (EulerNumber(42) != numeric("-10364622733519612119397957304745185976310201")) {

     ++result;
 }
 ex f = expand((x*y*z-1)*(x*y*z+3));
     ++result;
 }
 ex f = expand((x*y*z-1)*(x*y*z+3));

diff --git a/cint/exam_misc.cpp b/cint/exam_misc.cpp
new file mode 100755 (executable)
index 0000000..d237e97
--- /dev/null
+++ b/cint/exam_misc.cpp
@@ -0,0 +1,11 @@
+#! ./run_exams --silent
+unsigned result = 0;
+{
+    symbol a("a"), b("b");
+    ex e, f;
+    e = pow(a+b,200).expand();
+    f = e.subs(a == -b);
+    if (f != 0)
+        ++result;
+}
+exit(result);

diff --git a/cint/exam_paranoia.cpp b/cint/exam_paranoia.cpp
index d227545dcee27a9b272d5ed651171e13d9c0d535..9852e4499df3b2899ff61dad72db588aaca6b13e 100755 (executable)
--- a/cint/exam_paranoia.cpp
+++ b/cint/exam_paranoia.cpp
@@ -1,5 +1,5 @@
 #! ./run_exams --silent
 #! ./run_exams --silent

-int result = 0;
+unsigned result = 0;

 /*
  * Old Cint versions messed up unary and binary operators:
  */
 /*
  * Old Cint versions messed up unary and binary operators:
  */