OSSP CVS Repository

ossp - Check-in [1651]
Not logged in
[Honeypot]  [Browse]  [Home]  [Login]  [Reports
[Search]  [Ticket]  [Timeline
  [Patchset]  [Tagging/Branching

Check-in Number: 1651
Date: 2002-Jan-26 23:45:37 (local)
2002-Jan-26 22:45:37 (UTC)
User:rse
Branch:
Comment: add ex_catching to test suite
Tickets:
Inspections:
Files:
ossp-pkg/ex/ex_test.c      1.5 -> 1.6     8 inserted, 0 deleted

ossp-pkg/ex/ex_test.c 1.5 -> 1.6

--- ex_test.c    2002/01/26 22:42:46     1.5
+++ ex_test.c    2002/01/26 22:45:37     1.6
@@ -118,6 +118,8 @@
     ts_test_check(TS_CTX, "exception shielding");
     if (ex_shielding)
         ts_test_fail(TS_CTX, "unexpected shielding scope");
+    if (ex_catching)
+        ts_test_fail(TS_CTX, "unexpected catching scope");
     ex_try {
         ex_shield {
             if (!ex_shielding)
@@ -126,10 +128,16 @@
         }
         if (ex_shielding)
             ts_test_fail(TS_CTX, "unexpected shielding scope");
+        if (!ex_catching)
+            ts_test_fail(TS_CTX, "unexpected non-catching scope");
     }
     ex_catch (ex) {
         ts_test_fail(TS_CTX, "unexpected exception catched");
+        if (ex_catching)
+            ts_test_fail(TS_CTX, "unexpected catching scope");
     }
+    if (ex_catching)
+        ts_test_fail(TS_CTX, "unexpected catching scope");
 }
 
 int main(int argc, char *argv[])

CVSTrac 2.0.1