author | Jan Vrany <jan.vrany@fit.cvut.cz> |
Wed, 16 Jan 2013 22:06:41 +0000 | |
branch | refactoring-vmdata |
changeset 1977 | 526315e0a801 |
parent 1953 | 1e42ad3fc322 |
child 2069 | 75d40b7b986f |
permissions | -rw-r--r-- |
1440 | 1 |
" |
2 |
COPYRIGHT (c) 1996-2011 by Claus Gittinger |
|
3 |
||
4 |
New code and modifications done at SWING Research Group [1]: |
|
5 |
||
6 |
COPYRIGHT (c) 2010-2011 by Jan Vrany, Jan Kurs and Marcel Hlopko |
|
7 |
SWING Research Group, Czech Technical University in Prague |
|
8 |
||
9 |
This software is furnished under a license and may be used |
|
10 |
only in accordance with the terms of that license and with the |
|
11 |
inclusion of the above copyright notice. This software may not |
|
12 |
be provided or otherwise made available to, or used by, any |
|
13 |
other person. No title to or ownership of the software is |
|
14 |
hereby transferred. |
|
15 |
||
16 |
[1] Code written at SWING Research Group contains a signature |
|
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 |
|
19 |
as of 1.9.2010 |
|
20 |
" |
|
21 |
"{ Package: 'stx:libjava' }" |
|
22 |
||
23 |
TestCase subclass:#JavaExceptionTests |
|
1452
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
24 |
instanceVariableNames:'signal' |
1440 | 25 |
classVariableNames:'' |
26 |
poolDictionaries:'' |
|
27 |
category:'Languages-Java-Tests' |
|
28 |
! |
|
29 |
||
30 |
!JavaExceptionTests class methodsFor:'documentation'! |
|
31 |
||
32 |
copyright |
|
33 |
" |
|
34 |
COPYRIGHT (c) 1996-2011 by Claus Gittinger |
|
35 |
||
36 |
New code and modifications done at SWING Research Group [1]: |
|
37 |
||
38 |
COPYRIGHT (c) 2010-2011 by Jan Vrany, Jan Kurs and Marcel Hlopko |
|
39 |
SWING Research Group, Czech Technical University in Prague |
|
40 |
||
41 |
This software is furnished under a license and may be used |
|
42 |
only in accordance with the terms of that license and with the |
|
43 |
inclusion of the above copyright notice. This software may not |
|
44 |
be provided or otherwise made available to, or used by, any |
|
45 |
other person. No title to or ownership of the software is |
|
46 |
hereby transferred. |
|
47 |
||
48 |
[1] Code written at SWING Research Group contains a signature |
|
49 |
of one of the above copright owners. For exact set of such code, |
|
50 |
see the differences between this version and version stx:libjava |
|
51 |
as of 1.9.2010 |
|
52 |
||
53 |
" |
|
54 |
! ! |
|
55 |
||
56 |
!JavaExceptionTests class methodsFor:'accessing'! |
|
57 |
||
58 |
resources |
|
59 |
||
60 |
^ Array |
|
61 |
with: JavaInitializedResource |
|
62 |
with: JavaLibrariesResource |
|
63 |
with: JavaTestsResource |
|
64 |
||
65 |
"Created: / 30-03-2012 / 13:38:08 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
66 |
! ! |
|
67 |
||
1953
1e42ad3fc322
Added support Java>>addToClassPath: & Java>>addToSourcePath:. Removed JavaPathElement.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
1843
diff
changeset
|
68 |
|
1452
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
69 |
!JavaExceptionTests methodsFor:'callbacks'! |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
70 |
|
1832 | 71 |
call: trhower with: aBoolean |
72 |
aBoolean ifTrue: [ signal raise ]. |
|
1452
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
73 |
|
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
74 |
"Created: / 03-04-2012 / 17:33:00 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
1832 | 75 |
"Modified: / 18-11-2012 / 18:04:47 / Marcel Hlopko <hlopkmar@fel.cvut.cz>" |
1452
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
76 |
! |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
77 |
|
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
78 |
throw_me: aBoolean |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
79 |
|
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
80 |
aBoolean ifTrue:[signal raise]. |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
81 |
|
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
82 |
"Created: / 03-04-2012 / 17:31:26 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
83 |
! ! |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
84 |
|
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
85 |
!JavaExceptionTests methodsFor:'error handling (interop)'! |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
86 |
|
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
87 |
doesNotUnderstand:aMessage |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
88 |
|
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
89 |
| method selector class args| |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
90 |
selector := aMessage selector. |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
91 |
args := aMessage arguments. |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
92 |
class := self class. |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
93 |
|
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
94 |
JavaLookup isNil ifTrue:[ |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
95 |
(Smalltalk loadPackage: 'stx:libjava/experiments') ifFalse:[ |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
96 |
self error: 'You should load package stx:libjava/experiments if you want some interop - still experimental' mayProceed: true. |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
97 |
^nil |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
98 |
] |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
99 |
]. |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
100 |
|
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
101 |
method := JavaLookup instance lookupMethodForSelector: selector |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
102 |
directedTo: class |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
103 |
for: self |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
104 |
withArguments: args |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
105 |
from: thisContext sender sender |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
106 |
ilc: nil. |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
107 |
|
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
108 |
method isNil ifTrue:[ |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
109 |
^super doesNotUnderstand:aMessage |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
110 |
] ifFalse:[ |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
111 |
^ method valueWithReceiver: self arguments: args |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
112 |
]. |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
113 |
|
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
114 |
"Created: / 06-09-2011 / 22:16:26 / Jan Kurs <kursjan@fit.cvut.cz>" |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
115 |
"Modified: / 15-12-2011 / 23:42:48 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
116 |
! ! |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
117 |
|
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
118 |
!JavaExceptionTests methodsFor:'running'! |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
119 |
|
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
120 |
setUp |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
121 |
signal := Signal new. |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
122 |
|
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
123 |
"Created: / 03-04-2012 / 17:30:33 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
124 |
! ! |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
125 |
|
1440 | 126 |
!JavaExceptionTests methodsFor:'tests'! |
127 |
||
128 |
test_01a |
|
129 |
" |
|
130 |
Scenario (method activation stack, last called at bottom) |
|
131 |
1) ST method, handles IllegalArgumentException |
|
132 |
2) Java method, throws IllegalArgumentException. |
|
133 |
" |
|
134 |
||
135 |
| thrower caught | |
|
1515 | 136 |
thrower := JAVA stx libjava tests lang ExceptionTests new. |
1440 | 137 |
[ |
138 |
thrower throw_me: true. |
|
139 |
caught := false. |
|
140 |
||
141 |
] on: JAVA java lang IllegalArgumentException do: [:ex| |
|
142 |
caught := true. |
|
143 |
]. |
|
144 |
||
1477 | 145 |
self assert: caught == true. |
146 |
self assert: (JavaVM enteredMonitorsOfProcess: Processor activeProcess) isEmptyOrNil. |
|
147 |
self assert: (JavaVM acquiredMonitorsOfProcess: Processor activeProcess) isEmptyOrNil. |
|
1440 | 148 |
|
149 |
"Created: / 18-03-2012 / 11:06:23 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
150 |
! |
|
151 |
||
152 |
test_01b |
|
153 |
" |
|
1832 | 154 |
Scenario (method activation stack, last called at bottom) |
1440 | 155 |
1) ST method, handles IllegalArgumentException |
1832 | 156 |
2) Java method, does not IllegalArgumentException." |
157 |
||
158 |
| thrower caught | |
|
1515 | 159 |
thrower := JAVA stx libjava tests lang ExceptionTests new. |
1832 | 160 |
[ |
1833 | 161 |
thrower throw_me: false. |
1440 | 162 |
caught := false. |
1840 | 163 |
] on: JAVA java lang IllegalArgumentException do: [:ex | |
164 |
caught := true. |
|
165 |
]. |
|
1477 | 166 |
self assert: caught == false. |
1832 | 167 |
self assert: (JavaVM enteredMonitorsOfProcess: Processor activeProcess) |
168 |
isEmptyOrNil. |
|
169 |
self assert: (JavaVM acquiredMonitorsOfProcess: Processor activeProcess) |
|
170 |
isEmptyOrNil. |
|
1440 | 171 |
|
172 |
"Created: / 18-03-2012 / 21:49:09 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
1833 | 173 |
"Modified: / 18-11-2012 / 18:17:22 / Marcel Hlopko <hlopkmar@fel.cvut.cz>" |
1840 | 174 |
"Modified (format): / 29-11-2012 / 22:54:46 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
1440 | 175 |
! |
176 |
||
177 |
test_01c |
|
178 |
" |
|
179 |
Scenario (method activation stack, last called at bottom) |
|
180 |
1) ST method, handles IllegalArgumentException |
|
181 |
2) Java method, does not IllegalArgumentException. |
|
182 |
" |
|
183 |
||
184 |
| thrower caught | |
|
1515 | 185 |
thrower := JAVA stx libjava tests lang ExceptionTests new. |
1440 | 186 |
[ |
187 |
thrower throw_me: true. |
|
188 |
caught := false. |
|
189 |
||
190 |
] on: JAVA java lang Throwable do: [:ex| |
|
191 |
caught := true. |
|
192 |
]. |
|
193 |
||
1477 | 194 |
self assert: caught == true. |
195 |
self assert: (JavaVM enteredMonitorsOfProcess: Processor activeProcess) isEmptyOrNil. |
|
196 |
self assert: (JavaVM acquiredMonitorsOfProcess: Processor activeProcess) isEmptyOrNil. |
|
1440 | 197 |
|
198 |
"Created: / 18-03-2012 / 22:11:24 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
199 |
! |
|
200 |
||
201 |
test_01d |
|
202 |
" |
|
203 |
Scenario (method activation stack, last called at bottom) |
|
204 |
1) ST method, handles IllegalArgumentException |
|
205 |
2) Java method, does not IllegalArgumentException. |
|
206 |
" |
|
207 |
||
208 |
| thrower caught | |
|
1515 | 209 |
thrower := JAVA stx libjava tests lang ExceptionTests new. |
1440 | 210 |
[ |
211 |
[ |
|
212 |
thrower throw_me: true. |
|
213 |
caught := false. |
|
214 |
||
215 |
] on: JAVA java lang ArrayIndexOutOfBoundsException do: [:ex| |
|
216 |
caught := true. |
|
217 |
]. |
|
218 |
] on: JavaUnhandledExceptionError do:[ |
|
219 |
caught := 123. |
|
220 |
]. |
|
221 |
||
1477 | 222 |
self assert: caught == 123. |
223 |
self assert: (JavaVM enteredMonitorsOfProcess: Processor activeProcess) isEmptyOrNil. |
|
224 |
self assert: (JavaVM acquiredMonitorsOfProcess: Processor activeProcess) isEmptyOrNil. |
|
1440 | 225 |
|
226 |
"Created: / 18-03-2012 / 22:12:06 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
1450 | 227 |
! |
228 |
||
229 |
test_01e |
|
230 |
" |
|
231 |
Scenario (method activation stack, last called at bottom) |
|
232 |
1) ST method, handles IllegalArgumentException |
|
233 |
2) Java method, throws IllegalArgumentException. |
|
234 |
" |
|
235 |
||
236 |
| thrower caught | |
|
1515 | 237 |
thrower := JAVA stx libjava tests lang ExceptionTests new. |
1450 | 238 |
[ |
239 |
thrower call: true. |
|
240 |
caught := false. |
|
241 |
||
242 |
] on: JAVA java lang IllegalArgumentException do: [:ex| |
|
243 |
caught := true. |
|
244 |
]. |
|
245 |
||
1477 | 246 |
self assert: caught == true. |
247 |
self assert: (JavaVM enteredMonitorsOfProcess: Processor activeProcess) isEmptyOrNil. |
|
248 |
self assert: (JavaVM acquiredMonitorsOfProcess: Processor activeProcess) isEmptyOrNil. |
|
1450 | 249 |
|
250 |
"Created: / 03-04-2012 / 14:44:01 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
251 |
! |
|
252 |
||
253 |
test_03a |
|
254 |
" |
|
1832 | 255 |
Scenario (method activation stack, last called at bottom) |
1450 | 256 |
1) ST method, handles IllegalArgumentException |
257 |
2) Java method with finally |
|
1832 | 258 |
3) Java method, throws IllegalArgumentException." |
259 |
||
260 |
| thrower caught | |
|
1515 | 261 |
thrower := JAVA stx libjava tests lang ExceptionTests new. |
1832 | 262 |
[ |
1450 | 263 |
thrower test_03: true. |
264 |
caught := false. |
|
1832 | 265 |
] on: JAVA java lang IllegalArgumentException do: [:ex | caught := true. ]. |
1450 | 266 |
self assert: caught == true. |
1455 | 267 |
self assert: (thrower instVarNamed: #token) == 3. |
1832 | 268 |
self assert: (JavaVM enteredMonitorsOfProcess: Processor activeProcess) |
269 |
isEmptyOrNil. |
|
270 |
self assert: (JavaVM acquiredMonitorsOfProcess: Processor activeProcess) |
|
271 |
isEmptyOrNil. |
|
1450 | 272 |
|
273 |
"Created: / 03-04-2012 / 15:39:08 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
1832 | 274 |
"Modified (comment): / 18-11-2012 / 16:50:50 / Marcel Hlopko <hlopkmar@fel.cvut.cz>" |
1452
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
275 |
! |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
276 |
|
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
277 |
test_04a |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
278 |
" |
1832 | 279 |
Scenario (method activation stack, last called at bottom) |
1452
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
280 |
1) ST method, handles 'signal' |
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
281 |
2) Java method with finally |
1832 | 282 |
3) Smalltak method, throws 'signal'" |
283 |
||
284 |
| thrower caught | |
|
1515 | 285 |
thrower := JAVA stx libjava tests lang ExceptionTests new. |
1832 | 286 |
[ |
1452
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
287 |
thrower test_04: self with: true. |
1832 | 288 |
caught := false. |
289 |
] on: signal do: [:ex | caught := true. ]. |
|
1452
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
290 |
self assert: caught == true. |
1455 | 291 |
self assert: (thrower instVarNamed: #token) == 3. |
1832 | 292 |
self assert: (JavaVM enteredMonitorsOfProcess: Processor activeProcess) |
293 |
isEmptyOrNil. |
|
294 |
self assert: (JavaVM acquiredMonitorsOfProcess: Processor activeProcess) |
|
295 |
isEmptyOrNil. |
|
1452
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
296 |
|
69dcb9c33742
Some more support for finally block when a Smalltalk exception is thrown - not yet working correctly
vranyj1
parents:
1450
diff
changeset
|
297 |
"Created: / 03-04-2012 / 17:30:10 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
1832 | 298 |
"Modified: / 18-11-2012 / 18:04:42 / Marcel Hlopko <hlopkmar@fel.cvut.cz>" |
1440 | 299 |
! ! |
300 |
||
301 |
!JavaExceptionTests class methodsFor:'documentation'! |
|
302 |
||
1953
1e42ad3fc322
Added support Java>>addToClassPath: & Java>>addToSourcePath:. Removed JavaPathElement.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
1843
diff
changeset
|
303 |
version_HG |
1e42ad3fc322
Added support Java>>addToClassPath: & Java>>addToSourcePath:. Removed JavaPathElement.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
1843
diff
changeset
|
304 |
|
1e42ad3fc322
Added support Java>>addToClassPath: & Java>>addToSourcePath:. Removed JavaPathElement.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
1843
diff
changeset
|
305 |
^ '$Changeset: <not expanded> $' |
1e42ad3fc322
Added support Java>>addToClassPath: & Java>>addToSourcePath:. Removed JavaPathElement.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
1843
diff
changeset
|
306 |
! |
1e42ad3fc322
Added support Java>>addToClassPath: & Java>>addToSourcePath:. Removed JavaPathElement.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
1843
diff
changeset
|
307 |
|
1440 | 308 |
version_SVN |
1953
1e42ad3fc322
Added support Java>>addToClassPath: & Java>>addToSourcePath:. Removed JavaPathElement.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
1843
diff
changeset
|
309 |
^ '§Id§' |
1440 | 310 |
! ! |