let get () = let b = get () in if b then deprecated "-slice-print" ~now:new_command (fun () -> ()) (); b