package Gmface is pragma Pure (Gmface); type Work_Enum is (Gmface_Work, Gmidi_Work); type Plugin_Enum is (Null_Plugin, PC_List, CC_List, Step_Seq, Midi_Player); Version : constant String := "0.1.6"; Gmidi_Header : constant String := "MThd"; Gmface_Header : constant String := "GmFa"; end Gmface;