Update to OCaml 5.4.1

Author: kayceesrk

.github/workflows/ci.yml

@@ -15,7 +15,7 @@ jobs:
           - ubuntu-latest
           - macos-latest
         ocaml-compiler:
-          - ocaml-variants.5.3.0+trunk
+          - "5.4.1"
 
     runs-on: ${{ matrix.os }}
 

README.md

@@ -41,9 +41,9 @@ The original implementation of Multicore OCaml allowed a user to `Obj.clone_cont
 To run the examples with OCaml, be sure to install [Opam with these instructions](https://opam.ocaml.org/doc/Install.html). These examples use the new effect syntax introduced with OCaml 5.3 and onwards. If you wish to see the examples which used the underlying effect functions directly, please checkout the `5.1.1` tag of this repository instead.
 
 ```bash
-# After cloning this repository, create a 5.3 switch
+# After cloning this repository, create a 5.4.1 switch
 opam update
-opam switch create 5.3.0+trunk
+opam switch create 5.4.1
 opam install . --deps-only
 ```
 

sched.ml

@@ -4,12 +4,15 @@ type _ eff += Yield : unit eff
 let fork f = Effect.perform (Fork f)
 let yield () = Effect.perform Yield
 
-(* A concurrent round-robin scheduler *)
+(* A concurrent round-robin scheduler using
+ * effect handlers *)
 let run main =
   let run_q = Queue.create () in
   let enqueue k = Queue.push k run_q in
   let dequeue () =
-    if Queue.is_empty run_q then () else Effect.Deep.continue (Queue.pop run_q) ()
+    if Queue.is_empty run_q
+    then ()
+    else Effect.Deep.continue (Queue.pop run_q) ()
   in
   let rec spawn f =
     (* Effect handler => instantiates fiber *)