[armedbear-ticket] [armedbear] #259: JAVA:JSTATIC cannot always be invoked properly

[armedbear]

#259: JAVA:JSTATIC cannot always be invoked properly
--------------------------------------------+-------------------------------
 Reporter:  https://openid.fau.de/eg74yneg  |       Owner:  mevenson 
     Type:  defect                          |      Status:  accepted 
 Priority:  major                           |   Milestone:  1.1.0    
Component:  abcl-contrib                    |     Version:  1.1.0-dev
 Keywords:                                  |  
--------------------------------------------+-------------------------------

Old description:

> The following doesn't work
>
> {{{
> (jstatic "asList" "java.util.Arrays" (java:jnew-array (jclass "int") 1))
> }}}
>
> The question is: should it?
>
> CL-USER> *
> #<jarray [B at 5719d1 {15F987F}>
> CL-USER> (jss:jarray-to-list *)
>
> ==========
>
> no such method
>    [Condition of type ERROR]
>
> Restarts:
>  0: [RETRY] Retry SLIME REPL evaluation request.
>  1: [ABORT] Return to sldb level 1.
>  2: [RETRY] Retry SLIME REPL evaluation request.
>  3: [*ABORT] Return to SLIME's top level.
>  4: [ABORT] Abort thread.
>
> Backtrace:
>   0: (#<FUNCTION {149EEF3}> #<ERROR {E6942E}> #<FUNCTION {149EEF3}>)
>   1: (APPLY #<FUNCTION {149EEF3}> (#<ERROR {E6942E}> #<FUNCTION
> {149EEF3}>))
>   2: (SYSTEM::RUN-HOOK SYSTEM::*INVOKE-DEBUGGER-HOOK* #<ERROR {E6942E}>
> #<FUNCTION {149EEF3}>)
>   3: (INVOKE-DEBUGGER #<ERROR {E6942E}>)
>   4: org.armedbear.lisp.Lisp.error(Lisp.java:382)
>   5: org.armedbear.lisp.Java.jstatic(Java.java:462)
>   6: org.armedbear.lisp.Java$pf_jstatic.execute(Java.java:512)
>   7: org.armedbear.lisp.Primitive.execute(Primitive.java:135)
>   8: (JSS:JARRAY-TO-LIST #<jarray [B at 5719d1 {15F987F}>)
>   9: (SYSTEM::%EVAL (JSS:JARRAY-TO-LIST *))
>  10: (EVAL (JSS:JARRAY-TO-LIST *))
>  11: (SWANK::EVAL-REGION "(jss:jarray-to-list *)
>      ")

New description:

 The following doesn't work

 {{{
 (jstatic "asList" "java.util.Arrays" (java:jnew-array (jclass "int") 1))
 }}}

--

Comment(by mevenson):

 Replying to [comment:1 https://openid.fau.de/eg74yneg]:
 > Simplest test-case:
 > {{{
 > (jss:jarray-to-list (java:jnew-array (jclass "int") 40))
 > }}}

 Text of the original report:

 CL-USER> *
 #<jarray [B at 5719d1 {15F987F}>
 CL-USER> (jss:jarray-to-list *)

 ==========

 no such method
    [Condition of type ERROR]

 Restarts:
  0: [RETRY] Retry SLIME REPL evaluation request.
  1: [ABORT] Return to sldb level 1.
  2: [RETRY] Retry SLIME REPL evaluation request.
  3: [*ABORT] Return to SLIME's top level.
  4: [ABORT] Abort thread.

 Backtrace:
   0: (#<FUNCTION {149EEF3}> #<ERROR {E6942E}> #<FUNCTION {149EEF3}>)
   1: (APPLY #<FUNCTION {149EEF3}> (#<ERROR {E6942E}> #<FUNCTION
 {149EEF3}>))
   2: (SYSTEM::RUN-HOOK SYSTEM::*INVOKE-DEBUGGER-HOOK* #<ERROR {E6942E}>
 #<FUNCTION {149EEF3}>)
   3: (INVOKE-DEBUGGER #<ERROR {E6942E}>)
   4: org.armedbear.lisp.Lisp.error(Lisp.java:382)
   5: org.armedbear.lisp.Java.jstatic(Java.java:462)
   6: org.armedbear.lisp.Java$pf_jstatic.execute(Java.java:512)
   7: org.armedbear.lisp.Primitive.execute(Primitive.java:135)
   8: (JSS:JARRAY-TO-LIST #<jarray [B at 5719d1 {15F987F}>)
   9: (SYSTEM::%EVAL (JSS:JARRAY-TO-LIST *))
  10: (EVAL (JSS:JARRAY-TO-LIST *))
  11: (SWANK::EVAL-REGION "(jss:jarray-to-list *)
      ")

-- 
Ticket URL: <http://trac.common-lisp.net/armedbear/ticket/259#comment:5>
armedbear <http://common-lisp.net/project/armedbear>
armedbear