Skip to content

Commit

Permalink
Remove unnecessary use of Obj.magic ()
Browse files Browse the repository at this point in the history
  • Loading branch information
polytypic committed Sep 14, 2024
1 parent fa36b3e commit 8acf2ea
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion lib/picos_aux.mpmcq/picos_aux_mpmcq.ml
Original file line number Diff line number Diff line change
Expand Up @@ -31,7 +31,7 @@ let create ?padded () =
Atomic.make (H (Head { counter = 1 })) |> Multicore_magic.copy_as ?padded
in
let tail =
Atomic.make (T (Tail { counter = 0; move = Obj.magic () }))
Atomic.make (T (Tail { counter = 0; move = Used }))
|> Multicore_magic.copy_as ?padded
in
Multicore_magic.copy_as ?padded { head; tail }
Expand Down

0 comments on commit 8acf2ea

Please sign in to comment.