anchor.diff:  %% Get the type info for the given block name 
   %% =====================================================================    
   handle_call({get_type_info, BlockName}, _From, State) ->
  -	% Get the block_module (i.e. block code), for the given block
  -	% Block type info is in there.
  -	case block_server:get_value(BlockName, block_module) of
  -		{ok, BlockModule} ->
  -			Result = block_types:block_type_info(BlockModule);
  -
  -		{error, Reason} ->
  -			Result = {error, Reason}	
  -	end,
  +  % Get the block_module (i.e. block code), for the given block
  +  % Block type info is in there.
  +  case block_server:get_value(BlockName, block_module) of
  +    {ok, BlockModule} ->
  +      Result = block_types:block_type_info(BlockModule);
  +
  +    {error, Reason} ->
  +      Result = {error, Reason}  
  +  end,
     {reply, Result, State};
   
   
  
positive.code: %% ====================================================================
  %% Behavioural functions
  %% ====================================================================
  	
  
  %% ==================================================================== 
  %% init/1
  %% ====================================================================
  -spec init(Args :: term()) -> Result when
  	Result :: {ok, State}
  			| {ok, State, Timeout}
  			| {ok, State, hibernate}
  			| {stop, Reason :: term()}
  			| ignore,
  	State :: term(),
  	Timeout :: non_neg_integer() | infinity.
  
  init(null) ->
    error_logger:info_msg("Starting LinkBlox API server~n"),
  
negative.code: %% Set a block value 
  %% =====================================================================    
  handle_call({set_value, BlockName, ValueId, Value}, _From, State) ->
    case valid_block_name(BlockName) of
      true ->
        case read_only_attrib(ValueId) of
          false ->
            Result = block_server:set_value(BlockName, ValueId, Value);
          _ ->
            Result = {error, read_only}
        end;
      _ ->
        Result = {error, block_not_found}
    end,
    {reply, Result, State};  
  
  
  %% =====================================================================
  %% Link block input to a block output 
  %% =====================================================================    
  handle_call({set_link, BlockName, InputValueId, Link}, _From, State) ->
    case valid_block_name(BlockName) of
      true ->
        Result = block_server:set_link(BlockName, InputValueId, Link);
  
      _ ->
        Result = {error, block_not_found}
    end,
    {reply, Result, State};  
  
  
  %% =====================================================================
  %% Execute block
  %% =====================================================================    
  handle_call({execute_block, BlockName}, _From, State) ->
    case valid_block_name(BlockName) of
      true ->
        block_server:execute(BlockName),
        Result = ok;
      _ ->
        Result = {error, block_not_found}
    end,
    {reply, Result, State};
  
  
  