Hi,

to follow up on the issue: Erik pointed me to the source of the problem (that he also documented as ticket #123 [1]). It was caused by breakage in one Java implementation of subclassp, probably left over by the reimplementation of java-class in Lisp. I fixed it by reusing the (amended) generic implementation in the LispClass.subclassp static method. In the process I also fixed register-java-exception to signal meaningful errors if you feed it an object that does not name a class. This is available on trunk as revision 13221 [2]. Please check if your code now works.

Best regards, Alessio

[1] http://trac.common-lisp.net/armedbear/ticket/123 [2] http://trac.common-lisp.net/armedbear/changeset/13221

On Thu, Jan 20, 2011 at 6:12 PM, William will.wadsworth.10@gmail.com wrote:

Hi,

I am trying to register Java exceptions using REGISTER-JAVA-EXCEPTION but it does not seem to work for me as evidenced by the transcript below.

Is there anything that I may have missed?

Armed Bear Common Lisp 0.23.1 Java 1.6.0_20 Sun Microsystems Inc. Java HotSpot(TM) 64-Bit Server VM Low-level initialization completed in 0.354 seconds. Startup completed in 1.579 seconds. Type ":help" for a list of available commands. CL-USER(1): (define-condition java-illegal-argument-error (java-exception) ()) JAVA-ILLEGAL-ARGUMENT-ERROR CL-USER(2): (register-java-exception "java.lang.IllegalArgumentException" 'java-illegal-argument-error) NIL CL-USER(3): (ignore-errors (jstatic (jmethod "java.lang.String" "valueOf" "int") "java.lang.String" "12")) NIL #<JAVA-EXCEPTION {4A6F19D5}> CL-USER(4): (jstatic (jmethod "java.lang.String" "valueOf" "int") "java.lang.String" "12") #<THREAD "interpreter" {2690ED81}>: Debugger invoked on condition of type JAVA-EXCEPTION  #<JAVA-EXCEPTION {74D8C3EE}> Restarts:  0: TOP-LEVEL Return to top level. [1] CL-USER(5): 0 CL-USER(6):

Kind regards, Martin.

---

armedbear-devel mailing list armedbear-devel@common-lisp.net http://common-lisp.net/cgi-bin/mailman/listinfo/armedbear-devel