Changeset 13910
- Timestamp:
- 04/11/12 15:14:28 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/abcl/contrib/jss/invoke.lisp
r13909 r13910 562 562 (defun hashmap-to-hashtable (hashmap &rest rest &key (keyfun #'identity) (valfun #'identity) (invert? nil) 563 563 table 564 &allow-other-keys ) 564 &allow-other-keys ) 565 "Converts the a HASHMAP reference to a java.util.HashMap object to a Lisp hashtable. 566 567 The REST paramter specifies arguments to the underlying MAKE-HASH-TABLE call. 568 569 KEYFUN and VALFUN specifies functions to be run on the keys and values 570 of the HASHMAP right before they are placed in the hashtable. 571 572 If INVERT? is non-nil than reverse the keys and values in the resulting hashtable." 565 573 (let ((keyset (#"keySet" hashmap)) 566 574 (table (or table (apply 'make-hash-table
Note: See TracChangeset
for help on using the changeset viewer.