Package Name: java.applet.audioclip
with java.lang; use java.lang;
package java.applet.AudioClip is
-- NOTE: AudioClip is an "interface" type
type AudioClip_Obj is new Object with null record;
pragma Convention(Java_Interface, AudioClip_Obj);
type AudioClip_Ptr is access all AudioClip_Obj'Class;
procedure play(Obj : access AudioClip_Obj);
procedure loop_op(Obj : access AudioClip_Obj);
procedure stop(Obj : access AudioClip_Obj);
pragma Import(Java, stop);
pragma Import(Java, loop_op, "loop");
pragma Import(Java, play);
end java.applet.AudioClip;