let
link space id key =
reserve1 space key ;
Ihmap
.add space.indices id (
Link
key)