#BUGFIX by stefan cvs_MAIN
authorStefan Vogel <sv@exept.de>
Wed, 30 Nov 2016 17:47:31 +0100
branchcvs_MAIN
changeset 3667 418ea879b40a
parent 3666 abc22951d4df
child 3668 be42ff080cb6
#BUGFIX by stefan class: JavaVM changed: #throwExceptionClassName:withMessage: raise error if exception class cannot be resolved
JavaVM.st
--- a/JavaVM.st	Wed Nov 30 17:46:38 2016 +0100
+++ b/JavaVM.st	Wed Nov 30 17:47:31 2016 +0100
@@ -3683,6 +3683,9 @@
     | exClass  ex |
 
     exClass := self classForName: aJavaExceptionClassName asSlashedJavaClassName definedBy: nil.
+    exClass isNil ifTrue:[
+        self error:'Missing Java Exception Class: ', aJavaExceptionClassName.
+    ].
     ex := exClass newWith_String: someMessage.
     ^ self throwException: ex