dotfiles/.config/racket/racketrc.rktl

mirror of https://mzte.de/git/LordMZTE/dotfiles.git synced 2024-09-23 02:28:54 +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)])))
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)])))`