Skip to content
This repository was archived by the owner on Mar 22, 2026. It is now read-only.

Commit 57c8f17

Browse files
committed
test: promote new derive changes
1 parent eb757e5 commit 57c8f17

4 files changed

Lines changed: 2 additions & 10 deletions

File tree

derive/variants.t/run.t

Lines changed: 0 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -76,7 +76,6 @@ $ externally tagged variant
7676
unsafe_string = false;
7777
cookies = []
7878
}]
79-
[@@@warning "-37"]
8079
type rank =
8180
| Captain of {
8281
name: string ;
@@ -362,7 +361,6 @@ $ adjacently tagged variant
362361
unsafe_string = false;
363362
cookies = []
364363
}]
365-
[@@@warning "-37"]
366364
type rank =
367365
| Captain of {
368366
name: string ;

derive/variants.t/variant_adjacently_tagged_test.ml

Lines changed: 1 addition & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -1,11 +1,9 @@
1-
[@@@warning "-37"]
2-
31
type rank =
42
| Captain of { name : string; ship : string }
53
| Commander of string * int32 * float
64
| Lt of bool option
75
| Ensign
8-
[@@deriving serialize, deserialize] [@@serde {tag = "t"; content = "c"}]
6+
[@@deriving serialize, deserialize] [@@serde { tag = "t"; content = "c" }]
97

108
type ranks = Ranks of rank list [@@deriving serialize, deserialize]
119

derive/variants.t/variant_externally_tagged_test.ml

Lines changed: 0 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,5 +1,3 @@
1-
[@@@warning "-37"]
2-
31
type rank =
42
| Captain of { name : string; ship : string }
53
| Commander of string * int32 * float

derive/variants.t/variant_internally_tagged_test.ml

Lines changed: 1 addition & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -1,11 +1,9 @@
1-
[@@@warning "-37"]
2-
31
type rank =
42
| Captain of { name : string; ship : string }
53
| Commander of string * int32 * float
64
| Lt of bool option
75
| Ensign
8-
[@@deriving serialize, deserialize] [@@serde {tag = "t"}]
6+
[@@deriving serialize, deserialize] [@@serde { tag = "t" }]
97

108
type ranks = Ranks of rank list [@@deriving serialize, deserialize]
119

0 commit comments

Comments
 (0)