JavaMethodWithHandler.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Fri, 24 May 2013 17:55:42 +0100
branchbuiltin-class-support
changeset 2629 cedb88626902
parent 2591 17d9c39d3ab4
child 2711 a00302fe5083
permissions -rw-r--r--
Closing branch.
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
454
38f590639d65 *** empty log message ***
cg
parents: 427
diff changeset
     1
"
2151
c0b6570c6f9b Jan's version
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2107
diff changeset
     2
 COPYRIGHT (c) 1996-2011 by Claus Gittinger
454
38f590639d65 *** empty log message ***
cg
parents: 427
diff changeset
     3
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
     4
 New code and modifications done at SWING Research Group [1]:
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
     5
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
     6
 COPYRIGHT (c) 2010-2011 by Jan Vrany, Jan Kurs and Marcel Hlopko
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
     7
                            SWING Research Group, Czech Technical University in Prague
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
     8
454
38f590639d65 *** empty log message ***
cg
parents: 427
diff changeset
     9
 This software is furnished under a license and may be used
38f590639d65 *** empty log message ***
cg
parents: 427
diff changeset
    10
 only in accordance with the terms of that license and with the
38f590639d65 *** empty log message ***
cg
parents: 427
diff changeset
    11
 inclusion of the above copyright notice.   This software may not
38f590639d65 *** empty log message ***
cg
parents: 427
diff changeset
    12
 be provided or otherwise made available to, or used by, any
38f590639d65 *** empty log message ***
cg
parents: 427
diff changeset
    13
 other person.  No title to or ownership of the software is
38f590639d65 *** empty log message ***
cg
parents: 427
diff changeset
    14
 hereby transferred.
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
    15
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
    16
 [1] Code written at SWING Research Group contains a signature
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
    17
     of one of the above copright owners. For exact set of such code,
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
    18
     see the differences between this version and version stx:libjava
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
    19
     as of 1.9.2010
2151
c0b6570c6f9b Jan's version
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2107
diff changeset
    20
"
688
dcd829fd4094 *** empty log message ***
cg
parents: 616
diff changeset
    21
"{ Package: 'stx:libjava' }"
dcd829fd4094 *** empty log message ***
cg
parents: 616
diff changeset
    22
2585
14ab287e17ca Exception table refactored to use more compact & VM friendly format.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
    23
JavaMethodWithException variableSubclass:#JavaMethodWithHandler
423
08af061c56a8 javaClass now uses its fullName in name
cg
parents: 377
diff changeset
    24
	instanceVariableNames:'exceptionHandlerTable'
377
4a5975fcce4e initial checkin
cg
parents:
diff changeset
    25
	classVariableNames:''
4a5975fcce4e initial checkin
cg
parents:
diff changeset
    26
	poolDictionaries:''
2107
f4509f6767fa category change
Claus Gittinger <cg@exept.de>
parents: 2082
diff changeset
    27
	category:'Languages-Java-Classes'
377
4a5975fcce4e initial checkin
cg
parents:
diff changeset
    28
!
4a5975fcce4e initial checkin
cg
parents:
diff changeset
    29
454
38f590639d65 *** empty log message ***
cg
parents: 427
diff changeset
    30
!JavaMethodWithHandler class methodsFor:'documentation'!
38f590639d65 *** empty log message ***
cg
parents: 427
diff changeset
    31
38f590639d65 *** empty log message ***
cg
parents: 427
diff changeset
    32
copyright
38f590639d65 *** empty log message ***
cg
parents: 427
diff changeset
    33
"
2151
c0b6570c6f9b Jan's version
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2107
diff changeset
    34
 COPYRIGHT (c) 1996-2011 by Claus Gittinger
454
38f590639d65 *** empty log message ***
cg
parents: 427
diff changeset
    35
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
    36
 New code and modifications done at SWING Research Group [1]:
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
    37
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
    38
 COPYRIGHT (c) 2010-2011 by Jan Vrany, Jan Kurs and Marcel Hlopko
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
    39
                            SWING Research Group, Czech Technical University in Prague
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
    40
454
38f590639d65 *** empty log message ***
cg
parents: 427
diff changeset
    41
 This software is furnished under a license and may be used
38f590639d65 *** empty log message ***
cg
parents: 427
diff changeset
    42
 only in accordance with the terms of that license and with the
38f590639d65 *** empty log message ***
cg
parents: 427
diff changeset
    43
 inclusion of the above copyright notice.   This software may not
38f590639d65 *** empty log message ***
cg
parents: 427
diff changeset
    44
 be provided or otherwise made available to, or used by, any
38f590639d65 *** empty log message ***
cg
parents: 427
diff changeset
    45
 other person.  No title to or ownership of the software is
38f590639d65 *** empty log message ***
cg
parents: 427
diff changeset
    46
 hereby transferred.
2151
c0b6570c6f9b Jan's version
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2107
diff changeset
    47
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
    48
 [1] Code written at SWING Research Group contains a signature
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
    49
     of one of the above copright owners. For exact set of such code,
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
    50
     see the differences between this version and version stx:libjava
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
    51
     as of 1.9.2010
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
    52
2082
ee2fac5efadb *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 749
diff changeset
    53
"
2588
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
    54
!
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
    55
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
    56
ght
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
    57
"
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
    58
 COPYRIGHT (c) 1996-2011 by Claus Gittinger
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
    59
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
    60
 New code and modifications done at SWING Research Group [1]:
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
    61
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
    62
 COPYRIGHT (c) 2010-2011 by Jan Vrany, Jan Kurs and Marcel Hlopko
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
    63
                            SWING Research Group, Czech Technical University in Prague
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
    64
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
    65
 This software is furnished under a license and may be used
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
    66
 only in accordance with the terms of that license and with the
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
    67
 inclusion of the above copyright notice.   This software may not
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
    68
 be provided or otherwise made available to, or used by, any
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
    69
 other person.  No title to or ownership of the software is
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
    70
 hereby transferred.
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
    71
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
    72
 [1] Code written at SWING Research Group contains a signature
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
    73
     of one of the above copright owners. For exact set of such code,
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
    74
     see the differences between this version and version stx:libjava
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
    75
     as of 1.9.2010
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
    76
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
    77
"
454
38f590639d65 *** empty log message ***
cg
parents: 427
diff changeset
    78
! !
377
4a5975fcce4e initial checkin
cg
parents:
diff changeset
    79
616
53bf2ec50346 *** empty log message ***
cg
parents: 610
diff changeset
    80
!JavaMethodWithHandler class methodsFor:'initialization'!
53bf2ec50346 *** empty log message ***
cg
parents: 610
diff changeset
    81
2588
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
    82
alize
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
    83
    self flags:(self flags bitOr:Behavior flagJavaMethod).
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
    84
!
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
    85
616
53bf2ec50346 *** empty log message ***
cg
parents: 610
diff changeset
    86
initialize
53bf2ec50346 *** empty log message ***
cg
parents: 610
diff changeset
    87
    self flags:(self flags bitOr:Behavior flagJavaMethod).
53bf2ec50346 *** empty log message ***
cg
parents: 610
diff changeset
    88
! !
53bf2ec50346 *** empty log message ***
cg
parents: 610
diff changeset
    89
377
4a5975fcce4e initial checkin
cg
parents:
diff changeset
    90
!JavaMethodWithHandler methodsFor:'accessing'!
4a5975fcce4e initial checkin
cg
parents:
diff changeset
    91
4a5975fcce4e initial checkin
cg
parents:
diff changeset
    92
exceptionHandlerTable
4a5975fcce4e initial checkin
cg
parents:
diff changeset
    93
    ^ exceptionHandlerTable
4a5975fcce4e initial checkin
cg
parents:
diff changeset
    94
4a5975fcce4e initial checkin
cg
parents:
diff changeset
    95
    "Modified: / 16.4.1996 / 12:49:06 / cg"
4a5975fcce4e initial checkin
cg
parents:
diff changeset
    96
    "Created: / 16.10.1998 / 01:18:28 / cg"
4a5975fcce4e initial checkin
cg
parents:
diff changeset
    97
!
4a5975fcce4e initial checkin
cg
parents:
diff changeset
    98
2588
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
    99
ptionHandlerTable
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
   100
    ^ exceptionHandlerTable
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
   101
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
   102
    "Modified: / 16.4.1996 / 12:49:06 / cg"
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
   103
    "Created: / 16.10.1998 / 01:18:28 / cg"
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
   104
!
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
   105
377
4a5975fcce4e initial checkin
cg
parents:
diff changeset
   106
setExceptionHandlerTable:anArray
4a5975fcce4e initial checkin
cg
parents:
diff changeset
   107
    exceptionHandlerTable := anArray.
4a5975fcce4e initial checkin
cg
parents:
diff changeset
   108
4a5975fcce4e initial checkin
cg
parents:
diff changeset
   109
    "Created: / 16.10.1998 / 01:19:00 / cg"
2588
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
   110
!
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
   111
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
   112
xceptionHandlerTable:anArray
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
   113
    exceptionHandlerTable := anArray.
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
   114
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
   115
    "Created: / 16.10.1998 / 01:19:00 / cg"
377
4a5975fcce4e initial checkin
cg
parents:
diff changeset
   116
! !
4a5975fcce4e initial checkin
cg
parents:
diff changeset
   117
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
   118
!JavaMethodWithHandler methodsFor:'queries'!
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
   119
2588
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
   120
FinallyBasedOnExceptionTable
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
   121
    "Returns true if the exeption table has at least one 
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
   122
     entry for finally block"
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
   123
    ^exceptionHandlerTable anySatisfy:[:entry|entry catchType == 0].
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
   124
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
   125
    "Created: / 28-03-2012 / 23:17:53 / Jan Vrany <jan.vrany@fit.cvut.cz>"
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
   126
!
58b1e0fd20e7 Changed JavaVM>>classForName: to faster JavaVM>>classForName:definedBy:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
   127
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
   128
hasFinallyBasedOnExceptionTable
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
   129
    "Returns true if the exeption table has at least one 
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
   130
     entry for finally block"
2585
14ab287e17ca Exception table refactored to use more compact & VM friendly format.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
   131
    ^exceptionHandlerTable hasFinallyBasedOnExceptionTable
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
   132
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
   133
    "Created: / 28-03-2012 / 23:17:53 / Jan Vrany <jan.vrany@fit.cvut.cz>"
2585
14ab287e17ca Exception table refactored to use more compact & VM friendly format.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
   134
    "Modified: / 06-05-2013 / 22:01:25 / Jan Vrany <jan.vrany@fit.cvut.cz>"
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
   135
! !
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
   136
377
4a5975fcce4e initial checkin
cg
parents:
diff changeset
   137
!JavaMethodWithHandler class methodsFor:'documentation'!
4a5975fcce4e initial checkin
cg
parents:
diff changeset
   138
4a5975fcce4e initial checkin
cg
parents:
diff changeset
   139
version
2396
fadc6d7a2f5b Updated to rev 009a0df3afce
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2353
diff changeset
   140
    ^ '$Header: /cvs/stx/stx/libjava/JavaMethodWithHandler.st,v 1.13 2013-02-25 11:15:31 vrany Exp $'
2205
9f8b37e3960f changed: #copyright
Claus Gittinger <cg@exept.de>
parents: 2151
diff changeset
   141
!
9f8b37e3960f changed: #copyright
Claus Gittinger <cg@exept.de>
parents: 2151
diff changeset
   142
9f8b37e3960f changed: #copyright
Claus Gittinger <cg@exept.de>
parents: 2151
diff changeset
   143
version_CVS
2396
fadc6d7a2f5b Updated to rev 009a0df3afce
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2353
diff changeset
   144
    ^ '$Header: /cvs/stx/stx/libjava/JavaMethodWithHandler.st,v 1.13 2013-02-25 11:15:31 vrany Exp $'
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
   145
!
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
   146
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
   147
version_HG
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
   148
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
   149
    ^ '$Changeset: <not expanded> $'
2151
c0b6570c6f9b Jan's version
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2107
diff changeset
   150
!
c0b6570c6f9b Jan's version
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2107
diff changeset
   151
c0b6570c6f9b Jan's version
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2107
diff changeset
   152
version_SVN
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
   153
    ^ '§Id§'
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
   154
377
4a5975fcce4e initial checkin
cg
parents:
diff changeset
   155
! !
2107
f4509f6767fa category change
Claus Gittinger <cg@exept.de>
parents: 2082
diff changeset
   156
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2257
diff changeset
   157
2082
ee2fac5efadb *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 749
diff changeset
   158
JavaMethodWithHandler initialize!