Add store javascript module to act as backing for agent

bryanjos · bryanjos · commit 8a3531fc40a6 · 2016-06-25T16:12:31.000-05:00
diff --git a/lib/elixir_script/prelude/agent.ex b/lib/elixir_script/prelude/agent.ex
@@ -1,45 +1,42 @@
 defmodule ElixirScript.Agent do
 
   def start(fun) do
-    pid = Elixir.Core.processes.spawn(fn() -> end)
-    Elixir.Core.processes.put(pid, "state", fun.());
+    pid = Elixir.Core.Functions.new_pid()
+    Elixir.Core.Store.create(pid, fun.())
     { :ok, pid }
   end
 
   def start(fun, options) do
-    pid = Elixir.Core.processes.spawn(fn() ->
-    end)
-
     pid = if Elixir.Keyword.has_key?(options, :name) do
-      Elixir.Core.processes.register(Elixir.Keyword.get(options, :name), pid)
+      Elixir.Keyword.get(options, :name)
     else
-      pid
+      Elixir.Core.Functions.new_pid()
     end
 
-    Elixir.Core.processes.put(pid, "state", fun.())
+    Elixir.Core.Store.create(pid, fun.())
     { :ok, pid }
   end
 
   def stop(agent) do
-    Elixir.Core.processes.exit(agent)
+    Elixir.Core.Store.remove(agent)
     :ok
   end
 
   def update(agent, fun) do
-    current_state = Elixir.Core.processes.get(agent, "state")
-    Elixir.Core.processes.put(agent, "state", fun.(current_state));
+    current_state = Elixir.Core.Store.read(agent)
+    Elixir.Core.Store.update(agent, fun.(current_state))
     :ok
   end
 
   def get(agent, fun) do
-    current_state = JS.global().processes.get(agent, "state")
+    current_state = Elixir.Core.Store.read(agent)
     fun.(current_state)
   end
 
   def get_and_update(agent, fun) do
-    current_state = Elixir.Core.processes.get(agent, "state")
+    current_state = Elixir.Core.Store.read(agent)
     {val, new_state} = fun.(current_state)
-    Elixir.Core.processes.put(agent, "state", new_state);
+    Elixir.Core.Store.update(agent, new_state)
     val
   end
 
diff --git a/src/javascript/lib/core.js b/src/javascript/lib/core.js
@@ -3,6 +3,7 @@ import Patterns from 'tailored';
 import ErlangTypes from 'erlang-types';
 import Functions from './core/functions';
 import SpecialForms from './core/special_forms';
+import Store from './core/store';
 
 let processes = new Processes.ProcessSystem();
 
@@ -19,5 +20,6 @@ export default {
   Integer,
   Float,
   Functions,
-  SpecialForms
+  SpecialForms,
+  Store
 };
diff --git a/src/javascript/lib/core/functions.js b/src/javascript/lib/core/functions.js
@@ -400,6 +400,10 @@ function maps_from_list(list){
   return Object.freeze(m);
 }
 
+function new_pid(){
+  return new Core.PID();
+}
+
 export default {
   call_property,
   run,
diff --git a/src/javascript/lib/core/store.js b/src/javascript/lib/core/store.js
@@ -0,0 +1,24 @@
+let store = new Map();
+
+function create(key, value){
+  store.set(key, value);
+}
+
+function update(key, value){
+  store.set(key, value);
+}
+
+function read(key){
+  return store.get(key);
+}
+
+function remove(key){
+  return store.delete(key);
+}
+
+export default {
+  create,
+  read,
+  update,
+  remove
+};
