Re: Testing if an attribute is present

Subject: Re: Testing if an attribute is present
From: Vivek Agrawala <vivek@xxxxxxxxxxxxxxx>
Date: Mon, 27 Oct 1997 11:43:39 -0500
> jade:metafilter.dsl:79:2:E: 1st argument for primitive "literal" of
> wrong type: "#f" not a string

Here is a procedure that illustrates how to check for an attribute:

(define (get-str-attr-no-err attr-nm snl)
  (let ((a-str (attribute-string attr-nm snl)))
    (if (equal? a-str #f) "" a-str) ))

To use it:
 (get-str-attr-no-err "DAY" (current-node))

NOTE: specify attribute names in upper case.

-- Vivek Agrawala, Ph.D.
Siemens Corporate Research, Inc.	email: vivek@xxxxxxxxxxxxxxx

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


Current Thread