[racket] internal define in define

From: Jon Rafkind (rafkind at cs.utah.edu)
Date: Thu Sep 22 13:29:16 EDT 2011

Yet another option that I mentioned was: | (+ 1 { n = 8 | (sqr x) = (* x x) | (sqr n) })


#lang honu

(1 + { var n = 8;
       sqr(x){ x * x }
       sqr(n) })

> 65

Of course I sort of cheated and just (as in 5 seconds ago) changed {} from (begin ...) to (let () ...)


Posted on the users mailing list.