anchor.diff:  				lists:reverse(Acc)	
   	end,
   	Fun2 = fun() -> Fun1(Fun1, Rest, mnesia:read(Table, [Digit], read), []) end,
  -	case mnesia:transaction(Fun2) of
  -		{atomic, Result} ->
  -			Result;
  -		{aborted, Reason} ->
  -			exit(Reason)
  -	end.
  +	mnesia:ets(Fun2).
   
   -spec backup(Tables, File) -> ok
   	when
  
positive.code: 				undefined
  	end,
  	Fun2 = fun() -> Fun1(Fun1, Rest, mnesia:read(Table, [Digit], read)) end,
  	case mnesia:transaction(Fun2) of
  		{atomic, Result} ->
  			Result;
  		{aborted, Reason} ->
  			exit(Reason)
  	end.
  
  -spec lookup_last(Table, Number) -> Value
  	when
  
negative.code: 	Fun2 = fun() ->
  				Fun1(Fun1, lists:reverse(Number), mnesia:read(Table, Number, read))
  	end,
  	mnesia:ets(Fun2).
  
  -spec lookup_all(Table, Number) -> Value
  	when
  