# HG changeset patch # User Steve Losh # Date 1478788967 0 # Node ID 3d34f6a99a249573faf42248b90c9b053ac29acf # Parent 66af3dc24580ae568284b71fe342b99dc8ed1d98 Make `print-hash-table` friendlier diff -r 66af3dc24580 -r 3d34f6a99a24 losh.lisp --- a/losh.lisp Tue Nov 08 15:47:12 2016 +0000 +++ b/losh.lisp Thu Nov 10 14:42:47 2016 +0000 @@ -1366,7 +1366,9 @@ (if (= i limit) (list key-width :too-many-items (list (- count i) :more)) (list key-width key val)))) - stream)))) + stream))) + (terpri stream) + (values)) ;;;; Weightlists