Updated to Elixir 1.0.0

.gitignore

@@ -1,3 +1,4 @@
 /ebin
 /deps
+/_build
 erl_crash.dump

lib/data/dictionary.ex

@@ -60,10 +60,10 @@ defimpl Data.Dictionary, for: List do
   end
 
   def keys(self) do
-    lc { key, _ } inlist self, do: key
+    for { key, _ } <- self, do: key
   end
 
   def values(self) do
-    lc { _, value } inlist self, do: value
+    for { _, value } <- self, do: value
   end
 end

lib/data/dictionary/balanced_tree.ex

@@ -6,8 +6,10 @@
 #
 #  0. You just DO WHAT THE FUCK YOU WANT TO.
 
+require Record
+
 defmodule Data.Dictionary.BalancedTree do
-  defrecordp :wrap, __MODULE__, dict: nil
+  Record.defrecordp :wrap, __MODULE__, dict: nil
 
   def new do
     wrap(dict: :gb_trees.empty)
@@ -61,6 +63,12 @@ defmodule Data.Dictionary.BalancedTree do
     end
   end
 
+  def get_and_update(me, key, fun) do
+    value = get(me, key)
+    {get, update} = fun.(value)
+    {get, put(me, key, update)}
+  end
+
   def delete(wrap(dict: self), key) do
     wrap(dict: :gb_trees.delete_any(key, self))
   end
@@ -100,7 +108,7 @@ defmodule Data.Dictionary.BalancedTree do
   end
 
   defmodule Sequence do
-    defrecordp :seq, __MODULE__, iter: nil
+    Record.defrecordp :seq, __MODULE__, iter: nil
 
     def new(dict) do
       seq(iter: :gb_trees.iterator(dict))
@@ -178,7 +186,8 @@ defimpl Data.Sequenceable, for: Data.Dictionary.BalancedTree do
 end
 
 defimpl Access, for: Data.Dictionary.BalancedTree do
-  defdelegate access(self, key), to: Data.Dictionary.BalancedTree, as: :get
+  defdelegate get(self, key), to: Data.Dictionary.BalancedTree
+  defdelegate get_and_update(self, key, fun), to: Data.Dictionary.BalancedTree
 end
 
 defimpl Enumerable, for: Data.Dictionary.BalancedTree do

lib/data/dictionary/standard.ex

@@ -6,8 +6,10 @@
 #
 #  0. You just DO WHAT THE FUCK YOU WANT TO.
 
+require Record
+
 defmodule Data.Dictionary.Standard do
-  defrecordp :wrap, __MODULE__, dict: nil
+  Record.defrecordp :wrap, __MODULE__, dict: nil
 
   def new do
     wrap(dict: :dict.new)
@@ -53,6 +55,12 @@ defmodule Data.Dictionary.Standard do
     end
   end
 
+  def get_and_update(me, key, fun) do
+    value = get(me, key)
+    {get, update} = fun.(value)
+    {get, put(me, key, update)}
+  end
+
   def delete(wrap(dict: self), key) do
     wrap(dict: :dict.erase(key, self))
   end
@@ -159,7 +167,8 @@ defimpl Enumerable, for: Data.Dictionary.Standard do
 end
 
 defimpl Access, for: Data.Dictionary.Standard do
-  defdelegate access(self, key), to: Data.Dictionary.Standard, as: :get
+  defdelegate get(self, key), to: Data.Dictionary.Standard
+  defdelegate get_and_update(self, key, fun), to: Data.Dictionary.Standard
 end
 
 defimpl Inspect, for: Data.Dictionary.Standard do

lib/data/exceptions.ex

@@ -6,15 +6,22 @@
 #
 #  0. You just DO WHAT THE FUCK YOU WANT TO.
 
-defexception Data.Empty, message: "the data is empty"
-defexception Data.OutOfBounds, message: "out of bounds"
+defmodule Data.Empty do
+  defexception message: "the data is empty"
+end
+
+defmodule Data.OutOfBounds do
+  defexception message: "out of bounds"
+end
+
+defmodule Data.Missing do
+  defexception message: nil
 
-defexception Data.Missing, key: nil, what: nil do
-  def message(Data.Missing[key: key]) when key != nil do
+  def exception(key: key) when key != nil do
     "key missing: #{inspect key}"
   end
 
-  def message(Data.Missing[what: what]) when what != nil do
+  def exception(what: what) when what != nil do
     "#{inspect what} is missing"
   end
 end

lib/data/queue/simple.ex

@@ -6,6 +6,8 @@
 #
 #  0. You just DO WHAT THE FUCK YOU WANT TO.
 
+require Record
+
 defmodule Data.Queue.Simple do
   @moduledoc """
   A simple and performant queue.
@@ -14,7 +16,7 @@ defmodule Data.Queue.Simple do
   @opaque t :: record
   @type   v :: any
 
-  defrecordp :queue, __MODULE__, enqueue: [], dequeue: []
+  Record.defrecordp :queue, __MODULE__, enqueue: [], dequeue: []
 
   @doc """
   Creates an empty queue.

lib/data/queue/standard.ex

@@ -6,8 +6,10 @@
 #
 #  0. You just DO WHAT THE FUCK YOU WANT TO.
 
+require Record
+
 defmodule Data.Queue.Standard do
-  defrecordp :wrap, __MODULE__, queue: nil
+  Record.defrecordp :wrap, __MODULE__, queue: nil
 
   def new do
     wrap(queue: :queue.new)

lib/data/seq.ex

@@ -6,6 +6,8 @@
 #
 #  0. You just DO WHAT THE FUCK YOU WANT TO.
 
+require Record
+
 defmodule Data.Seq do
   @type t :: Data.Sequence.t | Data.Sequenceable.t | Data.Listable.t
 
@@ -20,7 +22,7 @@ defmodule Data.Seq do
   end
 
   defmodule WithIndex do
-    defrecordp :wrap, __MODULE__, index: 0, seq: nil
+    Record.defrecordp :wrap, __MODULE__, index: 0, seq: nil
 
     alias Data.Sequence, as: S
 
@@ -537,7 +539,7 @@ defmodule Data.Seq do
   def join(seq, string) do
     [first | rest] = map seq, &[string, to_string(&1)]
 
-    [tl(first), rest] |> iolist_to_binary
+    [tl(first), rest] |> IO.iodata_to_binary
   end
 
   @spec group_by(t, (term -> term))              :: Data.Dict.t
@@ -572,6 +574,6 @@ defmodule Data.Seq do
     { reverse(list1), reverse(list2) }
   end
 
-  def split(seq, count) when count < 0 do
+  def split(_seq, count) when count < 0 do
   end
 end

lib/data/set/balanced_tree.ex

@@ -6,11 +6,13 @@
 #
 #  0. You just DO WHAT THE FUCK YOU WANT TO.
 
+require Record
+
 defmodule Data.Set.BalancedTree do
   @opaque t :: record
   @type   v :: any
 
-  defrecordp :wrap, __MODULE__, set: nil
+  Record.defrecordp :wrap, __MODULE__, set: nil
 
   def new do
     wrap(set: :gb_sets.new)

lib/data/set/standard.ex

@@ -6,8 +6,10 @@
 #
 #  0. You just DO WHAT THE FUCK YOU WANT TO.
 
+require Record
+
 defmodule Data.Set.Standard do
-  defrecordp :wrap, __MODULE__, set: nil
+  Record.defrecordp :wrap, __MODULE__, set: nil
 
   def new do
     wrap(set: :sets.new)

lib/data/stack/simple.ex

@@ -6,6 +6,8 @@
 #
 #  0. You just DO WHAT THE FUCK YOU WANT TO.
 
+require Record
+
 defmodule Data.Stack.Simple do
   @moduledoc """
   A simple stack.
@@ -14,7 +16,7 @@ defmodule Data.Stack.Simple do
   @opaque t :: record
   @type   v :: any
 
-  defrecordp :stack, __MODULE__, list: []
+  Record.defrecordp :stack, __MODULE__, list: []
 
   @doc """
   Creates an empty stack.

mix.exs

@@ -4,7 +4,7 @@ defmodule Datastructures.Mixfile do
   def project do
     [ app: :datastructures,
       version: "0.0.1",
-      elixir: "~> 0.12.3",
+      elixir: "~> 1.0.0",
       deps: deps ]
   end