Skip to content

Commit eab87cb

Browse files
committed
Add CR about packed structs
1 parent 3bebe26 commit eab87cb

File tree

1 file changed

+1
-0
lines changed

1 file changed

+1
-0
lines changed

ocaml/runtime/caml/mlvalues.h

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -249,6 +249,7 @@ CAMLextern value caml_get_public_method (value obj, value tag);
249249
The remaining bits are the field number for the first word of the
250250
environment, or, in other words, the offset (in words) from the closure
251251
to the environment part. */
252+
/* CR ncourant: it might be cleaner to use a packed struct here */
252253
#ifdef ARCH_SIXTYFOUR
253254
#define Arity_closinfo(info) ((intnat)(info) >> 56)
254255
#define Start_env_closinfo(info) (((uintnat)(info) << 9) >> 10)

0 commit comments

Comments
 (0)