Commits

Moritz Heidkamp  committed c5de7d4

Add printer for hash-collision-node

  • Participants
  • Parent commits fcc084b

Comments (0)

Files changed (1)

File persistent-hash-map.scm

 
 (: -ensure-editable-vector (hash-collision-node boolean fixnum vector -> hash-collision-node))
 
+(define-record-printer (hash-collision-node hc-node out)
+  (fprintf out "#<hash-collision-node ~S>" (hc-vec hc-node)))
+
 (define create-node
   (case-lambda
    ((shift key1 val1 key2hash key2 val2)