JavaMethodWithHandler.st
branchcvs_MAIN
changeset 3572 b8cf9964645f
parent 3412 df11bb428463
equal deleted inserted replaced
3571:33188b3bb660 3572:b8cf9964645f
    17      of one of the above copright owners. For exact set of such code,
    17      of one of the above copright owners. For exact set of such code,
    18      see the differences between this version and version stx:libjava
    18      see the differences between this version and version stx:libjava
    19      as of 1.9.2010
    19      as of 1.9.2010
    20 "
    20 "
    21 "{ Package: 'stx:libjava' }"
    21 "{ Package: 'stx:libjava' }"
       
    22 
       
    23 "{ NameSpace: Smalltalk }"
    22 
    24 
    23 JavaMethodWithException variableSubclass:#JavaMethodWithHandler
    25 JavaMethodWithException variableSubclass:#JavaMethodWithHandler
    24 	instanceVariableNames:'exceptionHandlerTable'
    26 	instanceVariableNames:'exceptionHandlerTable'
    25 	classVariableNames:''
    27 	classVariableNames:''
    26 	poolDictionaries:''
    28 	poolDictionaries:''
   127 ! !
   129 ! !
   128 
   130 
   129 !JavaMethodWithHandler methodsFor:'queries'!
   131 !JavaMethodWithHandler methodsFor:'queries'!
   130 
   132 
   131 FinallyBasedOnExceptionTable
   133 FinallyBasedOnExceptionTable
   132     "Returns true if the exeption table has at least one 
   134     "Returns true if the exception table has at least one 
   133      entry for finally block"
   135      entry for finally block"
   134     ^exceptionHandlerTable anySatisfy:[:entry|entry catchType == 0].
   136     ^exceptionHandlerTable anySatisfy:[:entry|entry catchType == 0].
   135 
   137 
   136     "Created: / 28-03-2012 / 23:17:53 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   138     "Created: / 28-03-2012 / 23:17:53 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   137 !
   139 !
   138 
   140 
   139 hasFinallyBasedOnExceptionTable
   141 hasFinallyBasedOnExceptionTable
   140     "Returns true if the exeption table has at least one 
   142     "Returns true if the exception table has at least one 
   141      entry for finally block"
   143      entry for finally block"
   142     ^exceptionHandlerTable hasFinallyBasedOnExceptionTable
   144     ^exceptionHandlerTable hasFinallyBasedOnExceptionTable
   143 
   145 
   144     "Created: / 28-03-2012 / 23:17:53 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   146     "Created: / 28-03-2012 / 23:17:53 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   145     "Modified: / 06-05-2013 / 22:01:25 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   147     "Modified: / 06-05-2013 / 22:01:25 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   146 ! !
   148 ! !
   147 
   149 
   148 !JavaMethodWithHandler class methodsFor:'documentation'!
   150 !JavaMethodWithHandler class methodsFor:'documentation'!
   149 
   151 
   150 version
   152 version
   151     ^ '$Header: /cvs/stx/stx/libjava/JavaMethodWithHandler.st,v 1.16 2015-03-20 12:08:00 vrany Exp $'
   153     ^ '$Header$'
   152 !
   154 !
   153 
   155 
   154 version_CVS
   156 version_CVS
   155     ^ '$Header: /cvs/stx/stx/libjava/JavaMethodWithHandler.st,v 1.16 2015-03-20 12:08:00 vrany Exp $'
   157     ^ '$Header$'
   156 !
   158 !
   157 
   159 
   158 version_HG
   160 version_HG
   159 
   161 
   160     ^ '$Changeset: <not expanded> $'
   162     ^ '$Changeset: <not expanded> $'
   161 !
   163 !
   162 
   164 
   163 version_SVN
   165 version_SVN
   164     ^ 'Id'
   166     ^ '$Id$'
   165 
   167 
   166 ! !
   168 ! !
   167 
   169 
   168 
   170 
   169 JavaMethodWithHandler initialize!
   171 JavaMethodWithHandler initialize!