reader examples typo

This commit is contained in:
Eli Barzilay 2010-07-27 10:15:40 -04:00
parent 6a7801c523
commit f46144d5d3

View File

@ -61,7 +61,7 @@
[(number? v)
(let loop ([v v])
(if (inexact? v)
`(inexact->exact ,(loop (inexact->exact v)))
`(exact->inexact ,(loop (inexact->exact v)))
(cond
[(integer? v) v]
[(real? v) `(/ ,(numerator v)