cleanup

1 files changed, 28 insertions, 0 deletions

diff --git a/aoc2023/build/packages/gleam_otp/src/gleam_otp.erl b/aoc2023/build/packages/gleam_otp/src/gleam_otp.erl
new file mode 100644
index 0000000..9381ad2
--- /dev/null
+++ b/aoc2023/build/packages/gleam_otp/src/gleam_otp.erl
@@ -0,0 +1,28 @@
+-module(gleam_otp).
+-compile([no_auto_import, nowarn_unused_vars, nowarn_unused_function]).
+
+-export([main/0]).
+
+-spec spawn_task(integer()) -> gleam@otp@task:task(nil).
+spawn_task(I) ->
+    gleam@otp@task:async(fun() -> case (I rem 500) =:= 0 of
+                true ->
+                    gleam@io:println(
+                        <<"Hello from "/utf8, (gleam@int:to_string(I))/binary>>
+                    );
+
+                false ->
+                    nil
+            end end).
+
+-spec main() -> integer().
+main() ->
+    gleam@io:debug(
+        gleam_otp_test_external:get_message_queue_length(erlang:self())
+    ),
+    _pipe = gleam@list:range(0, 1000000),
+    _pipe@1 = gleam@list:map(_pipe, fun spawn_task/1),
+    gleam@list:each(_pipe@1, fun gleam@otp@task:await_forever/1),
+    gleam@io:debug(
+        gleam_otp_test_external:get_message_queue_length(erlang:self())
+    ).