@@ -48,7 +48,7 @@ pretty cfg = go
48 go (Array a) = array (fmap go $ V.toList a)
48 go (Array a) = array (fmap go $ V.toList a)
49 go Null = null
49 go Null = null
50 go (String s) = string s
50 go (String s) = string s
51− go (Number n) = number n
51+ go (Number n) = scientific n
52 go (Bool b) = bool b
52 go (Bool b) = bool b
54-- | Configurable 'encode'.
54-- | Configurable 'encode'.