with Gtkada.Builder; use Gtkada.Builder; with generic_callbacks; with generic_package_widget; use generic_package_widget; with Gtk.Tree_Model; use Gtk.Tree_Model; with processor_interface; use processor_interface; with Glib; use Glib; with Glib.Object; use Glib.Object; with Glib.Values; use Glib.Values; with Tasks; use Tasks; with Task_Set; use Task_Set; package graphical_editor.tasks is Task_table_length : constant natural := 26; procedure Show_Tasks_Widget; procedure harmonize_comboxbox (Object : access Gtkada_Builder_Record'Class); procedure Initialize_Task(my_tab: in out table_widget_id ; Object : access Gtkada_Builder_Record'Class); procedure Check_Task(my_tab: in out table_widget_id ; Object : access Gtkada_Builder_Record'Class; Error_Message: in out Unbounded_String; Ok: in out Boolean); procedure Add_In_Sys_Task(my_tab: in out table_widget_id ; Object : access Gtkada_Builder_Record'Class); procedure Deleted_In_Sys_Task(my_tab: in out table_widget_id ; Object : access Gtkada_Builder_Record'Class); procedure Show_In_Sys_Task(my_tab: in out table_widget_id ; Object : access Gtkada_Builder_Record'Class); procedure Modify_In_Sys_Task(my_tab: in out table_widget_id ; Object : access Gtkada_Builder_Record'Class; name: unbounded_string); function get_compatible_task(mytasktype: Gvalue) return Tasks_Type; function get_compatible_task(mytask: String) return tasks_Type; function get_compatible_task(mytask: tasks_type) return unbounded_string; function get_compatible_policy(mypolicy: Gvalue) return Policies; function get_compatible_policy(mypolicy: String) return Policies; function get_compatible_policy(mypolicy: Policies) return unbounded_string; function get_compatible_predictable(mypredictable: boolean) return unbounded_string; function get_compatible_predictable(myppredictable: String) return boolean; function get_compatible_predictable(mypredictable: Gvalue) return boolean; end graphical_editor.tasks;