Fixed a bug in bimap-put!