Re: Counting Nodes

<-prev [Thread] next->	<-prev [Date] next->
Month Index \| List Home

Re: Counting Nodes

Subject: Re: Counting Nodes
From: Matthias Clasen <clasen@xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx>
Date: Thu, 24 Feb 2000 22:37:14 +0100

This is completely untested:

(define (text-node-cnt #!optional (cur-text-node (current-node)))
  (node-list-length
     (node-list-filter
       (lambda (snl) (not (attribute-string "type" snl)))
       (preced cur-text-node))))

-- 
Matthias Clasen, 
Tel. 0761/203-5606
Email: clasen@xxxxxxxxxxxxxxxxxxxxxxxxxx
Mathematisches Institut, Albert-Ludwigs-Universitaet Freiburg


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

Current Thread
Counting Nodes Maltby, David G - Thu, 24 Feb 2000 15:53:53 -0500 (EST) Brandon Ibach - Thu, 24 Feb 2000 16:40:31 -0500 (EST) Matthias Clasen - Thu, 24 Feb 2000 16:54:19 -0500 (EST) <= <Possible follow-ups> Maltby, David G - Thu, 24 Feb 2000 17:00:29 -0500 (EST) Maltby, David G - Fri, 25 Feb 2000 11:03:23 -0500 (EST) Matthias Clasen - Fri, 25 Feb 2000 11:35:42 -0500 (EST) Brandon Ibach - Fri, 25 Feb 2000 13:38:54 -0500 (EST)

Current Thread

Counting Nodes
- Maltby, David G - Thu, 24 Feb 2000 15:53:53 -0500 (EST)
  - Brandon Ibach - Thu, 24 Feb 2000 16:40:31 -0500 (EST)
  - Matthias Clasen - Thu, 24 Feb 2000 16:54:19 -0500 (EST) <=
  - <Possible follow-ups>
  - Maltby, David G - Thu, 24 Feb 2000 17:00:29 -0500 (EST)
  - Maltby, David G - Fri, 25 Feb 2000 11:03:23 -0500 (EST)
    - Matthias Clasen - Fri, 25 Feb 2000 11:35:42 -0500 (EST)
      - Brandon Ibach - Fri, 25 Feb 2000 13:38:54 -0500 (EST)

<- Previous	Index	Next ->
Re: Counting Nodes, Brandon Ibach	Thread	RE: Counting Nodes, Maltby, David G
Re: Counting Nodes, Brandon Ibach	Date	RE: Counting Nodes, Maltby, David G
	Month