--- a/src/JavaMethod.st	Wed Mar 28 14:04:28 2012 +0000
+++ b/src/JavaMethod.st	Thu Mar 29 08:28:45 2012 +0000
@@ -27,7 +27,7 @@
 		ForceByteCodeDisplay UnresolvedClassSignal A_PUBLIC A_PRIVATE
 		A_PROTECTED A_STATIC A_FINAL A_SYNCHRONIZED A_ABSTRACT A_NATIVE
 		A_BREAKPOINT R_VOID R_LONG R_DOUBLE A_HASHANDLER A_BRIDGE
-		A_VARARGS A_STRICT A_SYNTHETIC A_RESOLVED'
+		A_VARARGS A_STRICT A_SYNTHETIC A_RESOLVED A_HASFINALLY'
 	poolDictionaries:'JavaConstants'
 	category:'Languages-Java-Classes'
 !
@@ -90,6 +90,7 @@
 
     A_BREAKPOINT   := 16r10000000.
     A_HASHANDLER   := 16r20000000.
+    A_HASFINALLY   := 16r00004000.
     A_RESOLVED     := 16r00002000.
 
     self flags:(self flags bitOr:Behavior flagJavaMethod).
@@ -117,7 +118,7 @@
     "
 
     "Modified: / 16-10-1998 / 01:29:48 / cg"
-    "Modified: / 14-11-2011 / 23:54:19 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 28-03-2012 / 20:34:00 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 reinitialize
@@ -2087,6 +2088,26 @@
     "Modified: / 25.9.1999 / 23:07:01 / cg"
 !
 
+hasFinally
+    ^ (accessFlags bitAnd:A_HASFINALLY) ~~ 0
+
+    "Created: / 28-03-2012 / 20:35:11 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+hasFinallyBasedOnExceptionTable
+    "Returns true if the exeption table has at least one 
+     entry for finally block"
+    ^false
+
+    "Created: / 28-03-2012 / 23:18:08 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+hasHandler
+    ^ (accessFlags bitAnd:A_HASHANDLER) ~~ 0
+
+    "Created: / 28-03-2012 / 20:35:01 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
 hasPrimitiveCode
 
     ^false