pushBlob :: ProcessId -> String -> String -> Process DataNodeResponse
pushBlob p bn bdata
  = call p (AddBlob bn bdata)
pushBlob :: ProcessId -> String -> String -> Process DataNodeResponse
pushBlob p bn bdata
  = call p (AddBlob bn bdata)
pushBlob p bn bdata
  = call p (AddBlob bn bdata)