summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLinus Nordberg <linus@nordberg.se>2014-10-29 17:39:57 +0100
committerLinus Nordberg <linus@nordberg.se>2014-10-29 17:39:57 +0100
commitbbcb238f5232fc29da7d4cb215d2316bd4421b8c (patch)
treef0012d628363910c7e965b7b22ba5b5b164f107a
parent92f681e1cbb444317d2603994c60c02feeab32be (diff)
Resurrect changes in f06372d that got lost in the merge.
-rw-r--r--src/ts.erl18
1 files changed, 9 insertions, 9 deletions
diff --git a/src/ts.erl b/src/ts.erl
index 29d93aa..44d27cc 100644
--- a/src/ts.erl
+++ b/src/ts.erl
@@ -22,22 +22,22 @@ new() ->
-spec add(tree_store(), non_neg_integer(), binary()) -> tree_store().
add(S = #tree_store{layers = Layers}, Layer, Entry) ->
- {NewLayers, List} = layer_rw(Layers, Layer),
- NewList = array:set(array:size(List), Entry, List),
- S#tree_store{layers = array:set(Layer, NewList, NewLayers)}.
+ {NewLayers, Array} = layer_rw(Layers, Layer),
+ NewArray = array:set(array:size(Array), Entry, Array),
+ S#tree_store{layers = array:set(Layer, NewArray, NewLayers)}.
-spec delete(tree_store(), non_neg_integer()) -> tree_store().
delete(S = #tree_store{layers = Layers}, Layer) ->
- List = layer_ro(Layers, Layer),
- NewList = array:resize(array:size(List) - 1, List),
- S#tree_store{layers = array:set(Layer, NewList, Layers)}.
+ Array = layer_ro(Layers, Layer),
+ NewArray = array:resize(array:size(Array) - 1, Array),
+ S#tree_store{layers = array:set(Layer, NewArray, Layers)}.
-spec retrieve(tree_store(), tuple()) -> binary() | undefined.
retrieve(#tree_store{layers = Layers}, {Layer, Index}) ->
- List = layer_ro(Layers, Layer),
- Len = array:size(List),
+ Array = layer_ro(Layers, Layer),
+ Len = array:size(Array),
case Index < Len of
- true -> array:get(Index, List);
+ true -> array:get(Index, Array);
false -> undefined
end.