[Bug-kawa] [bug #52390] kawa 3.0 anonymous class instantiation in map issue

[anonymous]

URL:
  <http://savannah.gnu.org/bugs/?52390>

                 Summary: kawa 3.0 anonymous class instantiation in map issue
                 Project: Kawa
            Submitted by: None
            Submitted on: Fri 10 Nov 2017 10:01:25 PM UTC
                Category: Type declaration and inference
                Severity: 3 - Normal
              Item Group: Unexpected result
                  Status: None
                 Privacy: Public
             Assigned to: None
             Open/Closed: Open
         Discussion Lock: Any

    _______________________________________________________

Details:

The following code:

(let ((v (map (lambda (prefix)
                (object (java.lang.Object)
                  ((my-method value) (string-append prefix "-" (number->string
value))))) 
           (list "ALPHA" "BETA" "GAMMA"))))
  (display (format "~a ~a ~a : test-map\n" 
             ((car v):my-method 100) 
             ((cadr v):my-method 200)
             ((caddr v):my-method 300))))

gives different results with kawa-2.4 (expected):

ALPHA-100 BETA-200 GAMMA-300 : test-map

and kawa-3.0 (unexpected):

GAMMA-100 GAMMA-200 GAMMA-300 : test-map

It seems it's creating only one subclass, instantiating three times from that,
rather than create three subclasses, instantiating from each one.





    _______________________________________________________

Reply to this item at:

  <http://savannah.gnu.org/bugs/?52390>

_______________________________________________
  Message sent via/by Savannah
  http://savannah.gnu.org/