Archived tweet #11079 from the @leastfixedpoint Twitter Archivedef-operator where #f statement-macro where
def-syntax where stx
syntax-case stx (block)
_ (E ...) ((_where (block (K ... (block V ...)) ...)))
syntax (let (block (def K ... (block V ...)) ... E ...))
module+ main
displayln (x + y x)
where
x: 123
y z: z * 2
