RosettaCodeData/Task/Address-of-a-variable/Racket/address-of-a-variable-2.rkt
2013-04-10 14:58:50 -07:00

6 lines
195 B
Racket

(ptr-ref (madness +) _short)
(ptr-ref (madness (/ 4 3)) _short)
(ptr-ref (madness 3.2) _short)
(ptr-ref (madness (sqrt -2)) _short)
(ptr-ref (madness #\a) _short)
(ptr-ref (madness 'foo) _short)