 
 exports.Flat = class Flat extends Base
 
+  constructor : () ->
+    @flat_lock = new Lock
+
   make_kvstore_key : ({type,key}) -> 
     type or= key[-2...]
     "kv:" + super { type, key }

  make_lookup_name : ({type,name}) ->
    "lo:" + super { type, name }

  _link : ({key, name}, cb) ->
    await @_put { key : name, value : key }, defer err
    cb err

  _unlink : ({name}, cb) ->

      err = new E.LookupNotFoundError "No lookup available for #{name}"

##=======================================================================

# A memory-backed store, mainly for testing...
exports.Memory = class Memory extends Base

##=======================================================================
