Skip to content

Instantly share code, notes, and snippets.

@soegaard

soegaard/gist:5880340

Created June 27, 2013 20:57
Show Gist options
  • Save soegaard/5880340 to your computer and use it in GitHub Desktop.
Save soegaard/5880340 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.txt
#lang racket
(define-syntax c
(make-set!-transformer
(lambda (stx)
(syntax-case stx (set!)
[(set! id v) #'(error 'set! "c is immutable")]
[id (identifier? #'id) #'42]))))
c
(set! c 43)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment