www.fifi.org Documentation Manpages GNU Info Debian document tree Whole document tree Trigance web page Public services User info Mailing lists Secure server Multilingual usage
Copyright (C) 2000-2012 Philippe Troin <webmaster@fifi.org>.
Validate HTML Validate CSS
Whole document tree
(assoc-objs alist)
Returns a list of the objects in an associative list.
The associative list. An associative list is a list of lists where each interior list is a pair of elements.
(assoc-objs (("a" "b") ("c" "d"))) returns ("a" "c")
Norman Walsh, <ndw@nwalsh.com>
(define (assoc-objs alist) ;; Returns a list of the objects in an associative list (let loop ((result '()) (al alist)) (if (null? al) result (loop (append result (list (car (car al)))) (cdr al)))))