Today we'll learn about disambiguation

zmack · Dec 7, 2010 · 4d6f1ac · 4d6f1ac
1 parent 957029c
commit 4d6f1ac
Showing 1 changed file with 7 additions and 1 deletion.
diff --git a/first.erl b/first.erl
@@ -1,6 +1,6 @@
 -module(first).
 
--export([last/1, last_two/1, item_at/2]).
+-export([last/1, last_two/1, item_at/2, length/1]).
 
 last([]) ->
   empty;
@@ -28,3 +28,9 @@ item_at([Head|_Tail], 0) ->
   Head;
 item_at([_Head|Tail], Index) ->
   item_at(Tail, Index - 1).
+
+length([]) ->
+  0;
+length([_Head|Tail]) ->
+  1 + first:length(Tail).
+