Re: Case independence and (case)

Subject: Re: Case independence and (case)
From: Chris Maden <crism@xxxxxxx>
Date: Fri, 17 Apr 1998 17:13:24 -0400
[Reynolds, Gregg]
> How about something like
> 
> (define quad-alist
>   (list
>     (cons 'default 'start)
>     (cons (norm "left") 'start)
>     (cons (norm "center") 'center)
>     ...etc...
>   ))
> 
> (let ((myquad (cdr (assoc (attribute-string (norm "align") quad-list)
> 		(current-node)))))
>    (if myquad
>        myquad
>        (cdr (assoc 'default quad-alist))))
> 
> Haven't tested it, but I'm just mad for alists.  Would this be
> horribly inefficient?

(assoc) isn't part of dsssl-o, and Jade 1.1's documentation doesn't
list it among the supported additional procedures.  Otherwise yes, it
would be perfect for what I'm trying to do in this case.

-Chris
-- 
<!NOTATION SGML.Geek PUBLIC "-//Anonymous//NOTATION SGML Geek//EN">
<!ENTITY crism PUBLIC "-//O'Reilly//NONSGML Christopher R. Maden//EN"
"<URL>http://www.oreilly.com/people/staff/crism/ <TEL>+1.617.499.7487
<USMAIL>90 Sherman Street, Cambridge, MA 02140 USA" NDATA SGML.Geek>


 DSSSList info and archive:  http://www.mulberrytech.com/dsssl/dssslist


Current Thread
  • Case independence and (case)
    • Chris Maden - from mail1.ability.netby web4-1.ability.net (8.8.5/8.6.12) with ESMTP id MAA29056Fri, 17 Apr 1998 12:59:06 -0400 (EDT)
      • Henry S. Thompson - from mail1.ability.netby web4-1.ability.net (8.8.5/8.6.12) with ESMTP id QAA01423Fri, 17 Apr 1998 16:06:49 -0400 (EDT)
        • Chris Maden - from mail1.ability.netby web4-1.ability.net (8.8.5/8.6.12) with ESMTP id QAA01928Fri, 17 Apr 1998 16:32:27 -0400 (EDT)
      • <Possible follow-ups>
      • Reynolds, Gregg - from mail1.ability.netby web4-1.ability.net (8.8.5/8.6.12) with ESMTP id QAA02506Fri, 17 Apr 1998 16:59:50 -0400 (EDT)
        • Chris Maden - from mail1.ability.netby web4-1.ability.net (8.8.5/8.6.12) with ESMTP id RAA02755Fri, 17 Apr 1998 17:11:13 -0400 (EDT) <=
          • Russell Steven Shawn O'Connor - from mail1.ability.netby web4-1.ability.net (8.8.5/8.6.12) with ESMTP id TAA04352Fri, 17 Apr 1998 19:16:48 -0400 (EDT)
          • Tony Graham - from mail1.ability.netby web4-1.ability.net (8.8.5/8.6.12) with ESMTP id WAA06429Fri, 17 Apr 1998 22:43:23 -0400 (EDT)
          • Russell Steven Shawn O'Connor - from mail1.ability.netby web4-1.ability.net (8.8.5/8.6.12) with ESMTP id MAA18706Sat, 18 Apr 1998 12:44:17 -0400 (EDT)
          • Norman Walsh - from mail1.ability.netby web4-1.ability.net (8.8.5/8.6.12) with ESMTP id UAA13060Thu, 23 Apr 1998 20:51:52 -0400 (EDT)