Skip to content

Commit 3d6f0fa

Browse files
Merge pull request #971 from Sudha247/domainslib.0.5.0
Lwt_domain: update to domainslib.0.5.0
2 parents 5907991 + f79d25f commit 3d6f0fa

File tree

5 files changed

+6
-12
lines changed

5 files changed

+6
-12
lines changed

.github/workflows/workflow.yml

Lines changed: 0 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -42,12 +42,6 @@ jobs:
4242
local-packages: |
4343
*.opam
4444
!lwt_domain.opam
45-
- os: ubuntu-latest
46-
ocaml-compiler: ocaml-variants.4.12.0+domains
47-
libev: false
48-
ppx: true
49-
domain: true
50-
local-packages: "*.opam"
5145
- os: macos-latest
5246
ocaml-compiler: 4.14.x
5347
libev: true

lwt_domain.opam

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -20,7 +20,7 @@ depends: [
2020
"dune" {>= "1.8.0"}
2121
"lwt" {>= "3.0.0"}
2222
"ocaml" {>= "4.08"}
23-
"domainslib" {>= "0.3.2"}
23+
"domainslib" {>= "0.5.0"}
2424
"base-domains"
2525
]
2626

src/domain/lwt_domain.ml

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -5,8 +5,8 @@ module T = Domainslib.Task
55

66
type pool = Domainslib.Task.pool
77

8-
let setup_pool ?name num_additional_domains =
9-
T.setup_pool ?name ~num_additional_domains ()
8+
let setup_pool ?name num_domains =
9+
T.setup_pool ?name ~num_domains ()
1010

1111
let teardown_pool = T.teardown_pool
1212

src/domain/lwt_domain.mli

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -56,8 +56,8 @@
5656
is recommended to use this function sparingly. *)
5757

5858
val setup_pool : ?name:string -> int -> pool
59-
(** [setup_pool name num_additional_domains] returns a task pool with
60-
[num_additional_domains] domains including the current domain.
59+
(** [setup_pool name num_domains] returns a task pool with
60+
[num_domains] new domains.
6161
6262
It is recommended to use this function to create a pool once before
6363
calling [Lwt_main.run] and to not call it again afterwards. To resize the

test/domain/test_lwt_domain.ml

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -56,7 +56,7 @@ let lwt_domain_test = [
5656
(fun _ -> Lwt.return_false)
5757
(fun exn ->
5858
Lwt.return (exn = Invalid_argument
59-
"Task.setup_pool: num_additional_domains must be at least 0"))
59+
"Task.setup_pool: num_domains must be at least 0"))
6060
end;
6161
test "detach_exception" begin fun () ->
6262
let pool = Option.get (Lwt_domain.lookup_pool "pool_1") in

0 commit comments

Comments
 (0)