Well, that's cute. with constant signature expands into a call to jss:invoke-find-method called with the arguments to the first function call, saves that, and subsequently always uses jcall to call that specific method. The lookup calls jresolve method then setAccessible on the result. Perhaps it is the setAccessible that is doing the magic?
You should svn update - I've committed some changes elsewhere. I'm dealing with an annoyance - I updated abcl to trunk and am trying java 1.7. I get a startup (fatal) error unless I first delete the slime/swank compiled files. No clue what that's about. If you want you can see if you can reproduce and then file a report. Otherwise I'll get to it.
The java 1.7 I get from the Oracle site.
-Alan
On Wed, Aug 1, 2012 at 12:08 AM, Jonathan P. Bona jonathanbona@gmail.comwrote:
Just to follow up on this with a little more info, I've put together a small example that demonstrates the issue I'm seeing.
Consider this class "Outer", which includes an inner class "Inner":
public class Outer { public static Inner getAnInner(){ return new Inner(); }
static class Inner{ public Inner(){ } public void innerm(){ System.out.println("called innerm"); } }}
In Java, I can instantiate Inner and call its public methods, as in the following:
public class TestMain { public static void main(String[] args){ Outer.Inner myinner = new Outer.Inner(); myinner.innerm(); } }
However, in ABCL 1.0.1:
CL-USER(1): (jnew "Outer$Inner") #<THREAD "interpreter" {7FB5438D}>: Debugger invoked on condition of type JAVA-EXCEPTION Java exception 'java.lang.IllegalAccessException: Class org.armedbear.lisp.Java$pf_jnew can not access a member of class Outer$Inner with modifiers "public"'.
I can still get an instance to play with:
CL-USER(3): (jstatic "getAnInner" "Outer") #<Outer$Inner Outer$Inner@67df02c9 {62300F65}>
… but I can't call its public methods:
CL-USER(6): (jcall "innerm" (jstatic "getAnInner" "Outer")) #<THREAD "interpreter" {7FB5438D}>: Debugger invoked on condition of type JAVA-EXCEPTION Java exception 'java.lang.IllegalAccessException: Class org.armedbear.lisp.Java can not access a member of class Outer$Inner with modifiers "public"'.
… unless I use JSS and with-constant-signature
CL-USER(7): (require :abcl-contrib) CL-USER(8): (require :jss) CL-USER(9): (jss::ensure-compatibility) CL-USER(10): (with-constant-signature ((innerm "innerm")) (innerm (jstatic "getAnInner" "Outer")) ) called innerm NIL
Any help getting to the bottom of this would be greatly appreciated.
Regards, Jonathan
On Tue, Jul 31, 2012 at 10:06 PM, Alan Ruttenberg alanruttenberg@gmail.com wrote:
Hey guys,
Have any of you had a chance to look into this? This is a showstopper
for me
using the latest ABCL as I have basic infrastructure code that is
failing.
Would much appreciate someone having a look.
Thanks, Alan
On Thu, Jul 19, 2012 at 3:54 PM, Jonathan P. Bona <
jonathanbona@gmail.com>
wrote:
Hello,
We found this issue while working with LSW. It seems to be a bug in how public methods are found for inner classes. The last line of code below results in an exception rather than finding and running the size() method:
;;;---------------- (require :abcl-contrib) (require :jss) (jss::ensure-compatibility) (setq headers (#"getHeaderFields" (#"openConnection" (jss::new 'java.net.url "http://google.com"))))
; a java.util.Collections$UnmodifiableRandomAccessList (setq ural (#"get" headers (second (jss::set-to-list (#"keySet" headers)))))
;finds: #<method public int java.util.Collections$UnmodifiableCollection.size()> (find "size" (#"getMethods" (#"getClass" ural) ) :test 'string-equal :key #"getName")
; Java exception 'java.lang.NoSuchMethodException: No applicable method named size found in java.lang.Object or java.util.Collections$UnmodifiableRandomAccessList'. (#"size" ural) ;;;----------------
I chased this into org.armedbear.lisp.Java, where findMethod is
returning
null.
- Jonathan Bona
armedbear-devel mailing list armedbear-devel@common-lisp.net http://lists.common-lisp.net/cgi-bin/mailman/listinfo/armedbear-devel