Hi,<br><br>I think I found a typo in the example from section 17.8 and wanted to bring it to the authors' attention:<br><br>(define (web=? a-wp another-wp)<br> (cond<br> [(empty? a-wp) (empty? another-wp)]<br> [(symbol? (first a-wp))<br>
(and (and (cons? another-wp) (symbol? (first another-wp)))<br> (and (symbol=? (first a-wp) (first another-wp))<br> (web=? (rest a-wp) (rest another-wp))))]<br> [else<br>
(and (and (cons? another-wp) (<b>list?</b> (first another-wp)))<br> (and (web=? (first a-wp) (first another-wp))<br> (web=? (rest a-wp) (rest another-wp))))]))<br><br>should the <b>list?</b> function call be <b>cons?</b> instead?<br>
<br>Thanks,<br>Mike<br>