Re: Typo in DSSSL standard

Subject: Re: Typo in DSSSL standard
From: Chris Maden <crism@xxxxxxx>
Date: Fri, 17 Oct 1997 10:12:31 -0400
While we're on the subject, the ISO/IEC 10179 implementation of
(node-list-filter) reverses the order of the nodes passed to it.  This
altered version keeps the nodes in order.

;; (node-list-filter) from ISO/IEC 10179 with small change to avoid
;; reversing the order of nodes
(define (node-list-filter proc
			  nl)
  (node-list-reduce nl
		    (lambda (result snl)
		      (if (proc snl)
			  (node-list result
				     snl)
			  result))
		    (empty-node-list)))

And Jade seems to have a problem with (node-list-length) for large
nodes, so here's a (node-list-last) that avoids it:

;; (node-list-last) from ISO/IEC 10179 - implemented differently from
;; reference implementation due to Jade problem with node-list-length
(define (node-list-last nl)
  (node-list-first (node-list-reverse nl)))

-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