Changeset 13908


Ignore:
Timestamp:
04/06/12 11:59:48 (10 years ago)
Author:
Mark Evenson
Message:

docstrings: document JAVA:JNEW-ARRAY-FROM-LIST and some friends.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/abcl/src/org/armedbear/lisp/java.lisp

    r13710 r13908  
    195195
    196196(defun jarray-length (java-array)
     197  "Returns the length of a Java primitive array."
    197198  (jstatic "getLength" "java.lang.reflect.Array" java-array)  )
    198199
     
    202203(defun jnew-array-from-array (element-type array)
    203204  "Returns a new Java array with base type ELEMENT-TYPE (a string or a class-ref)
    204    initialized from ARRAY"
     205   initialized from ARRAY."
    205206  (flet
    206207    ((row-major-to-index (dimensions n)
     
    221222
    222223(defun jnew-array-from-list (element-type list)
     224  "Returns a new Java array with base type ELEMENT-TYPE (a string or a class-ref)
     225   initialized from a Lisp list."
    223226  (let ((jarray (jnew-array element-type (length list)))
    224227  (i 0))
     
    368371      (error "Unknown load-form for ~A" class-name)))))
    369372
    370 (defun jproperty-value (obj prop)
    371   (%jget-property-value obj prop))
     373(defun jproperty-value (object property)
     374  "setf-able access on the Java Beans notion of property named PROPETRY on OBJECT."
     375  (%jget-property-value object property))
    372376
    373377(defun (setf jproperty-value) (value obj prop)
     
    452456
    453457(defun ensure-java-class (jclass)
     458  "Attempt to ensure that the Java class referenced by JCLASS exists in the current process of the implementation."
    454459  (let ((class (%find-java-class jclass)))
    455460    (if class
Note: See TracChangeset for help on using the changeset viewer.