| The Modular DocBook Stylesheets | ||
|---|---|---|
| Prev | DSSSL Library | Next |
(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, <norm@berkshire.net>
(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)))))| Prev | Home | Next |
| ancestor-member | Up | assoc |
Copyright © 1997, 1998 Norman Walsh