var-to-tree

[Sandip Ray]

Hi,

Here's a message from Warren, clarifying the confusion some of you had
regarding the definition of var-to-tree. I'm forwarding this, since
he was having trouble posting this to the class newsgroup.

Thanks,

-- Sandip

From hunt Mon Nov 3 11:02:34 -0600 2008
From: "Warren A. Hunt Jr." <hu...@cs.utexas.edu>
To: utexas-cs38...@googlegroups.com
Subject: VAR-TO-TREE

Hi everyone,

It appears that I left out the definition of
VAR-TO-TREE from the class notes.

(defn var-to-tree (var vars)
(cond ((atom vars) nil)
((equal var (car vars))
(hons t nil))
(t (let ((tree (var-to-tree var (cdr vars))))
(hons tree tree)))))

Cheers,

Warren