#include <Python.h>
#include "util.h"
static char *CVSid = "@(#) $Id: util.c,v 1.2 2004/09/23 14:25:28 murata Exp $";
PyObject *
error_queue_to_list(void)
{
PyObject *errlist, *tuple;
long err;
errlist = PyList_New(0);
while ((err = ERR_get_error()) != 0)
{
tuple = Py_BuildValue("(sss)", ERR_lib_error_string(err),
ERR_func_error_string(err),
ERR_reason_error_string(err));
PyList_Append(errlist, tuple);
Py_DECREF(tuple);
}
return errlist;
}
void
flush_error_queue(void)
{
Py_DECREF(error_queue_to_list());
}