From 51e34262028b306c80fa17314c882d572969ae36 Mon Sep 17 00:00:00 2001
From: Helmut Merz <helmutm@cy55.de>
Date: Sun, 19 Apr 2026 08:25:51 +0200
Subject: [PATCH] initial import

---
 .formatter.exs       |  4 ++++
 .gitignore           | 23 +++++++++++++++++++++++
 README.md            | 21 +++++++++++++++++++++
 lib/actor.ex         | 28 ++++++++++++++++++++++++++++
 lib/xplore.ex        | 18 ++++++++++++++++++
 mix.exs              | 28 ++++++++++++++++++++++++++++
 test/test_helper.exs |  1 +
 test/xplore_test.exs | 24 ++++++++++++++++++++++++
 8 files changed, 147 insertions(+)
 create mode 100644 .formatter.exs
 create mode 100644 .gitignore
 create mode 100644 README.md
 create mode 100644 lib/actor.ex
 create mode 100644 lib/xplore.ex
 create mode 100644 mix.exs
 create mode 100644 test/test_helper.exs
 create mode 100644 test/xplore_test.exs

diff --git a/.formatter.exs b/.formatter.exs
new file mode 100644
index 0000000..d2cda26
--- /dev/null
+++ b/.formatter.exs
@@ -0,0 +1,4 @@
+# Used by "mix format"
+[
+  inputs: ["{mix,.formatter}.exs", "{config,lib,test}/**/*.{ex,exs}"]
+]
diff --git a/.gitignore b/.gitignore
new file mode 100644
index 0000000..54d4b53
--- /dev/null
+++ b/.gitignore
@@ -0,0 +1,23 @@
+# The directory Mix will write compiled artifacts to.
+/_build/
+
+# If you run "mix test --cover", coverage assets end up here.
+/cover/
+
+# The directory Mix downloads your dependencies sources to.
+/deps/
+
+# Where third-party dependencies like ExDoc output generated docs.
+/doc/
+
+# If the VM crashes, it generates a dump, let's ignore it too.
+erl_crash.dump
+
+# Also ignore archive artifacts (built via "mix archive.build").
+*.ez
+
+# Ignore package tarball (built via "mix hex.build").
+xplore-*.tar
+
+# Temporary files, for example, from tests.
+/tmp/
diff --git a/README.md b/README.md
new file mode 100644
index 0000000..7a99864
--- /dev/null
+++ b/README.md
@@ -0,0 +1,21 @@
+# Xplore
+
+**TODO: Add description**
+
+## Installation
+
+If [available in Hex](https://hex.pm/docs/publish), the package can be installed
+by adding `xplore` to your list of dependencies in `mix.exs`:
+
+```elixir
+def deps do
+  [
+    {:xplore, "~> 0.1.0"}
+  ]
+end
+```
+
+Documentation can be generated with [ExDoc](https://github.com/elixir-lang/ex_doc)
+and published on [HexDocs](https://hexdocs.pm). Once published, the docs can
+be found at <https://hexdocs.pm/xplore>.
+
diff --git a/lib/actor.ex b/lib/actor.ex
new file mode 100644
index 0000000..f284cde
--- /dev/null
+++ b/lib/actor.ex
@@ -0,0 +1,28 @@
+defmodule Xplore.Actor do
+
+  def loop(bhv) do
+    receive do
+      {:message, msg} -> 
+        bhv.(msg)
+        loop(bhv)
+      {:system, :become, bhv_n} -> loop(bhv_n)
+      {:system, :quit} -> :quit
+    end
+  end
+
+  def create(bhv) do 
+    spawn_link(fn -> loop(bhv) end)
+  end
+
+  def send_message(ac, msg) do
+    send(ac, {:message, msg})
+  end
+
+  def become(ac, bhv) do
+    send(ac, {:system, :become, bhv})
+  end
+
+  def stop(ac) do
+    send(ac, {:system, :quit})
+  end
+end
diff --git a/lib/xplore.ex b/lib/xplore.ex
new file mode 100644
index 0000000..dc54775
--- /dev/null
+++ b/lib/xplore.ex
@@ -0,0 +1,18 @@
+defmodule Xplore do
+  @moduledoc """
+  Documentation for `Xplore`.
+  """
+
+  @doc """
+  Hello world.
+
+  ## Examples
+
+      iex> Xplore.hello()
+      :world
+
+  """
+  def hello do
+    :world
+  end
+end
diff --git a/mix.exs b/mix.exs
new file mode 100644
index 0000000..d4dc8f7
--- /dev/null
+++ b/mix.exs
@@ -0,0 +1,28 @@
+defmodule Xplore.MixProject do
+  use Mix.Project
+
+  def project do
+    [
+      app: :xplore,
+      version: "0.1.0",
+      elixir: "~> 1.18",
+      start_permanent: Mix.env() == :prod,
+      deps: deps()
+    ]
+  end
+
+  # Run "mix help compile.app" to learn about applications.
+  def application do
+    [
+      extra_applications: [:logger]
+    ]
+  end
+
+  # Run "mix help deps" to learn about dependencies.
+  defp deps do
+    [
+      # {:dep_from_hexpm, "~> 0.3.0"},
+      # {:dep_from_git, git: "https://github.com/elixir-lang/my_dep.git", tag: "0.1.0"}
+    ]
+  end
+end
diff --git a/test/test_helper.exs b/test/test_helper.exs
new file mode 100644
index 0000000..869559e
--- /dev/null
+++ b/test/test_helper.exs
@@ -0,0 +1 @@
+ExUnit.start()
diff --git a/test/xplore_test.exs b/test/xplore_test.exs
new file mode 100644
index 0000000..8c472c4
--- /dev/null
+++ b/test/xplore_test.exs
@@ -0,0 +1,24 @@
+defmodule XploreTest do
+  use ExUnit.Case
+  doctest Xplore
+
+  alias Xplore.Actor
+
+  test "greets the world" do
+    assert Xplore.hello() == :world
+  end
+
+  describe "some simple actors" do
+    test "basic actor live cycle" do
+      this = self()
+      ac = Actor.create(fn msg -> send(this, msg) end)
+      Actor.send_message(ac, "Hello Actor!")
+      Actor.become(ac, fn _msg -> send(this, "Goodbye") end)
+      Actor.send_message(ac, "Hello Actor!")
+      Actor.stop(ac)
+      assert_receive "Hello Actor!"
+      assert_receive "Goodbye"
+    end
+  end
+end
+