Id-Map for CommonLisp. It just copy of CCL.