connectDynamicSlot :: QObject a -> QScriptEngine () -> String -> String -> QScriptValue () -> QScriptValue () -> IO ()
connectDynamicSlot _this _eng _sig_nam _slt_nam _sfv _stv
  | (isSuffixOf "()" _sig_nam) && (isSuffixOf "()" _slt_nam) 
    = connectSlot _this _sig_nam _this _slt_nam $ scriptSlot_nll _eng _sfv _stv
  | (isSuffixOf "(int)" _sig_nam) && (isSuffixOf "(int)" _slt_nam) 
    = connectSlot _this _sig_nam _this _slt_nam $ scriptSlot_int _eng _sfv _stv
  | (isSuffixOf "(bool)" _sig_nam) && (isSuffixOf "(bool)" _slt_nam) 
    = connectSlot _this _sig_nam _this _slt_nam $ scriptSlot_bool _eng _sfv _stv
  | (isPtrSuffix _sig_nam) && (isPtrSuffix _slt_nam) 
    = connectSlot _this _sig_nam _this _slt_nam $ scriptSlot_ptr _eng _sfv _stv $ getSigPtrTyp _sig_nam
  | otherwise
    = return ()
connectDynamicSlot :: QObject a -> QScriptEngine () -> String -> String -> QScriptValue () -> QScriptValue () -> IO ()
connectDynamicSlot _this _eng _sig_nam _slt_nam _sfv _stv
  | (isSuffixOf "()" _sig_nam) && (isSuffixOf "()" _slt_nam) 
    = connectSlot _this _sig_nam _this _slt_nam $ scriptSlot_nll _eng _sfv _stv
  | (isSuffixOf "(int)" _sig_nam) && (isSuffixOf "(int)" _slt_nam) 
    = connectSlot _this _sig_nam _this _slt_nam $ scriptSlot_int _eng _sfv _stv
  | (isSuffixOf "(bool)" _sig_nam) && (isSuffixOf "(bool)" _slt_nam) 
    = connectSlot _this _sig_nam _this _slt_nam $ scriptSlot_bool _eng _sfv _stv
  | (isPtrSuffix _sig_nam) && (isPtrSuffix _slt_nam) 
    = connectSlot _this _sig_nam _this _slt_nam $ scriptSlot_ptr _eng _sfv _stv $ getSigPtrTyp _sig_nam
  | otherwise
    = return ()
connectDynamicSlot _this _eng _sig_nam _slt_nam _sfv _stv
  | (isSuffixOf "()" _sig_nam) && (isSuffixOf "()" _slt_nam) 
    = connectSlot _this _sig_nam _this _slt_nam $ scriptSlot_nll _eng _sfv _stv
  | (isSuffixOf "(int)" _sig_nam) && (isSuffixOf "(int)" _slt_nam) 
    = connectSlot _this _sig_nam _this _slt_nam $ scriptSlot_int _eng _sfv _stv
  | (isSuffixOf "(bool)" _sig_nam) && (isSuffixOf "(bool)" _slt_nam) 
    = connectSlot _this _sig_nam _this _slt_nam $ scriptSlot_bool _eng _sfv _stv
  | (isPtrSuffix _sig_nam) && (isPtrSuffix _slt_nam) 
    = connectSlot _this _sig_nam _this _slt_nam $ scriptSlot_ptr _eng _sfv _stv $ getSigPtrTyp _sig_nam
  | otherwise
    = return ()