Skip to content

Commit c95688c

Browse files
authored
Update native_toplevel/opttoploop.ml
1 parent 3526a8f commit c95688c

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

native_toplevel/opttoploop.ml

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -122,7 +122,7 @@ let close_phrase lam =
122122
[Lprim (Pgetglobal glb, [], Loc_unknown)],
123123
Loc_unknown)
124124
in
125-
Llet(Strict, Lambda.layout_top, id, glob, l)
125+
Llet(Strict, Lambda.layout_module_field, id, glob, l)
126126
) (free_variables lam) lam
127127

128128
let toplevel_value id =

0 commit comments

Comments
 (0)