Source position: ctglut.pp line 550
type TglutMenuDestroyFunc = procedure(
callback: TGlutVoidCallback
);