dotfiles/.config/racket/racketrc.rktl

mirror of https://mzte.de/git/LordMZTE/dotfiles.git synced 2024-11-13 13:32:49 +01:00
(current-print (λ (x)
                 (cond
                   [(void? x) #f]
                   ;; Also show fractions as decimals.
                   [(and (rational? x) (not (integer? x))) (printf "~a = ~a" x (exact->inexact x))]
                   [else (pretty-print x)])))
add racket init config 2023-09-30 15:37:13 +02:00			`(current-print (λ (x)`
			`(cond`
			`[(void? x) #f]`
			`;; Also show fractions as decimals.`
			`[(and (rational? x) (not (integer? x))) (printf "~a = ~a" x (exact->inexact x))]`
			`[else (pretty-print x)])))`