[01;34mwith[m Gtk[31m.[mPaned[31m;[m                         [01;34muse[m Gtk[31m.[mPaned[31m;[m
[01;34mwith[m Gtk[31m.[mFrame[31m;[m                         [01;34muse[m Gtk[31m.[mFrame[31m;[m
[01;34mwith[m Gtk[31m.[mTree_Model[31m;[m                    [01;34muse[m Gtk[31m.[mTree_Model[31m;[m
[01;34mwith[m Gtk[31m.[mTree_View[31m;[m                     [01;34muse[m Gtk[31m.[mTree_View[31m;[m
[01;34mwith[m Gtk[31m.[mTree_Store[31m;[m                    [01;34muse[m Gtk[31m.[mTree_Store[31m;[m

[01;34mwith[m Gtk[31m.[mGentry [31m;[m                       [01;34muse[m Gtk[31m.[mGentry[31m;[m
[01;34mwith[m Gtk[31m.[mCheck_Button[31m;[m                  [01;34muse[m Gtk[31m.[mCheck_Button[31m;[m
[01;34mwith[m Gtk[31m.[mLabel[31m;[m                         [01;34muse[m Gtk[31m.[mLabel[31m;[m

[01;34mwith[m Gtk[31m.[mCombo_Box_Text[31m;[m                [01;34muse[m Gtk[31m.[mCombo_Box_Text[31m;[m
[01;34mwith[m Gtk[31m.[mButton[31m;[m                        [01;34muse[m Gtk[31m.[mButton[31m;[m
[01;34mwith[m Gtk[31m.[mSpin_Button[31m;[m                   [01;34muse[m Gtk[31m.[mSpin_Button[31m;[m

[01;34mwith[m Libsens[31m.[mProcessing[31m.[mMain[31m;[m           [01;34muse[m Libsens[31m.[mProcessing[31m.[mMain[31m;[m


[01;34mwith[m Glib[31m;[m
[01;34mwith[m Glib[31m.[mMain[31m;[m                         [01;34muse[m Glib[31m.[mMain[31m;[m
[01;34mwith[m GtkAda[31m.[mApplication[31m;[m                [01;34muse[m GtkAda[31m.[mApplication[31m;[m
[01;34mwith[m Gtk[31m.[mApplication_Window[31m;[m            [01;34muse[m Gtk[31m.[mApplication_Window[31m;[m
[01;34mwith[m Gtk[31m.[mWindow[31m;[m                        [01;34muse[m Gtk[31m.[mWindow[31m;[m
[01;34mwith[m Gtk[31m.[mBox[31m;[m                           [01;34muse[m Gtk[31m.[mBox[31m;[m
[01;34mwith[m System[31m.[mAddress_To_Access_Conversions[31m;[m
[01;34mwith[m Ada[31m.[mUnchecked_Deallocation[31m;[m

[01;34mwith[m Gtk[31m.[mAction_Group[31m;[m
[01;34mpragma[m [01;30mElaborate_All[m[31m([mGtk[31m.[mAction_Group[31m);[m
[01;34muse[m Gtk[31m.[mAction_Group[31m;[m

[01;34mwith[m Gtk[31m.[mUI_Manager[31m;[m                    [01;34muse[m Gtk[31m.[mUI_Manager[31m;[m



[01;34mwith[m Libsens[31m.[mVirtual[31m;[m                   [01;34muse[m Libsens[31m.[mVirtual[31m;[m
[01;34mwith[m Libsens[31m.[mVirtual[31m.[mWork_Class[31m;[m        [01;34muse[m Libsens[31m.[mVirtual[31m.[mWork_Class[31m;[m


[01;34mwith[m Libsens[31m.[mGtk_Plugins_Specifications[31m;[m[01;34muse[m Libsens[31m.[mGtk_Plugins_Specifications[31m;[m
[01;34mwith[m Libsens[31m.[mApplications[31m.[mMain[31m;[m         [01;34muse[m Libsens[31m.[mApplications[31m.[mMain[31m;[m

[01;34mpackage[m Libsens[31m.[mApplications[31m.[mGm_Interface [01;34mis[m
   [01;34mtype[m Gm_Interface_Record[31m;[m
         
   [01;34mtype[m Gm_Interface_Access [01;34mis[m [01;34maccess[m [01;34mall[m Gm_Interface_Record[31m;[m
   
   [01;34mtype[m Plugin_Page_Access [01;34mis[m [01;34maccess[m [01;34mall[m Plugin_Page_Type[31m;[m
   
   [01;34mtype[m Plugins_Pages_Set [01;34mis[m [01;34marray[m [31m([mPlugin_num'[01;34mrange[m[31m)[m [01;34mof[m Plugin_Page_Access[31m;[m
   
   
   [01;34mtype[m Plugin_Info_Record [01;34mis[m [01;34mtagged[m
      [01;34mrecord[m	 	 
	 
	 Id            [31m:[m Plugin_Num [31m:=[m [35m1[m[31m;[m
	 
	 Edit_Button   [31m:[m Gtk_Check_Button[31m;[m
	 Id_Label      [31m:[m Gtk_Label[31m;[m
	 
	 Mutted        [31m:[m Gtk_Check_Button[31m;[m
	 
	 Device_Id     [31m:[m Gtk_Combo_Box_Text[31m;[m
	 Device_Label  [31m:[m Gtk_Label[31m;[m
	 
	 Channel_Id    [31m:[m Gtk_Combo_Box_Text[31m;[m
	 Channel_Label [31m:[m Gtk_Label[31m;[m
	 
	 Form_Id       [31m:[m Gtk_Combo_Box_Text[31m;[m
	 Form_Label    [31m:[m Gtk_Label[31m;[m
	 
	 Cat_Id        [31m:[m Gtk_Combo_Box_Text[31m;[m
	 Cat_Label     [31m:[m Gtk_Label[31m;[m
	 
	 Info_Box      [31m:[m Gtk_Hbox[31m;[m
      [01;34mend[m [01;34mrecord[m[31m;[m
	 
	 
   [01;34mtype[m Plugin_Info_Access [01;34mis[m [01;34maccess[m [01;34mall[m Plugin_Info_Record[31m;[m
   
   [01;34mtype[m Plugin_Array [01;34mis[m [01;34marray[m [31m([mPlugin_Num'[01;34mRange[m[31m)[m [01;34mof[m Plugin_Info_Access[31m;[m
   
   
   [01;34mtype[m [01;30mWork_Window_Record[m [31m([mWork [31m:[m Work_Access[31m;[m			   
			    Work_Id [31m:[m Work_Num[31m;[m
			    Int     [31m:[m Gm_Interface_Access[31m)[m [01;34mis[m
      [01;34mrecord[m	 
	 Win                [31m:[m  Gtk_Window[31m;[m
	 Title              [31m:[m [01;34maccess[m [32mString[m[31m;[m	 
	 Main_Vbox          [31m:[m Gtk_Vbox[31m;[m	   
	 
	 
	 Menus_Hbox         [31m:[m Gtk_Hbox[31m;[m
	 
	 App_Action_Group   [31m:[m Gtk_Action_Group[31m;[m
	 App_UI             [31m:[m Gtk_UI_Manager[31m;[m
	 Win_Action_Group   [31m:[m Gtk_Action_Group[31m;[m
	 Win_UI             [31m:[m Gtk_UI_Manager[31m;[m
	 
	 
	 Process                     [31m:[m Work_Processing_Access[31m;[m
	 
	 Master_Frame                [31m:[m Gtk_Frame[31m;[m
	 Master_Box                  [31m:[m Gtk_Box[31m;[m
	 Signature                   [31m:[m Gtk_Entry[31m;[m
	 Tempo_Button                [31m:[m Gtk_Spin_Button[31m;[m
	 Track_length_Button         [31m:[m Gtk_Spin_Button[31m;[m
	 Played_Form                 [31m:[m Gtk_Combo_Box_Text[31m;[m
	 
	 Flow_Frame                  [31m:[m Gtk_Frame[31m;[m	 
	 Flow_Model                  [31m:[m Gtk_Tree_Store[31m;[m
	 Flow_Tree                   [31m:[m Gtk_Tree_View[31m;[m
	 Iter                        [31m:[m Gtk_Tree_Iter[31m;[m   
	 Line_Counter                [31m:[m Natural [31m:=[m [35m0[m[31m;[m
	 
	 Devices_Frame               [31m:[m Gtk_Frame[31m;[m
	 Devices_Model               [31m:[m Gtk_Tree_Store[31m;[m
	 Devices_Tree                [31m:[m Gtk_Tree_View[31m;[m
	 
	 Plugins_Frame               [31m:[m Gtk_Frame[31m;[m
	 Plugins_Model               [31m:[m Gtk_Tree_Store[31m;[m
	 Plugins_Tree                [31m:[m Gtk_Tree_View[31m;[m
	 Plugins_List                [31m:[m Plugin_Array[31m;[m
	 Plugins_Pages               [31m:[m Plugins_Pages_Set[31m;[m[31m-- := (others => new Plugin_Page_Type);[m
	 
	 Flow_Paned                  [31m:[m Gtk_Hpaned[31m;[m	 
	 
	 Main_Paned                  [31m:[m Gtk_Vpaned[31m;[m
	 
	 State_Frame                 [31m:[m Gtk_Frame[31m;[m
	 State_Box                   [31m:[m Gtk_Hbox[31m;[m	 	 
	 Media_Play                  [31m:[m Gtk_Button[31m;[m
	 Media_Stop                  [31m:[m Gtk_Button[31m;[m
	 In_Loop                     [31m:[m Gtk_Check_Button[31m;[m	 
	 Elapsed                     [31m:[m Gtk_Entry[31m;[m	 	 
	 Position                    [31m:[m Gtk_Entry[31m;[m
	 State_Vbox                  [31m:[m Gtk_Box[31m;[m
	 Tools_Box                   [31m:[m Gtk_Box[31m;[m            
	 State_Label                 [31m:[m Gtk_Label[31m;[m            
	 Modulation_Play_On          [31m:[m Gtk_Button[31m;[m
	 Modulation_Play_Off         [31m:[m Gtk_Button[31m;[m
	 Modulation_Record_On        [31m:[m Gtk_Button[31m;[m
	 Modulation_Record_Off       [31m:[m Gtk_Button[31m;[m            
	 Mod_Reset                   [31m:[m Gtk_Button[31m;[m
      	 
	 
	 Main_Hbox                   [31m:[m Gtk_Hbox[31m;[m	 
	 
	 	 
	 Flow_Control                [31m:[m Glib[31m.[mMain[31m.[mG_Source_Id [31m:=[m
	   Glib[31m.[mMain[31m.[mNo_Source_Id[31m;[m
	 State_Control               [31m:[m Glib[31m.[mMain[31m.[mG_Source_Id [31m:=[m
	   Glib[31m.[mMain[31m.[mNo_Source_Id[31m;[m
   
	 
      [01;34mend[m [01;34mrecord[m[31m;[m
   
   [01;34mpackage[m Work_Window_Conversions
   [01;34mis[m [01;34mnew[m System[31m.[mAddress_To_Access_Conversions
     [31m([mWork_Window_Record[31m);[m
   
   [01;34msubtype[m Work_Window_Pointer [01;34mis[m Work_Window_Conversions[31m.[mObject_Pointer[31m;[m
   
   [01;34mtype[m Work_Window_Array [01;34mis[m [01;34marray[m [31m([mWork_num [01;34mrange[m [31m<>)[m [01;34mof[m Work_Window_Pointer[31m;[m
   
   
   [01;34mtype[m Gm_Interface_Record [01;34mis[m [01;34mnew[m Virtual_MIDI_Composer [01;34mwith[m
      [01;34mrecord[m
	 App        [31m:[m GtkAda_Application[31m;[m
	 
	 Win        [31m:[m Gtk_Application_Window[31m;[m	 
	 Works_Win  [31m:[m [01;30mWork_Window_Array[m[31m([m[35m1[m[31m..[m[35m128[m[31m);[m
	 Win_Cur    [31m:[m Work_num [31m:=[m [35m1[m[31m;[m
	 Work_Last  [31m:[m natural [31m:=[m [35m0[m[31m;[m 
	 
	 Main_Automation  [31m:[m G_Source_Id[31m;[m
      [01;34mend[m [01;34mrecord[m[31m;[m
     
   [01;34mpackage[m GM_Interface_Conversions
   [01;34mis[m [01;34mnew[m System[31m.[mAddress_To_Access_Conversions
     [31m([mGm_Interface_Record[31m);[m
   
   [01;34msubtype[m Gm_Interface_Pointer
      [01;34mis[m GM_Interface_Conversions[31m.[mObject_Pointer[31m;[m
   
   [01;34mprocedure[m [01;30mInitialize[m[31m([mGm_Interface [31m:[m [01;34min[m [01;34mout[m Gm_Interface_Pointer[31m;[m
			State [31m:[m [01;34mout[m Glib[31m.[mGint[31m;[m
			Works [31m:[m [01;34maccess[m Work_Array[31m;[m
			Verbose[31m,[m Auto_Play[31m,[m In_Loop[31m,[m Help[31m,[m Ignore [31m:[m [01;34min[m [32mBoolean[m[31m);[m
   
[01;34mprivate[m   
   
   [01;34mprocedure[m Free [01;34mis[m [01;34mnew[m Ada[31m.[m[01;30mUnchecked_Deallocation[m[31m([mWork_Window_Record[31m,[m Work_Window_Pointer[31m);[m   
   
   [01;34mprocedure[m Free [01;34mis[m [01;34mnew[m Ada[31m.[m[01;30mUnchecked_Deallocation[m[31m([mGm_Interface_Record[31m,[m Gm_Interface_Pointer[31m);[m   
   
   GApplication_Id [31m:[m [01;34mconstant[m [32mString[m [31m:=[m [31m"libsens.applications.gm_interface"[m[31m;[m
   
   [01;34mpackage[m Main_Sources [01;34mis[m [01;34mnew[m Glib[31m.[mMain[31m.[m[01;30mGeneric_Sources[m[31m([mGm_Interface_Pointer[31m);[m
[01;34mend[m Libsens[31m.[mApplications[31m.[mGm_Interface[31m;[m
