-module(dcell).
-export([cell/1,start/1]).

cell(Content) -> 
  receive
    {set, NewContent} -> cell(NewContent); 
    {get, Customer}   -> io:format("Get request from ~w~n",[Customer]),
			 Customer ! Content, 
                         cell(Content)
  end.

start(Content) -> 
  register(dcell, spawn(dcell, cell, [Content])).