Skip to content

Commit 617d2e0

Browse files
committed
CR
1 parent b64fd14 commit 617d2e0

File tree

1 file changed

+2
-0
lines changed

1 file changed

+2
-0
lines changed

middle_end/flambda2/kinds/flambda_kind.ml

Lines changed: 2 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -839,6 +839,8 @@ module With_subkind = struct
839839
match Tag.Scannable.create tag with
840840
| Some tag ->
841841
let shape_and_fields : Block_shape.t * _ =
842+
(* CR mshinwell/vlaviron: In both of these cases it would be
843+
nice to propagate immediacy information. *)
842844
match (shape : Lambda.constructor_shape) with
843845
| Constructor_uniform fields ->
844846
Scannable Value_only, List.map from_lambda_value_kind fields

0 commit comments

Comments
 (0)