- exam_mansamples.cpp, exam_paranoia.cpp: fixes and extensions.
[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 (a != a) {
20         ++result;
21     }
22 }
23 exit(result);