]> www.ginac.de Git - ginac.git/blob - cint/exam_paranoia.cpp
4fc7b98162785f923e0b177acb832789abadb154
[ginac.git] / cint / exam_paranoia.cpp
1 #! ./run_exams --silent
2 int result = 0;
3 /*
4  * Old Cint versions messed up unary and binary operators:
5  */
6 {
7     symbol x;
8     ex a = x-x;
9     if (!a.is_zero()) {
10         ++result;
11     }
12 }
13 /*
14  * Some problems with objects of class relational when cast to bool:
15  */
16 {
17     symbol x;
18     ex a = x;
19     if (bool(a != a)) {
20         ++result;
21     }
22 }
23 exit(result);