Added DebugStr method to drop into low-level debugger
diff --git a/Mac/Modules/macosmodule.c b/Mac/Modules/macosmodule.c
index 26e2701..cda079a 100644
--- a/Mac/Modules/macosmodule.c
+++ b/Mac/Modules/macosmodule.c
@@ -29,6 +29,7 @@
#include <Windows.h>
#include <Files.h>
+#include <LowMem.h>
static PyObject *MacOS_Error; /* Exception MacOS.Error */
@@ -532,6 +533,20 @@
return Py_None;
}
+static char DebugStr_doc[] = "Switch to low-level debugger with a message";
+
+static PyObject *
+MacOS_DebugStr(PyObject *self, PyObject *args)
+{
+ Str255 message;
+ PyObject *object = 0;
+
+ if (!PyArg_ParseTuple(args, "O&|O", PyMac_GetStr255, message, &object))
+ return NULL;
+ DebugStr(message);
+ Py_INCREF(Py_None);
+ return Py_None;
+}
static char openrf_doc[] = "Open resource fork of a file";
@@ -606,6 +621,7 @@
{"GetErrorString", MacOS_GetErrorString, 1},
{"openrf", MacOS_openrf, 1, openrf_doc},
{"splash", MacOS_splash, 1, splash_doc},
+ {"DebugStr", MacOS_DebugStr, 1, DebugStr_doc},
{NULL, NULL} /* Sentinel */
};