anchor.diff:  			exit(Reason)
   	end.
   %% @hidden
  -import2(Table, [], _LM, Acc) ->
  -	F = fun(#gtt{} = G) -> mnesia:write(Table, G, write) end,
  +import4(Table, [], _LM, Acc) ->
  +	F = fun(#gtt{} = G) ->
  +				mnesia:write(Table, G, write)
  +	end,
   	lists:foreach(F, lists:flatten(Acc));
  -import2(Table, [<<>> | T], LM, Acc) ->
  -	import2(Table, T, LM, Acc);
  -import2(Table, [Chunk | Rest], LM, Acc) ->
  +import4(Table, [<<>> | T], LM, Acc) ->
  +	import4(Table, T, LM, Acc);
  +import4(Table, [Chunk | Rest], LM, Acc) ->
   	case binary:split(Chunk, [<<"\"">>], [global]) of
   		[Chunk] ->
  -			NewAcc = [import3(binary:split(Chunk, [<<",">>], [global]), LM, []) | Acc],
  -			import2(Table, Rest, LM, NewAcc);
  +			NewAcc = [import5(binary:split(Chunk, [<<",">>], [global]), LM, []) | Acc],
  +			import4(Table, Rest, LM, NewAcc);
   		SplitChunks ->
   			F = fun(<<$, , T/binary>>, AccIn) ->
   						[T | AccIn];
  
positive.code: %% 	Create a new table or overwrite existing table.
  import(File) ->
  	case file:read_file(File) of
  		{ok, Records} ->
  			Basename = filename:basename(File),
  			Table = list_to_atom(string:sub_string(Basename,
  					1, string:rchr(Basename, $.) - 1)),
  			import(Table, Records);
  		{error, Reason} ->
  			exit(file:format_error(Reason))
  	end.
  %% @hidden
  import(Table, Records) ->
  	case mnesia:create_table(Table,
  			[{disc_copies, [node() | nodes()]},
  			{attributes, record_info(fields, gtt)},
  			{record_name, gtt}]) of
  		{atomic, ok} ->
  			import1(Table, Records);
  		{aborted, {already_exists, Table}} ->
  			case mnesia:clear_table(Table) of
  				{atomic, ok} ->
  					import1(Table, Records);
  				{aborted, Reason} ->
  					exit(Reason)
  			end;
  
negative.code: 						end
  			end,
  			AccOut = lists:foldl(F, [], SplitChunks),
  			NewAcc = [import5(lists:reverse(AccOut), LM, []) | Acc],
  			import4(Table, Rest, LM, NewAcc)
  	end.
  %% @hidden
  import5([<<>> | T], LM, Acc) ->
  	import5(T, LM, [undefined | Acc]);
  import5([H | T], LM, Acc) ->
  	import5(T, LM, [binary_to_list(H) | Acc]);
  import5([], LM, Acc) when length(Acc) == 3 ->
  	import6(lists:reverse(Acc), LM);
  import5([], _LM, _Acc) ->
  	[].
  %% @hidden
  import6([Key, Desc, Rate], LM) ->
  	Tuple  = {Desc, ocs_rest:millionths_in(Rate), LM},
  	case is_key_number(Key) of
  		true->
  