Update to v1 versions of gleam_erlang and gleam_otp

Signed-off-by: Naomi Roberts <[e-mail]>

gleam.toml

···
 licences = ["MIT"]
 repository = { type = "github", user = "nootr", repo = "glimit" }
 target = "erlang"
-internal_modules = [
-  "glimit/*",
-]
+internal_modules = ["glimit/*"]
 
 [dependencies]
-gleam_stdlib = ">= 0.34.0 and < 2.0.0"
-gleam_erlang = ">= 0.25.0 and < 1.0.0"
-gleam_otp = ">= 0.11.2 and < 1.0.0"
+gleam_stdlib = ">= 0.62.0 and < 2.0.0"
+gleam_erlang = ">= 1.3.0 and < 2.0.0"
+gleam_otp = ">= 1.1.0 and < 2.0.0"
 
 [dev-dependencies]
 gleeunit = ">= 1.0.0 and < 2.0.0"

manifest.toml

···
 # You typically do not need to edit this file
 
 packages = [
-  { name = "gleam_erlang", version = "0.25.0", build_tools = ["gleam"], requirements = ["gleam_stdlib"], otp_app = "gleam_erlang", source = "hex", outer_checksum = "054D571A7092D2A9727B3E5D183B7507DAB0DA41556EC9133606F09C15497373" },
-  { name = "gleam_otp", version = "0.11.2", build_tools = ["gleam"], requirements = ["gleam_erlang", "gleam_stdlib"], otp_app = "gleam_otp", source = "hex", outer_checksum = "517FFB679E44AD71D059F3EF6A17BA6EFC8CB94FA174D52E22FB6768CF684D78" },
-  { name = "gleam_stdlib", version = "0.40.0", build_tools = ["gleam"], requirements = [], otp_app = "gleam_stdlib", source = "hex", outer_checksum = "86606B75A600BBD05E539EB59FABC6E307EEEA7B1E5865AFB6D980A93BCB2181" },
-  { name = "gleeunit", version = "1.2.0", build_tools = ["gleam"], requirements = ["gleam_stdlib"], otp_app = "gleeunit", source = "hex", outer_checksum = "F7A7228925D3EE7D0813C922E062BFD6D7E9310F0BEE585D3A42F3307E3CFD13" },
+  { name = "gleam_erlang", version = "1.3.0", build_tools = ["gleam"], requirements = ["gleam_stdlib"], otp_app = "gleam_erlang", source = "hex", outer_checksum = "1124AD3AA21143E5AF0FC5CF3D9529F6DB8CA03E43A55711B60B6B7B3874375C" },
+  { name = "gleam_otp", version = "1.1.0", build_tools = ["gleam"], requirements = ["gleam_erlang", "gleam_stdlib"], otp_app = "gleam_otp", source = "hex", outer_checksum = "7987CBEBC8060B88F14575DEF546253F3116EBE2A5DA6FD82F38243FCE97C54B" },
+  { name = "gleam_stdlib", version = "0.62.1", build_tools = ["gleam"], requirements = [], otp_app = "gleam_stdlib", source = "hex", outer_checksum = "0080706D3A5A9A36C40C68481D1D231D243AF602E6D2A2BE67BA8F8F4DFF45EC" },
+  { name = "gleeunit", version = "1.6.1", build_tools = ["gleam"], requirements = ["gleam_stdlib"], otp_app = "gleeunit", source = "hex", outer_checksum = "FDC68A8C492B1E9B429249062CD9BAC9B5538C6FBF584817205D0998C42E1DAC" },
 ]
 
 [requirements]
-gleam_erlang = { version = ">= 0.25.0 and < 1.0.0" }
-gleam_otp = { version = ">= 0.11.2 and < 1.0.0" }
-gleam_stdlib = { version = ">= 0.34.0 and < 2.0.0" }
+gleam_erlang = { version = ">= 1.3.0 and < 2.0.0" }
+gleam_otp = { version = ">= 1.1.0 and < 2.0.0" }
+gleam_stdlib = { version = ">= 0.62.0 and < 2.0.0" }
 gleeunit = { version = ">= 1.0.0 and < 2.0.0" }

src/glimit/rate_limiter.gleam

···
   SetNow(now: Int)
 }
 
-fn handle_message(message: Message, state: State) -> actor.Next(Message, State) {
+fn handle_message(state: State, message: Message) -> actor.Next(State, Message) {
   case message {
-    Shutdown -> actor.Stop(process.Normal)
+    Shutdown -> actor.stop()
 
     Hit(client) -> {
       let state = refill_bucket(state)
···
 pub fn new(
   max_token_count: Int,
   token_rate: Int,
-) -> Result(Subject(Message), Nil) {
+) -> Result(actor.Started(Subject(Message)), Nil) {
   let state =
     State(
       max_token_count: max_token_count,
···
       last_update: None,
       now: None,
     )
-  actor.start(state, handle_message)
-  |> result.nil_error
+  actor.start(
+    actor.new(state)
+    |> actor.on_message(handle_message),
+  )
+  |> result.replace_error(Nil)
 }
 
 /// Stop the rate limiter actor.
···
 /// Mark a hit on the rate limiter actor.
 ///
 pub fn hit(rate_limiter: Subject(Message)) -> Result(Nil, Nil) {
-  actor.call(rate_limiter, Hit, 10)
+  actor.call(rate_limiter, 10, Hit)
 }
 
 /// Returns True if the token bucket is full.
 ///
 pub fn has_full_bucket(rate_limiter: Subject(Message)) -> Bool {
-  actor.call(rate_limiter, HasFullBucket, 10)
+  actor.call(rate_limiter, 10, HasFullBucket)
 }
 
 /// Set the current time for testing purposes.

src/glimit/registry.gleam

···
 import gleam/list
 import gleam/option.{type Option, None, Some}
 import gleam/otp/actor
-import gleam/otp/task
 import gleam/result
 import glimit/rate_limiter
 
 pub type RateLimiterRegistryActor(id) =
-  Subject(Message(id))
+  actor.Started(Subject(Message(id)))
 
 /// The rate limiter registry state.
 ///
···
         state.max_token_count(identifier),
         state.token_rate(identifier),
       ))
-      Ok(rate_limiter)
+      Ok(rate_limiter.data)
     }
   }
 }
 
 fn handle_message(
-  message: Message(id),
   state: State(id),
-) -> actor.Next(Message(id), State(id)) {
+  message: Message(id),
+) -> actor.Next(State(id), Message(id)) {
   case message {
     GetOrCreate(identifier, client) -> {
       case handle_get_or_create(identifier, state) {
···
       registry: dict.new(),
     )
   use registry <- result.try(
-    actor.start(state, handle_message)
-    |> result.nil_error,
+    actor.start(
+      actor.new(state)
+      |> actor.on_message(handle_message),
+    )
+    |> result.replace_error(Nil),
   )
 
-  task.async(fn() { sweep(registry, Some(10)) })
+  process.spawn(fn() { sweep(registry, Some(10)) })
 
   Ok(registry)
 }
···
   registry: RateLimiterRegistryActor(id),
   identifier: id,
 ) -> Result(Subject(rate_limiter.Message), Nil) {
-  actor.call(registry, GetOrCreate(identifier, _), 10)
+  actor.call(registry.data, 10, GetOrCreate(identifier, _))
 }
 
 /// Return a list of rate limiters.
···
 pub fn get_all(
   registry: RateLimiterRegistryActor(id),
 ) -> List(#(id, Subject(rate_limiter.Message))) {
-  actor.call(registry, GetAll, 10)
+  actor.call(registry.data, 10, GetAll)
 }
 
 /// Remove a rate limiter from the registry.
···
   registry: RateLimiterRegistryActor(id),
   identifier: id,
 ) -> Result(Nil, Nil) {
-  actor.call(registry, Remove(identifier, _), 10)
+  actor.call(registry.data, 10, Remove(identifier, _))
   Ok(Nil)
 }
 

test/glimit_rate_limiter_test.gleam

···
 pub fn rate_limiter_test() {
   let assert Ok(limiter) = rate_limiter.new(2, 2)
 
-  limiter
+  limiter.data
   |> rate_limiter.hit
   |> should.be_ok
 
-  limiter
+  limiter.data
   |> rate_limiter.hit
   |> should.be_ok
 
-  limiter
+  limiter.data
   |> rate_limiter.hit
   |> should.be_error
 }