anchor.diff:  			[{attributes, record_info(fields, gtt)},
   			{record_name, gtt}]) of
   		{atomic, ok} ->
  -			add_resource(Table),
   			ok;
   		{aborted, Reason} ->
   			exit(Reason)
  
positive.code: 		Tables :: Table | [Table],
  		Table :: atom() | string(),
  		File :: string().
  %% @doc Create a backup of the named table(s) in `File.BUPTMP'.
  %%
  backup([H | _ ] = Tables, File) when is_list(H) ->
  	backup([list_to_existing_atom(T) || T <- Tables], File);
  
negative.code: restore(Tables, File) when is_list(Tables), is_list(File) ->
  	case mnesia:restore(File, [{clear_tables, Tables}]) of
  		{atomic, RestoredTabs} ->
  			{ok,  RestoredTabs};
  		{aborted, Reason} ->
  			exit(Reason)
  