From: Jens Axel Søgaard (jensaxel at soegaard.net) Date: Sun Jan 22 13:25:10 EST 2006 |
|
Gregory Woodhouse wrote: > ;Get a variable (use failure thunk to recursively check enclosing > environment) > (define (get-symbol symbol env) > (hash-table-get (car env) symbol > (lambda () (if (list? env) > (get-symbol (cdr env) symbol))))) The recursive call should be (get-symbol symbol (cdr env)) . -- Jens Axel Søgaard
Posted on the users mailing list. |
|