{-# LANGUAGE FlexibleContexts, FlexibleInstances, ForeignFunctionInterface, MonoLocalBinds, MultiParamTypeClasses, ScopedTypeVariables, TypeSynonymInstances, UndecidableInstances #-}
---------- GENERATED FILE, EDITS WILL BE LOST ----------

module Graphics.UI.Qtah.Generated.Widgets.QMenu (
  castQMenuToQWidget,
  castQWidgetToQMenu,
  castQMenuToQObject,
  castQObjectToQMenu,
  QMenuValue (..),
  QMenuConstPtr (..),
  actionAt,
  actionGeometry,
  activeAction,
  defaultAction,
  icon,
  isEmpty,
  isTearOffMenuVisible,
  menuAction,
  separatorsCollapsible,
  isTearOffEnabled,
  title,
  QMenuPtr (..),
  setActiveAction,
  addAction,
  addNewAction,
  addNewActionWithIcon,
  addMenu,
  addNewMenu,
  addNewMenuWithIcon,
  addSection,
  addSectionWithIcon,
  addSeparator,
  clear,
  setDefaultAction,
  exec,
  execAt,
  hideTearOffMenu,
  setIcon,
  insertMenu,
  insertSection,
  insertSectionWithIcon,
  insertSeparator,
  popup,
  popupAction,
  setSeparatorsCollapsible,
  setTearOffEnabled,
  setTitle,
  emitAboutToHide,
  emitAboutToShow,
  emitHovered,
  emitTriggered,
  QMenuConst (..),
  castQMenuToConst,
  QMenu (..),
  castQMenuToNonconst,
  new,
  newWithParent,
  newWithTitle,
  newWithTitleAndParent,
  QMenuSuper (..),
  QMenuSuperConst (..),
  ) where

import qualified Foreign as HoppyF
import qualified Foreign.C as HoppyFC
import qualified Foreign.Hoppy.Runtime as HoppyFHR
import qualified Graphics.UI.Qtah.Core.HRect as HRect
import qualified Graphics.UI.Qtah.Generated.Core.QObject as M94
import qualified Graphics.UI.Qtah.Generated.Core.QPoint as M114
import qualified Graphics.UI.Qtah.Generated.Core.QRect as M122
import qualified Graphics.UI.Qtah.Generated.Core.QString as M142
import {-# SOURCE #-} qualified Graphics.UI.Qtah.Generated.Gui.QIcon as M288
import {-# SOURCE #-} qualified Graphics.UI.Qtah.Generated.Widgets.QAction as M368
import {-# SOURCE #-} qualified Graphics.UI.Qtah.Generated.Widgets.QWidget as M506
import Prelude (($), (.), (/=), (=<<), (==), (>>=))
import qualified Prelude as HoppyP
import qualified Prelude as QtahP

foreign import ccall "genpop__QMenu_new" new' ::  HoppyP.IO (HoppyF.Ptr QMenu)
foreign import ccall "genpop__QMenu_newWithParent" newWithParent' ::  HoppyF.Ptr M506.QWidget -> HoppyP.IO (HoppyF.Ptr QMenu)
foreign import ccall "genpop__QMenu_newWithTitle" newWithTitle' ::  HoppyF.Ptr M142.QStringConst -> HoppyP.IO (HoppyF.Ptr QMenu)
foreign import ccall "genpop__QMenu_newWithTitleAndParent" newWithTitleAndParent' ::  HoppyF.Ptr M142.QStringConst -> HoppyF.Ptr M506.QWidget -> HoppyP.IO (HoppyF.Ptr QMenu)
foreign import ccall "genpop__QMenu_actionAt" actionAt' ::  HoppyF.Ptr QMenuConst -> HoppyF.Ptr M114.QPointConst -> HoppyP.IO (HoppyF.Ptr M368.QAction)
foreign import ccall "genpop__QMenu_actionGeometry" actionGeometry' ::  HoppyF.Ptr QMenuConst -> HoppyF.Ptr M368.QAction -> HoppyP.IO (HoppyF.Ptr M122.QRectConst)
foreign import ccall "genpop__QMenu_activeAction" activeAction' ::  HoppyF.Ptr QMenuConst -> HoppyP.IO (HoppyF.Ptr M368.QAction)
foreign import ccall "genpop__QMenu_setActiveAction" setActiveAction' ::  HoppyF.Ptr QMenu -> HoppyF.Ptr M368.QAction -> HoppyP.IO ()
foreign import ccall "genpop__QMenu_addAction" addAction' ::  HoppyF.Ptr QMenu -> HoppyF.Ptr M368.QAction -> HoppyP.IO ()
foreign import ccall "genpop__QMenu_addNewAction" addNewAction' ::  HoppyF.Ptr QMenu -> HoppyF.Ptr M142.QStringConst -> HoppyP.IO (HoppyF.Ptr M368.QAction)
foreign import ccall "genpop__QMenu_addNewActionWithIcon" addNewActionWithIcon' ::  HoppyF.Ptr QMenu -> HoppyF.Ptr M288.QIconConst -> HoppyF.Ptr M142.QStringConst -> HoppyP.IO (HoppyF.Ptr M368.QAction)
foreign import ccall "genpop__QMenu_addMenu" addMenu' ::  HoppyF.Ptr QMenu -> HoppyF.Ptr QMenu -> HoppyP.IO (HoppyF.Ptr M368.QAction)
foreign import ccall "genpop__QMenu_addNewMenu" addNewMenu' ::  HoppyF.Ptr QMenu -> HoppyF.Ptr M142.QStringConst -> HoppyP.IO (HoppyF.Ptr QMenu)
foreign import ccall "genpop__QMenu_addNewMenuWithIcon" addNewMenuWithIcon' ::  HoppyF.Ptr QMenu -> HoppyF.Ptr M288.QIconConst -> HoppyF.Ptr M142.QStringConst -> HoppyP.IO (HoppyF.Ptr QMenu)
foreign import ccall "genpop__QMenu_addSection" addSection' ::  HoppyF.Ptr QMenu -> HoppyF.Ptr M142.QStringConst -> HoppyP.IO (HoppyF.Ptr M368.QAction)
foreign import ccall "genpop__QMenu_addSectionWithIcon" addSectionWithIcon' ::  HoppyF.Ptr QMenu -> HoppyF.Ptr M288.QIconConst -> HoppyF.Ptr M142.QStringConst -> HoppyP.IO (HoppyF.Ptr M368.QAction)
foreign import ccall "genpop__QMenu_addSeparator" addSeparator' ::  HoppyF.Ptr QMenu -> HoppyP.IO (HoppyF.Ptr M368.QAction)
foreign import ccall "genpop__QMenu_clear" clear' ::  HoppyF.Ptr QMenu -> HoppyP.IO ()
foreign import ccall "genpop__QMenu_defaultAction" defaultAction' ::  HoppyF.Ptr QMenuConst -> HoppyP.IO (HoppyF.Ptr M368.QAction)
foreign import ccall "genpop__QMenu_setDefaultAction" setDefaultAction' ::  HoppyF.Ptr QMenu -> HoppyF.Ptr M368.QAction -> HoppyP.IO ()
foreign import ccall "genpop__QMenu_exec" exec' ::  HoppyF.Ptr QMenu -> HoppyP.IO (HoppyF.Ptr M368.QAction)
foreign import ccall "genpop__QMenu_execAt" execAt' ::  HoppyF.Ptr QMenu -> HoppyF.Ptr M114.QPointConst -> HoppyF.Ptr M368.QAction -> HoppyP.IO (HoppyF.Ptr M368.QAction)
foreign import ccall "genpop__QMenu_hideTearOffMenu" hideTearOffMenu' ::  HoppyF.Ptr QMenu -> HoppyP.IO ()
foreign import ccall "genpop__QMenu_icon" icon' ::  HoppyF.Ptr QMenuConst -> HoppyP.IO (HoppyF.Ptr M288.QIconConst)
foreign import ccall "genpop__QMenu_setIcon" setIcon' ::  HoppyF.Ptr QMenu -> HoppyF.Ptr M288.QIconConst -> HoppyP.IO ()
foreign import ccall "genpop__QMenu_insertMenu" insertMenu' ::  HoppyF.Ptr QMenu -> HoppyF.Ptr M368.QAction -> HoppyF.Ptr QMenu -> HoppyP.IO (HoppyF.Ptr M368.QAction)
foreign import ccall "genpop__QMenu_insertSection" insertSection' ::  HoppyF.Ptr QMenu -> HoppyF.Ptr M368.QAction -> HoppyF.Ptr M142.QStringConst -> HoppyP.IO (HoppyF.Ptr M368.QAction)
foreign import ccall "genpop__QMenu_insertSectionWithIcon" insertSectionWithIcon' ::  HoppyF.Ptr QMenu -> HoppyF.Ptr M368.QAction -> HoppyF.Ptr M288.QIconConst -> HoppyF.Ptr M142.QStringConst -> HoppyP.IO (HoppyF.Ptr M368.QAction)
foreign import ccall "genpop__QMenu_insertSeparator" insertSeparator' ::  HoppyF.Ptr QMenu -> HoppyF.Ptr M368.QAction -> HoppyP.IO (HoppyF.Ptr M368.QAction)
foreign import ccall "genpop__QMenu_isEmpty" isEmpty' ::  HoppyF.Ptr QMenuConst -> HoppyP.IO HoppyFC.CBool
foreign import ccall "genpop__QMenu_isTearOffMenuVisible" isTearOffMenuVisible' ::  HoppyF.Ptr QMenuConst -> HoppyP.IO HoppyFC.CBool
foreign import ccall "genpop__QMenu_menuAction" menuAction' ::  HoppyF.Ptr QMenuConst -> HoppyP.IO (HoppyF.Ptr M368.QAction)
foreign import ccall "genpop__QMenu_popup" popup' ::  HoppyF.Ptr QMenu -> HoppyF.Ptr M114.QPointConst -> HoppyP.IO ()
foreign import ccall "genpop__QMenu_popupAction" popupAction' ::  HoppyF.Ptr QMenu -> HoppyF.Ptr M114.QPointConst -> HoppyF.Ptr M368.QAction -> HoppyP.IO ()
foreign import ccall "genpop__QMenu_separatorsCollapsible" separatorsCollapsible' ::  HoppyF.Ptr QMenuConst -> HoppyP.IO HoppyFC.CBool
foreign import ccall "genpop__QMenu_setSeparatorsCollapsible" setSeparatorsCollapsible' ::  HoppyF.Ptr QMenu -> HoppyFC.CBool -> HoppyP.IO ()
foreign import ccall "genpop__QMenu_isTearOffEnabled" isTearOffEnabled' ::  HoppyF.Ptr QMenuConst -> HoppyP.IO HoppyFC.CBool
foreign import ccall "genpop__QMenu_setTearOffEnabled" setTearOffEnabled' ::  HoppyF.Ptr QMenu -> HoppyFC.CBool -> HoppyP.IO ()
foreign import ccall "genpop__QMenu_title" title' ::  HoppyF.Ptr QMenuConst -> HoppyP.IO (HoppyF.Ptr M142.QStringConst)
foreign import ccall "genpop__QMenu_setTitle" setTitle' ::  HoppyF.Ptr QMenu -> HoppyF.Ptr M142.QStringConst -> HoppyP.IO ()
foreign import ccall "genpop__QMenu_emitAboutToHide" emitAboutToHide' ::  HoppyF.Ptr QMenu -> HoppyP.IO ()
foreign import ccall "genpop__QMenu_emitAboutToShow" emitAboutToShow' ::  HoppyF.Ptr QMenu -> HoppyP.IO ()
foreign import ccall "genpop__QMenu_emitHovered" emitHovered' ::  HoppyF.Ptr QMenu -> HoppyF.Ptr M368.QAction -> HoppyP.IO ()
foreign import ccall "genpop__QMenu_emitTriggered" emitTriggered' ::  HoppyF.Ptr QMenu -> HoppyF.Ptr M368.QAction -> HoppyP.IO ()
foreign import ccall "gencast__QMenu__QWidget" castQMenuToQWidget :: HoppyF.Ptr QMenuConst -> HoppyF.Ptr M506.QWidgetConst
foreign import ccall "gencast__QWidget__QMenu" castQWidgetToQMenu :: HoppyF.Ptr M506.QWidgetConst -> HoppyF.Ptr QMenuConst
foreign import ccall "gencast__QMenu__QObject" castQMenuToQObject :: HoppyF.Ptr QMenuConst -> HoppyF.Ptr M94.QObjectConst
foreign import ccall "gencast__QObject__QMenu" castQObjectToQMenu :: HoppyF.Ptr M94.QObjectConst -> HoppyF.Ptr QMenuConst
foreign import ccall "gendel__QMenu" delete'QMenu :: HoppyF.Ptr QMenuConst -> HoppyP.IO ()
foreign import ccall "&gendel__QMenu" deletePtr'QMenu :: HoppyF.FunPtr (HoppyF.Ptr QMenuConst -> HoppyP.IO ())

class QMenuValue a where
  withQMenuPtr :: a -> (QMenuConst -> HoppyP.IO b) -> HoppyP.IO b

instance {-# OVERLAPPABLE #-} QMenuConstPtr a => QMenuValue a where
  withQMenuPtr = HoppyP.flip ($) . toQMenuConst

class (M506.QWidgetConstPtr this) => QMenuConstPtr this where
  toQMenuConst :: this -> QMenuConst

actionAt :: (QMenuValue this, M114.QPointValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO M368.QAction)
actionAt arg'1 arg'2 =
  withQMenuPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
  M114.withQPointPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
  HoppyP.fmap M368.QAction
  (actionAt' arg'1' arg'2')

actionGeometry :: (QMenuValue this, M368.QActionPtr arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO HRect.HRect)
actionGeometry arg'1 arg'2 =
  withQMenuPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
  HoppyFHR.withCppPtr (M368.toQAction arg'2) $ \arg'2' ->
  (HoppyFHR.decodeAndDelete . M122.QRectConst) =<<
  (actionGeometry' arg'1' arg'2')

activeAction :: (QMenuValue this) => (this) {- ^ this -} -> (HoppyP.IO M368.QAction)
activeAction arg'1 =
  withQMenuPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
  HoppyP.fmap M368.QAction
  (activeAction' arg'1')

defaultAction :: (QMenuValue this) => (this) {- ^ this -} -> (HoppyP.IO M368.QAction)
defaultAction arg'1 =
  withQMenuPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
  HoppyP.fmap M368.QAction
  (defaultAction' arg'1')

icon :: (QMenuValue this) => (this) {- ^ this -} -> (HoppyP.IO M288.QIcon)
icon arg'1 =
  withQMenuPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
  (HoppyFHR.decodeAndDelete . M288.QIconConst) =<<
  (icon' arg'1')

isEmpty :: (QMenuValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Bool)
isEmpty arg'1 =
  withQMenuPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
  (
    (HoppyP.return . (/= 0))
  ) =<<
  (isEmpty' arg'1')

isTearOffMenuVisible :: (QMenuValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Bool)
isTearOffMenuVisible arg'1 =
  withQMenuPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
  (
    (HoppyP.return . (/= 0))
  ) =<<
  (isTearOffMenuVisible' arg'1')

menuAction :: (QMenuValue this) => (this) {- ^ this -} -> (HoppyP.IO M368.QAction)
menuAction arg'1 =
  withQMenuPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
  HoppyP.fmap M368.QAction
  (menuAction' arg'1')

separatorsCollapsible :: (QMenuValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Bool)
separatorsCollapsible arg'1 =
  withQMenuPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
  (
    (HoppyP.return . (/= 0))
  ) =<<
  (separatorsCollapsible' arg'1')

isTearOffEnabled :: (QMenuValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Bool)
isTearOffEnabled arg'1 =
  withQMenuPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
  (
    (HoppyP.return . (/= 0))
  ) =<<
  (isTearOffEnabled' arg'1')

title :: (QMenuValue this) => (this) {- ^ this -} -> (HoppyP.IO QtahP.String)
title arg'1 =
  withQMenuPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
  (HoppyFHR.decodeAndDelete . M142.QStringConst) =<<
  (title' arg'1')

class (QMenuConstPtr this, M506.QWidgetPtr this) => QMenuPtr this where
  toQMenu :: this -> QMenu

setActiveAction :: (QMenuPtr this, M368.QActionPtr arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO ())
setActiveAction arg'1 arg'2 =
  HoppyFHR.withCppPtr (toQMenu arg'1) $ \arg'1' ->
  HoppyFHR.withCppPtr (M368.toQAction arg'2) $ \arg'2' ->
  (setActiveAction' arg'1' arg'2')

addAction :: (QMenuPtr this, M368.QActionPtr arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO ())
addAction arg'1 arg'2 =
  HoppyFHR.withCppPtr (toQMenu arg'1) $ \arg'1' ->
  HoppyFHR.withCppPtr (M368.toQAction arg'2) $ \arg'2' ->
  (addAction' arg'1' arg'2')

addNewAction :: (QMenuPtr this, M142.QStringValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO M368.QAction)
addNewAction arg'1 arg'2 =
  HoppyFHR.withCppPtr (toQMenu arg'1) $ \arg'1' ->
  M142.withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
  HoppyP.fmap M368.QAction
  (addNewAction' arg'1' arg'2')

addNewActionWithIcon :: (QMenuPtr this, M288.QIconValue arg'2, M142.QStringValue arg'3) => (this) {- ^ this -} -> (arg'2) -> (arg'3) -> (HoppyP.IO M368.QAction)
addNewActionWithIcon arg'1 arg'2 arg'3 =
  HoppyFHR.withCppPtr (toQMenu arg'1) $ \arg'1' ->
  M288.withQIconPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
  M142.withQStringPtr arg'3 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'3' ->
  HoppyP.fmap M368.QAction
  (addNewActionWithIcon' arg'1' arg'2' arg'3')

addMenu :: (QMenuPtr this, QMenuPtr arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO M368.QAction)
addMenu arg'1 arg'2 =
  HoppyFHR.withCppPtr (toQMenu arg'1) $ \arg'1' ->
  HoppyFHR.withCppPtr (toQMenu arg'2) $ \arg'2' ->
  HoppyP.fmap M368.QAction
  (addMenu' arg'1' arg'2')

addNewMenu :: (QMenuPtr this, M142.QStringValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO QMenu)
addNewMenu arg'1 arg'2 =
  HoppyFHR.withCppPtr (toQMenu arg'1) $ \arg'1' ->
  M142.withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
  HoppyP.fmap QMenu
  (addNewMenu' arg'1' arg'2')

addNewMenuWithIcon :: (QMenuPtr this, M288.QIconValue arg'2, M142.QStringValue arg'3) => (this) {- ^ this -} -> (arg'2) -> (arg'3) -> (HoppyP.IO QMenu)
addNewMenuWithIcon arg'1 arg'2 arg'3 =
  HoppyFHR.withCppPtr (toQMenu arg'1) $ \arg'1' ->
  M288.withQIconPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
  M142.withQStringPtr arg'3 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'3' ->
  HoppyP.fmap QMenu
  (addNewMenuWithIcon' arg'1' arg'2' arg'3')

addSection :: (QMenuPtr this, M142.QStringValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO M368.QAction)
addSection arg'1 arg'2 =
  HoppyFHR.withCppPtr (toQMenu arg'1) $ \arg'1' ->
  M142.withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
  HoppyP.fmap M368.QAction
  (addSection' arg'1' arg'2')

addSectionWithIcon :: (QMenuPtr this, M288.QIconValue arg'2, M142.QStringValue arg'3) => (this) {- ^ this -} -> (arg'2) -> (arg'3) -> (HoppyP.IO M368.QAction)
addSectionWithIcon arg'1 arg'2 arg'3 =
  HoppyFHR.withCppPtr (toQMenu arg'1) $ \arg'1' ->
  M288.withQIconPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
  M142.withQStringPtr arg'3 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'3' ->
  HoppyP.fmap M368.QAction
  (addSectionWithIcon' arg'1' arg'2' arg'3')

addSeparator :: (QMenuPtr this) => (this) {- ^ this -} -> (HoppyP.IO M368.QAction)
addSeparator arg'1 =
  HoppyFHR.withCppPtr (toQMenu arg'1) $ \arg'1' ->
  HoppyP.fmap M368.QAction
  (addSeparator' arg'1')

clear :: (QMenuPtr this) => (this) {- ^ this -} -> (HoppyP.IO ())
clear arg'1 =
  HoppyFHR.withCppPtr (toQMenu arg'1) $ \arg'1' ->
  (clear' arg'1')

setDefaultAction :: (QMenuPtr this, M368.QActionPtr arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO ())
setDefaultAction arg'1 arg'2 =
  HoppyFHR.withCppPtr (toQMenu arg'1) $ \arg'1' ->
  HoppyFHR.withCppPtr (M368.toQAction arg'2) $ \arg'2' ->
  (setDefaultAction' arg'1' arg'2')

exec :: (QMenuPtr this) => (this) {- ^ this -} -> (HoppyP.IO M368.QAction)
exec arg'1 =
  HoppyFHR.withCppPtr (toQMenu arg'1) $ \arg'1' ->
  HoppyP.fmap M368.QAction
  (exec' arg'1')

execAt :: (QMenuPtr this, M114.QPointValue arg'2, M368.QActionPtr arg'3) => (this) {- ^ this -} -> (arg'2) -> (arg'3) -> (HoppyP.IO M368.QAction)
execAt arg'1 arg'2 arg'3 =
  HoppyFHR.withCppPtr (toQMenu arg'1) $ \arg'1' ->
  M114.withQPointPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
  HoppyFHR.withCppPtr (M368.toQAction arg'3) $ \arg'3' ->
  HoppyP.fmap M368.QAction
  (execAt' arg'1' arg'2' arg'3')

hideTearOffMenu :: (QMenuPtr this) => (this) {- ^ this -} -> (HoppyP.IO ())
hideTearOffMenu arg'1 =
  HoppyFHR.withCppPtr (toQMenu arg'1) $ \arg'1' ->
  (hideTearOffMenu' arg'1')

setIcon :: (QMenuPtr this, M288.QIconValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO ())
setIcon arg'1 arg'2 =
  HoppyFHR.withCppPtr (toQMenu arg'1) $ \arg'1' ->
  M288.withQIconPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
  (setIcon' arg'1' arg'2')

insertMenu :: (QMenuPtr this, M368.QActionPtr arg'2, QMenuPtr arg'3) => (this) {- ^ this -} -> (arg'2) -> (arg'3) -> (HoppyP.IO M368.QAction)
insertMenu arg'1 arg'2 arg'3 =
  HoppyFHR.withCppPtr (toQMenu arg'1) $ \arg'1' ->
  HoppyFHR.withCppPtr (M368.toQAction arg'2) $ \arg'2' ->
  HoppyFHR.withCppPtr (toQMenu arg'3) $ \arg'3' ->
  HoppyP.fmap M368.QAction
  (insertMenu' arg'1' arg'2' arg'3')

insertSection :: (QMenuPtr this, M368.QActionPtr arg'2, M142.QStringValue arg'3) => (this) {- ^ this -} -> (arg'2) -> (arg'3) -> (HoppyP.IO M368.QAction)
insertSection arg'1 arg'2 arg'3 =
  HoppyFHR.withCppPtr (toQMenu arg'1) $ \arg'1' ->
  HoppyFHR.withCppPtr (M368.toQAction arg'2) $ \arg'2' ->
  M142.withQStringPtr arg'3 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'3' ->
  HoppyP.fmap M368.QAction
  (insertSection' arg'1' arg'2' arg'3')

insertSectionWithIcon :: (QMenuPtr this, M368.QActionPtr arg'2, M288.QIconValue arg'3, M142.QStringValue arg'4) => (this) {- ^ this -} -> (arg'2) -> (arg'3) -> (arg'4) -> (HoppyP.IO M368.QAction)
insertSectionWithIcon arg'1 arg'2 arg'3 arg'4 =
  HoppyFHR.withCppPtr (toQMenu arg'1) $ \arg'1' ->
  HoppyFHR.withCppPtr (M368.toQAction arg'2) $ \arg'2' ->
  M288.withQIconPtr arg'3 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'3' ->
  M142.withQStringPtr arg'4 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'4' ->
  HoppyP.fmap M368.QAction
  (insertSectionWithIcon' arg'1' arg'2' arg'3' arg'4')

insertSeparator :: (QMenuPtr this, M368.QActionPtr arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO M368.QAction)
insertSeparator arg'1 arg'2 =
  HoppyFHR.withCppPtr (toQMenu arg'1) $ \arg'1' ->
  HoppyFHR.withCppPtr (M368.toQAction arg'2) $ \arg'2' ->
  HoppyP.fmap M368.QAction
  (insertSeparator' arg'1' arg'2')

popup :: (QMenuPtr this, M114.QPointValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO ())
popup arg'1 arg'2 =
  HoppyFHR.withCppPtr (toQMenu arg'1) $ \arg'1' ->
  M114.withQPointPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
  (popup' arg'1' arg'2')

popupAction :: (QMenuPtr this, M114.QPointValue arg'2, M368.QActionPtr arg'3) => (this) {- ^ this -} -> (arg'2) -> (arg'3) -> (HoppyP.IO ())
popupAction arg'1 arg'2 arg'3 =
  HoppyFHR.withCppPtr (toQMenu arg'1) $ \arg'1' ->
  M114.withQPointPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
  HoppyFHR.withCppPtr (M368.toQAction arg'3) $ \arg'3' ->
  (popupAction' arg'1' arg'2' arg'3')

setSeparatorsCollapsible :: (QMenuPtr this) => (this) {- ^ this -} -> (HoppyP.Bool) -> (HoppyP.IO ())
setSeparatorsCollapsible arg'1 arg'2 =
  HoppyFHR.withCppPtr (toQMenu arg'1) $ \arg'1' ->
  (
    \x -> HoppyP.return $ if x then 1 else 0
  ) arg'2 >>= \arg'2' ->
  (setSeparatorsCollapsible' arg'1' arg'2')

setTearOffEnabled :: (QMenuPtr this) => (this) {- ^ this -} -> (HoppyP.Bool) -> (HoppyP.IO ())
setTearOffEnabled arg'1 arg'2 =
  HoppyFHR.withCppPtr (toQMenu arg'1) $ \arg'1' ->
  (
    \x -> HoppyP.return $ if x then 1 else 0
  ) arg'2 >>= \arg'2' ->
  (setTearOffEnabled' arg'1' arg'2')

setTitle :: (QMenuPtr this, M142.QStringValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO ())
setTitle arg'1 arg'2 =
  HoppyFHR.withCppPtr (toQMenu arg'1) $ \arg'1' ->
  M142.withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
  (setTitle' arg'1' arg'2')

emitAboutToHide :: (QMenuPtr this) => (this) {- ^ this -} -> (HoppyP.IO ())
emitAboutToHide arg'1 =
  HoppyFHR.withCppPtr (toQMenu arg'1) $ \arg'1' ->
  (emitAboutToHide' arg'1')

emitAboutToShow :: (QMenuPtr this) => (this) {- ^ this -} -> (HoppyP.IO ())
emitAboutToShow arg'1 =
  HoppyFHR.withCppPtr (toQMenu arg'1) $ \arg'1' ->
  (emitAboutToShow' arg'1')

emitHovered :: (QMenuPtr this, M368.QActionPtr arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO ())
emitHovered arg'1 arg'2 =
  HoppyFHR.withCppPtr (toQMenu arg'1) $ \arg'1' ->
  HoppyFHR.withCppPtr (M368.toQAction arg'2) $ \arg'2' ->
  (emitHovered' arg'1' arg'2')

emitTriggered :: (QMenuPtr this, M368.QActionPtr arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO ())
emitTriggered arg'1 arg'2 =
  HoppyFHR.withCppPtr (toQMenu arg'1) $ \arg'1' ->
  HoppyFHR.withCppPtr (M368.toQAction arg'2) $ \arg'2' ->
  (emitTriggered' arg'1' arg'2')

data QMenuConst =
    QMenuConst (HoppyF.Ptr QMenuConst)
  | QMenuConstGc (HoppyF.ForeignPtr ()) (HoppyF.Ptr QMenuConst)
  deriving (HoppyP.Show)

instance HoppyP.Eq QMenuConst where
  x == y = HoppyFHR.toPtr x == HoppyFHR.toPtr y

instance HoppyP.Ord QMenuConst where
  compare x y = HoppyP.compare (HoppyFHR.toPtr x) (HoppyFHR.toPtr y)

castQMenuToConst :: QMenu -> QMenuConst
castQMenuToConst (QMenu ptr') = QMenuConst $ HoppyF.castPtr ptr'
castQMenuToConst (QMenuGc fptr' ptr') = QMenuConstGc fptr' $ HoppyF.castPtr ptr'

instance HoppyFHR.CppPtr QMenuConst where
  nullptr = QMenuConst HoppyF.nullPtr
  
  withCppPtr (QMenuConst ptr') f' = f' ptr'
  withCppPtr (QMenuConstGc fptr' ptr') f' = HoppyF.withForeignPtr fptr' $ \_ -> f' ptr'
  
  toPtr (QMenuConst ptr') = ptr'
  toPtr (QMenuConstGc _ ptr') = ptr'
  
  touchCppPtr (QMenuConst _) = HoppyP.return ()
  touchCppPtr (QMenuConstGc fptr' _) = HoppyF.touchForeignPtr fptr'

instance HoppyFHR.Deletable QMenuConst where
  delete (QMenuConst ptr') = delete'QMenu ptr'
  delete (QMenuConstGc _ _) = HoppyP.fail $ HoppyP.concat ["Deletable.delete: Asked to delete a GC-managed ", "QMenuConst", " object."]
  
  toGc this'@(QMenuConst ptr') = if ptr' == HoppyF.nullPtr then HoppyP.return this' else HoppyP.fmap (HoppyP.flip QMenuConstGc ptr') $ HoppyF.newForeignPtr (HoppyF.castFunPtr deletePtr'QMenu :: HoppyF.FunPtr (HoppyF.Ptr () -> HoppyP.IO ())) (HoppyF.castPtr ptr' :: HoppyF.Ptr ())
  toGc this'@(QMenuConstGc {}) = HoppyP.return this'

instance QMenuConstPtr QMenuConst where
  toQMenuConst = HoppyP.id

instance M506.QWidgetConstPtr QMenuConst where
  toQWidgetConst (QMenuConst ptr') = M506.QWidgetConst $ castQMenuToQWidget ptr'
  toQWidgetConst (QMenuConstGc fptr' ptr') = M506.QWidgetConstGc fptr' $ castQMenuToQWidget ptr'

instance M94.QObjectConstPtr QMenuConst where
  toQObjectConst (QMenuConst ptr') = M94.QObjectConst $ castQMenuToQObject ptr'
  toQObjectConst (QMenuConstGc fptr' ptr') = M94.QObjectConstGc fptr' $ castQMenuToQObject ptr'

data QMenu =
    QMenu (HoppyF.Ptr QMenu)
  | QMenuGc (HoppyF.ForeignPtr ()) (HoppyF.Ptr QMenu)
  deriving (HoppyP.Show)

instance HoppyP.Eq QMenu where
  x == y = HoppyFHR.toPtr x == HoppyFHR.toPtr y

instance HoppyP.Ord QMenu where
  compare x y = HoppyP.compare (HoppyFHR.toPtr x) (HoppyFHR.toPtr y)

castQMenuToNonconst :: QMenuConst -> QMenu
castQMenuToNonconst (QMenuConst ptr') = QMenu $ HoppyF.castPtr ptr'
castQMenuToNonconst (QMenuConstGc fptr' ptr') = QMenuGc fptr' $ HoppyF.castPtr ptr'

instance HoppyFHR.CppPtr QMenu where
  nullptr = QMenu HoppyF.nullPtr
  
  withCppPtr (QMenu ptr') f' = f' ptr'
  withCppPtr (QMenuGc fptr' ptr') f' = HoppyF.withForeignPtr fptr' $ \_ -> f' ptr'
  
  toPtr (QMenu ptr') = ptr'
  toPtr (QMenuGc _ ptr') = ptr'
  
  touchCppPtr (QMenu _) = HoppyP.return ()
  touchCppPtr (QMenuGc fptr' _) = HoppyF.touchForeignPtr fptr'

instance HoppyFHR.Deletable QMenu where
  delete (QMenu ptr') = delete'QMenu $ (HoppyF.castPtr ptr' :: HoppyF.Ptr QMenuConst)
  delete (QMenuGc _ _) = HoppyP.fail $ HoppyP.concat ["Deletable.delete: Asked to delete a GC-managed ", "QMenu", " object."]
  
  toGc this'@(QMenu ptr') = if ptr' == HoppyF.nullPtr then HoppyP.return this' else HoppyP.fmap (HoppyP.flip QMenuGc ptr') $ HoppyF.newForeignPtr (HoppyF.castFunPtr deletePtr'QMenu :: HoppyF.FunPtr (HoppyF.Ptr () -> HoppyP.IO ())) (HoppyF.castPtr ptr' :: HoppyF.Ptr ())
  toGc this'@(QMenuGc {}) = HoppyP.return this'

instance QMenuConstPtr QMenu where
  toQMenuConst (QMenu ptr') = QMenuConst $ (HoppyF.castPtr :: HoppyF.Ptr QMenu -> HoppyF.Ptr QMenuConst) ptr'
  toQMenuConst (QMenuGc fptr' ptr') = QMenuConstGc fptr' $ (HoppyF.castPtr :: HoppyF.Ptr QMenu -> HoppyF.Ptr QMenuConst) ptr'

instance QMenuPtr QMenu where
  toQMenu = HoppyP.id

instance M506.QWidgetConstPtr QMenu where
  toQWidgetConst (QMenu ptr') = M506.QWidgetConst $ castQMenuToQWidget $ (HoppyF.castPtr :: HoppyF.Ptr QMenu -> HoppyF.Ptr QMenuConst) ptr'
  toQWidgetConst (QMenuGc fptr' ptr') = M506.QWidgetConstGc fptr' $ castQMenuToQWidget $ (HoppyF.castPtr :: HoppyF.Ptr QMenu -> HoppyF.Ptr QMenuConst) ptr'

instance M506.QWidgetPtr QMenu where
  toQWidget (QMenu ptr') = M506.QWidget $ (HoppyF.castPtr :: HoppyF.Ptr M506.QWidgetConst -> HoppyF.Ptr M506.QWidget) $ castQMenuToQWidget $ (HoppyF.castPtr :: HoppyF.Ptr QMenu -> HoppyF.Ptr QMenuConst) ptr'
  toQWidget (QMenuGc fptr' ptr') = M506.QWidgetGc fptr' $ (HoppyF.castPtr :: HoppyF.Ptr M506.QWidgetConst -> HoppyF.Ptr M506.QWidget) $ castQMenuToQWidget $ (HoppyF.castPtr :: HoppyF.Ptr QMenu -> HoppyF.Ptr QMenuConst) ptr'

instance M94.QObjectConstPtr QMenu where
  toQObjectConst (QMenu ptr') = M94.QObjectConst $ castQMenuToQObject $ (HoppyF.castPtr :: HoppyF.Ptr QMenu -> HoppyF.Ptr QMenuConst) ptr'
  toQObjectConst (QMenuGc fptr' ptr') = M94.QObjectConstGc fptr' $ castQMenuToQObject $ (HoppyF.castPtr :: HoppyF.Ptr QMenu -> HoppyF.Ptr QMenuConst) ptr'

instance M94.QObjectPtr QMenu where
  toQObject (QMenu ptr') = M94.QObject $ (HoppyF.castPtr :: HoppyF.Ptr M94.QObjectConst -> HoppyF.Ptr M94.QObject) $ castQMenuToQObject $ (HoppyF.castPtr :: HoppyF.Ptr QMenu -> HoppyF.Ptr QMenuConst) ptr'
  toQObject (QMenuGc fptr' ptr') = M94.QObjectGc fptr' $ (HoppyF.castPtr :: HoppyF.Ptr M94.QObjectConst -> HoppyF.Ptr M94.QObject) $ castQMenuToQObject $ (HoppyF.castPtr :: HoppyF.Ptr QMenu -> HoppyF.Ptr QMenuConst) ptr'

new :: (HoppyP.IO QMenu)
new =
  HoppyP.fmap QMenu
  (new')

newWithParent :: (M506.QWidgetPtr arg'1) => (arg'1) -> (HoppyP.IO QMenu)
newWithParent arg'1 =
  HoppyFHR.withCppPtr (M506.toQWidget arg'1) $ \arg'1' ->
  HoppyP.fmap QMenu
  (newWithParent' arg'1')

newWithTitle :: (M142.QStringValue arg'1) => (arg'1) -> (HoppyP.IO QMenu)
newWithTitle arg'1 =
  M142.withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
  HoppyP.fmap QMenu
  (newWithTitle' arg'1')

newWithTitleAndParent :: (M142.QStringValue arg'1, M506.QWidgetPtr arg'2) => (arg'1) -> (arg'2) -> (HoppyP.IO QMenu)
newWithTitleAndParent arg'1 arg'2 =
  M142.withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
  HoppyFHR.withCppPtr (M506.toQWidget arg'2) $ \arg'2' ->
  HoppyP.fmap QMenu
  (newWithTitleAndParent' arg'1' arg'2')

class QMenuSuper a where
  downToQMenu :: a -> QMenu

instance QMenuSuper M506.QWidget where
  downToQMenu = castQMenuToNonconst . cast' . M506.castQWidgetToConst
    where
      cast' (M506.QWidgetConst ptr') = QMenuConst $ castQWidgetToQMenu ptr'
      cast' (M506.QWidgetConstGc fptr' ptr') = QMenuConstGc fptr' $ castQWidgetToQMenu ptr'
instance QMenuSuper M94.QObject where
  downToQMenu = castQMenuToNonconst . cast' . M94.castQObjectToConst
    where
      cast' (M94.QObjectConst ptr') = QMenuConst $ castQObjectToQMenu ptr'
      cast' (M94.QObjectConstGc fptr' ptr') = QMenuConstGc fptr' $ castQObjectToQMenu ptr'

class QMenuSuperConst a where
  downToQMenuConst :: a -> QMenuConst

instance QMenuSuperConst M506.QWidgetConst where
  downToQMenuConst = cast'
    where
      cast' (M506.QWidgetConst ptr') = QMenuConst $ castQWidgetToQMenu ptr'
      cast' (M506.QWidgetConstGc fptr' ptr') = QMenuConstGc fptr' $ castQWidgetToQMenu ptr'
instance QMenuSuperConst M94.QObjectConst where
  downToQMenuConst = cast'
    where
      cast' (M94.QObjectConst ptr') = QMenuConst $ castQObjectToQMenu ptr'
      cast' (M94.QObjectConstGc fptr' ptr') = QMenuConstGc fptr' $ castQObjectToQMenu ptr'

instance HoppyFHR.Assignable (HoppyF.Ptr (HoppyF.Ptr QMenu)) QMenu where
  assign ptr' value' = HoppyF.poke ptr' $ HoppyFHR.toPtr value'

instance HoppyFHR.Decodable (HoppyF.Ptr (HoppyF.Ptr QMenu)) QMenu where
  decode = HoppyP.fmap QMenu . HoppyF.peek