src/JavaExceptionTests.st
author vranyj1
Fri, 30 Mar 2012 13:38:40 +0000
branchjk_new_structure
changeset 1440 3737a6150f96
child 1450 4817f2a363d6
permissions -rw-r--r--
Added JavaExceptionTests
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
1440
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
     1
"
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
     2
 COPYRIGHT (c) 1996-2011 by Claus Gittinger
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
     3
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
     4
 New code and modifications done at SWING Research Group [1]:
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
     5
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
     6
 COPYRIGHT (c) 2010-2011 by Jan Vrany, Jan Kurs and Marcel Hlopko
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
     7
                            SWING Research Group, Czech Technical University in Prague
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
     8
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
     9
 This software is furnished under a license and may be used
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    10
 only in accordance with the terms of that license and with the
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    11
 inclusion of the above copyright notice.   This software may not
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    12
 be provided or otherwise made available to, or used by, any
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    13
 other person.  No title to or ownership of the software is
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    14
 hereby transferred.
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    15
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    16
 [1] Code written at SWING Research Group contains a signature
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    17
     of one of the above copright owners. For exact set of such code,
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    18
     see the differences between this version and version stx:libjava
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    19
     as of 1.9.2010
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    20
"
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    21
"{ Package: 'stx:libjava' }"
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    22
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    23
TestCase subclass:#JavaExceptionTests
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    24
	instanceVariableNames:''
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    25
	classVariableNames:''
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    26
	poolDictionaries:''
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    27
	category:'Languages-Java-Tests'
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    28
!
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    29
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    30
!JavaExceptionTests class methodsFor:'documentation'!
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    31
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    32
copyright
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    33
"
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    34
 COPYRIGHT (c) 1996-2011 by Claus Gittinger
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    35
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    36
 New code and modifications done at SWING Research Group [1]:
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    37
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    38
 COPYRIGHT (c) 2010-2011 by Jan Vrany, Jan Kurs and Marcel Hlopko
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    39
                            SWING Research Group, Czech Technical University in Prague
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    40
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    41
 This software is furnished under a license and may be used
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    42
 only in accordance with the terms of that license and with the
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    43
 inclusion of the above copyright notice.   This software may not
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    44
 be provided or otherwise made available to, or used by, any
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    45
 other person.  No title to or ownership of the software is
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    46
 hereby transferred.
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    47
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    48
 [1] Code written at SWING Research Group contains a signature
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    49
     of one of the above copright owners. For exact set of such code,
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    50
     see the differences between this version and version stx:libjava
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    51
     as of 1.9.2010
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    52
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    53
"
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    54
! !
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    55
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    56
!JavaExceptionTests class methodsFor:'accessing'!
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    57
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    58
resources
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    59
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    60
  ^ Array 
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    61
        with: JavaInitializedResource 
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    62
        with: JavaLibrariesResource
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    63
        with: JavaTestsResource
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    64
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    65
    "Created: / 30-03-2012 / 13:38:08 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    66
! !
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    67
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    68
!JavaExceptionTests methodsFor:'tests'!
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    69
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    70
test_01a
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    71
    "
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    72
    Scenario (method activation stack, last called at bottom)
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    73
        1) ST method, handles IllegalArgumentException
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    74
        2) Java method, throws IllegalArgumentException.
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    75
    "
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    76
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    77
    | thrower caught |
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    78
    thrower := JAVA stx libjava tests SimpleExceptionThrower new.
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    79
    [ 
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    80
        thrower throw_me: true.
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    81
        caught := false.
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    82
        
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    83
    ] on: JAVA java lang IllegalArgumentException do: [:ex|
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    84
        caught := true.
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    85
    ].
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    86
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    87
    self assert: caught == true
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    88
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    89
    "Created: / 18-03-2012 / 11:06:23 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    90
!
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    91
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    92
test_01b
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    93
    "
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    94
    Scenario (method activation stack, last called at bottom)
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    95
        1) ST method, handles IllegalArgumentException
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    96
        2) Java method, does not IllegalArgumentException.
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    97
    "
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    98
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
    99
    | thrower caught |
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   100
    thrower := JAVA stx libjava tests SimpleExceptionThrower new.
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   101
    [ 
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   102
        thrower throw_me: false.
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   103
        caught := false.
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   104
        
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   105
    ] on: JAVA java lang IllegalArgumentException do: [:ex|
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   106
        caught := true.
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   107
    ].
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   108
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   109
    self assert: caught == false
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   110
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   111
    "Created: / 18-03-2012 / 21:49:09 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   112
!
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   113
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   114
test_01c
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   115
    "
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   116
    Scenario (method activation stack, last called at bottom)
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   117
        1) ST method, handles IllegalArgumentException
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   118
        2) Java method, does not IllegalArgumentException.
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   119
    "
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   120
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   121
    | thrower caught |
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   122
    thrower := JAVA stx libjava tests SimpleExceptionThrower new.
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   123
    [ 
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   124
        thrower throw_me: true.
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   125
        caught := false.
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   126
        
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   127
    ] on: JAVA java lang Throwable do: [:ex|
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   128
        caught := true.
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   129
    ].
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   130
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   131
    self assert: caught == true
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   132
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   133
    "Created: / 18-03-2012 / 22:11:24 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   134
!
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   135
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   136
test_01d
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   137
    "
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   138
    Scenario (method activation stack, last called at bottom)
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   139
        1) ST method, handles IllegalArgumentException
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   140
        2) Java method, does not IllegalArgumentException.
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   141
    "
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   142
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   143
    | thrower caught |
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   144
    thrower := JAVA stx libjava tests SimpleExceptionThrower new.
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   145
    [
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   146
        [ 
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   147
            thrower throw_me: true.
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   148
            caught := false.
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   149
            
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   150
        ] on: JAVA java lang ArrayIndexOutOfBoundsException do: [:ex|
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   151
            caught := true.
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   152
        ].
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   153
    ] on: JavaUnhandledExceptionError do:[
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   154
        caught := 123.
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   155
    ].
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   156
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   157
    self assert: caught == 123
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   158
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   159
    "Created: / 18-03-2012 / 22:12:06 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   160
! !
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   161
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   162
!JavaExceptionTests class methodsFor:'documentation'!
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   163
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   164
version_SVN
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   165
    ^ '$Id$'
3737a6150f96 Added JavaExceptionTests
vranyj1
parents:
diff changeset
   166
! !