Subject: RE: XML encoding from a DSSSL stylesheets? From: "Pawson, David" <DPawson@xxxxxxxxxxx> Date: Wed, 8 Mar 2000 13:06:28 -0000 |
Stephane Bortzmeyer wrote: >The great thing about DSSSL is its portability :-( "assoc" is >not known by >Jade 1.2. ;; ISO/IEC 10179 Procedures ;; Standard Procedures [8.5] ;; assoc ;; (assoc obj alist) ;; Returns the pair from the alist associative list that has obj as its car, otherwise returns #f if no such pair exists. (define (assoc obj alist) ;; Given an associative list, returns the pair that has obj as a car ;; or #f if no such pair exists ;; (("a" "b") ("c" "d")), "a" => ("a" "b") (let loop ((al alist)) (if (null? al) #f (if (equal? obj (car (car al))) (car al) (loop (cdr al)))))) they are (mostly) in the dsssl procedures library. Regards, DaveP DSSSList info and archive: http://www.mulberrytech.com/dsssl/dssslist
Current Thread |
---|
|
<- Previous | Index | Next -> |
---|---|---|
Re: XML encoding from a DSSSL style, Peter Nilsson | Thread | Re: XML encoding from a DSSSL style, Stephane Bortzmeyer |
May indirect flow objects nest?, Peter Nilsson | Date | String problem, Dudley, Mark |
Month |