More cases of input parameters passed by reference without const.
diff --git a/Mac/Modules/qt/_Qtmodule.c b/Mac/Modules/qt/_Qtmodule.c
index b201021..50223ec 100644
--- a/Mac/Modules/qt/_Qtmodule.c
+++ b/Mac/Modules/qt/_Qtmodule.c
@@ -25835,18 +25835,18 @@
PyObject *_res = NULL;
ComponentResult _rv;
TunePlayer tp;
- unsigned long header;
+ unsigned long * header;
#ifndef TuneSetHeader
PyMac_PRECHECK(TuneSetHeader);
#endif
- if (!PyArg_ParseTuple(_args, "O&",
- CmpInstObj_Convert, &tp))
+ if (!PyArg_ParseTuple(_args, "O&s",
+ CmpInstObj_Convert, &tp,
+ &header))
return NULL;
_rv = TuneSetHeader(tp,
- &header);
- _res = Py_BuildValue("ll",
- _rv,
- header);
+ header);
+ _res = Py_BuildValue("l",
+ _rv);
return _res;
}
@@ -26149,21 +26149,21 @@
PyObject *_res = NULL;
ComponentResult _rv;
TunePlayer tp;
- unsigned long header;
+ unsigned long * header;
unsigned long size;
#ifndef TuneSetHeaderWithSize
PyMac_PRECHECK(TuneSetHeaderWithSize);
#endif
- if (!PyArg_ParseTuple(_args, "O&l",
+ if (!PyArg_ParseTuple(_args, "O&sl",
CmpInstObj_Convert, &tp,
+ &header,
&size))
return NULL;
_rv = TuneSetHeaderWithSize(tp,
- &header,
+ header,
size);
- _res = Py_BuildValue("ll",
- _rv,
- header);
+ _res = Py_BuildValue("l",
+ _rv);
return _res;
}
@@ -27937,7 +27937,7 @@
{"NATask", (PyCFunction)Qt_NATask, 1,
PyDoc_STR("(NoteAllocator na) -> (ComponentResult _rv)")},
{"TuneSetHeader", (PyCFunction)Qt_TuneSetHeader, 1,
- PyDoc_STR("(TunePlayer tp) -> (ComponentResult _rv, unsigned long header)")},
+ PyDoc_STR("(TunePlayer tp, unsigned long * header) -> (ComponentResult _rv)")},
{"TuneGetTimeBase", (PyCFunction)Qt_TuneGetTimeBase, 1,
PyDoc_STR("(TunePlayer tp) -> (ComponentResult _rv, TimeBase tb)")},
{"TuneSetTimeScale", (PyCFunction)Qt_TuneSetTimeScale, 1,
@@ -27969,7 +27969,7 @@
{"TuneSetSoundLocalization", (PyCFunction)Qt_TuneSetSoundLocalization, 1,
PyDoc_STR("(TunePlayer tp, Handle data) -> (ComponentResult _rv)")},
{"TuneSetHeaderWithSize", (PyCFunction)Qt_TuneSetHeaderWithSize, 1,
- PyDoc_STR("(TunePlayer tp, unsigned long size) -> (ComponentResult _rv, unsigned long header)")},
+ PyDoc_STR("(TunePlayer tp, unsigned long * header, unsigned long size) -> (ComponentResult _rv)")},
{"TuneSetPartMix", (PyCFunction)Qt_TuneSetPartMix, 1,
PyDoc_STR("(TunePlayer tp, unsigned long partNumber, long volume, long balance, long mixFlags) -> (ComponentResult _rv)")},
{"TuneGetPartMix", (PyCFunction)Qt_TuneGetPartMix, 1,
diff --git a/Mac/Modules/qt/qtscan.py b/Mac/Modules/qt/qtscan.py
index 175a220..1006c6c 100644
--- a/Mac/Modules/qt/qtscan.py
+++ b/Mac/Modules/qt/qtscan.py
@@ -306,6 +306,9 @@
# It seems MusicMIDIPacket if never flagged with const but always used
# for sending only. If that ever changes this needs to be fixed.
([('MusicMIDIPacket', '*', 'OutMode')], [('MusicMIDIPacket_ptr', '*', 'InMode')]),
+
+ # QTMusic const-less input parameters
+ ([('unsigned_long', 'header', 'OutMode')], [('UnsignedLongPtr', 'header', 'InMode')]),
]
if __name__ == "__main__":
diff --git a/Mac/Modules/qt/qtsupport.py b/Mac/Modules/qt/qtsupport.py
index 098d30d..20304c9 100644
--- a/Mac/Modules/qt/qtsupport.py
+++ b/Mac/Modules/qt/qtsupport.py
@@ -211,6 +211,7 @@
HandlerError = Type("HandlerError", "l")
Ptr = InputOnlyType("Ptr", "s")
StringPtr = Type("StringPtr", "s")
+UnsignedLongPtr = Type("unsigned long *", "s")
mcactionparams = InputOnlyType("void *", "s")
QTParameterDialog = Type("QTParameterDialog", "l")
QTAtomID = Type("QTAtomID", "l")