problem compiling primitive array references

["Hurst, Dave" <DHurst at lisletech dot com>]

Hello!

I have a function that converts an array of objects returned by a Java
function into a Scheme list.  This function works just fine in interpreted
mode.  When I try to compile the Scheme, I get an error complaining that
gnu.kawa.reflect.ArrayLength does not implement Externalizable.  

Here is example code:

(define (get-aggregation-policy pqm :: <com.lisletech.PolicyQueryManager>)
  (let ((ap-get (primitive-array-get <com.lisletech.PolicyNodeType>))
        (ap-length (primitive-array-length <com.lisletech.PolicyNodeType>))
        (policy-list (PolicyQueryManager:getAggregationPolicy pqm)))
    (let collect ((index 0))
      (if (< index (ap-length policy-list))
          (cons (ap-get policy-list index)
                (collect (+ index 1)))
          '()))))

The method PolicyQueryManager.getAggregationPolicy() returns a primitive
Java array of PolicyNodeType.

I am currently using kawa-1.8 for historical reasons.  Is this problem
resolved in Kawa 1.8?

--DaveH		"Be Excellent to each other!"