[Python-checkins] CVS: python/dist/src/Mac/Modules/qd _Qdmodule.c,NONE,1.1

2001年8月23日 07:00:14 -0700

Update of /cvsroot/python/python/dist/src/Mac/Modules/qd
In directory usw-pr-cvs1:/tmp/cvs-serv30079/Python/Mac/Modules/qd
Added Files:
	_Qdmodule.c 
Log Message:
Renamed the Mac toolbox modules to have an initial _ in their name.
--- NEW FILE: _Qdmodule.c ---
/* =========================== Module _Qd =========================== */
#include "Python.h"
#include "macglue.h"
#include "pymactoolbox.h"
/* Macro to test whether a weak-loaded CFM function exists */
#define PyMac_PRECHECK(rtn) do { if ( &rtn == NULL ) {\
 	PyErr_SetString(PyExc_NotImplementedError, \
 	"Not available in this shared library/OS version"); \
 	return NULL; \
 }} while(0)
#ifdef WITHOUT_FRAMEWORKS
[...5656 lines suppressed...]
	if (PyDict_SetItemString(d, "BitMapType", (PyObject *)&BitMap_Type) != 0)
		Py_FatalError("can't initialize BitMapType");
	QDGlobalsAccess_Type.ob_type = &PyType_Type;
	Py_INCREF(&QDGlobalsAccess_Type);
	if (PyDict_SetItemString(d, "QDGlobalsAccessType", (PyObject *)&QDGlobalsAccess_Type) != 0)
		Py_FatalError("can't initialize QDGlobalsAccessType");
	{
		PyObject *o;
	 	
		o = QDGA_New();
		if (o == NULL || PyDict_SetItemString(d, "qd", o) != 0)
			return;
	}
}
/* ========================= End module _Qd ========================= */