all messages for Emacs-related lists mirrored at yhetil.org
 help / color / mirror / code / Atom feed
From: Oliver Scholz <alkibiades@gmx.de>
Subject: Re: alist and multiple values for one key
Date: Tue, 21 Jan 2003 11:53:10 +0100	[thread overview]
Message-ID: <u4r82g4ox.fsf@ID-87814.user.dfncis.de> (raw)
In-Reply-To: dafb954c.0301200503.2118ecf9@posting.google.com

ncauderan@hotmail.com (Norbert C.) writes:

> Hi,
>
>        I would lile to find the "good way" to retrieve multiple values
> for a given key in an alist.
>
>        But I didn't find a natural way to do it. For example :
> (setq trees '((pine . cones) (pine . acorns) (oak . acorns) (maple .
> seeds)))
> ==> ((pine . cones) (pine . acorns) (oak . acorns) (maple . seeds))
> (assoc 'pine trees)
> ==> (pine . cones)
>
> What I'd like is something that returns each value associated with
> 'pine.

If I don't want to `(require 'cl)' I use something like this:

(delq nil
      (mapcar (lambda (elt)
		(if (eq (car elt) 'pine) elt nil))
	      mtrees))

You see this (delq nil (mapcar ... in Emacs' sources at some places,
too.


    Oliver
-- 
2 Pluviôse an 211 de la Révolution
Liberté, Egalité, Fraternité!

  parent reply	other threads:[~2003-01-21 10:53 UTC|newest]

Thread overview: 11+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2003-01-20 13:03 alist and multiple values for one key Norbert C.
2003-01-20 16:03 ` Friedrich Dominicus
2003-01-20 23:53   ` Hannu Koivisto
2003-01-21  6:30     ` Friedrich Dominicus
2003-01-21  6:57     ` Friedrich Dominicus
2003-01-20 16:07 ` Klaus Berndl
2003-01-20 17:18 ` Kai Großjohann
2003-01-20 17:19 ` Kai Großjohann
2003-01-20 23:45   ` Hannu Koivisto
2003-01-21 10:53 ` Oliver Scholz [this message]
2003-01-21 11:04   ` David Kastrup

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=u4r82g4ox.fsf@ID-87814.user.dfncis.de \
    --to=alkibiades@gmx.de \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
Code repositories for project(s) associated with this external index

	https://git.savannah.gnu.org/cgit/emacs.git
	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.