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; package graphical_editor.processors is processor_table_length : constant natural :=9; procedure Show_Processor_Widget; procedure Initialize_Processor(my_tab: in out table_widget_id ; Object : access Gtkada_Builder_Record'Class); procedure Check_Processor(my_tab: in out table_widget_id ; Object : access Gtkada_Builder_Record'Class; Error_Message: in out Unbounded_String; Ok: in out Boolean); function get_compatible_migration(my_migration_string: String) return migrations_Type; function get_compatible_processor(my_processor_string: String) return processors_Type; procedure Add_In_Sys_Processor(my_tab: in out table_widget_id ; Object : access Gtkada_Builder_Record'Class); procedure Show_In_Sys_Processor(my_tab: in out table_widget_id ; Object : access Gtkada_Builder_Record'Class); procedure Deleted_In_Sys_Processor(my_tab: in out table_widget_id ; Object : access Gtkada_Builder_Record'Class); procedure Modify_In_Sys_Processor(my_tab: in out table_widget_id ; Object : access Gtkada_Builder_Record'Class; name: unbounded_string); procedure Add_View_Core (Object : access Gtkada_Builder_Record'Class); procedure Show_Lign_Core (Object : access Gtkada_Builder_Record'Class); function get_compatible_processor(my_processor: Processors_type) return unbounded_string; function get_compatible_migration(mymigration: migrations_type) return unbounded_string; function get_compatible_processor(myprocessor: GValue) return processors_type; function get_compatible_migration(mymigration: GValue) return migrations_type; end graphical_editor.processors;