let create_check pl : toggle_button obj = Object.make "GtkCheckButton" pl