Catch exceptions in VTABLE find_method

The sixmodel VTABLE find_method calls the find_method
in the containers STABLE which will throw instead of
returning NULL if it can't find the method.

Anything which is calling the VTABLE find_method is not
going to be expecting an exception so catch any exception
and return NULL.

Author: KrisShannon

src/pmc/sixmodelobject.pmc

@@ -22,6 +22,8 @@
  * out (since that depends on the representation).
  */
 
+#include "parrot/exceptions.h"
+#include "parrot/events.h"
 #include "../6model/sixmodelobject.h"
 
 /* We need to know how to boolify bigints. Really need something better,
@@ -94,8 +96,19 @@ pmclass SixModelObject manual_attrs dynpmc group nqp {
     }
 
     VTABLE PMC * find_method(STRING *name) {
-        PMC *decont = decontainerize(interp, SELF);
-        return STABLE(decont)->find_method(interp, decont, name, NO_HINT);
+        PMC *m = PMCNULL;
+        PMC *decont;
+        Parrot_runloop jmp;
+
+        if (!setjmp(jmp.resume)) {
+            Parrot_ex_add_c_handler(interp, &jmp);
+            /* try */
+            decont = decontainerize(interp, SELF);
+            m = STABLE(decont)->find_method(interp, decont, name, NO_HINT);
+        }
+        Parrot_cx_delete_handler_local(interp);
+
+        return m;
     }
 
     VTABLE PMC* get_attr_keyed(PMC *class_handle, STRING *name) {