File: pmethodobject.h

package info (click to toggle)
psyco 1.5.1-3
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 1,864 kB
  • ctags: 3,295
  • sloc: ansic: 24,491; python: 5,573; perl: 1,309; makefile: 166; sh: 1
file content (47 lines) | stat: -rw-r--r-- 1,627 bytes parent folder | download | duplicates (6)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
 /***************************************************************/
/***           Psyco equivalent of methodobject.h              ***/
 /***************************************************************/

#ifndef _PSY_METHODOBJECT_H
#define _PSY_METHODOBJECT_H


#include "pobject.h"
#include "pabstract.h"


#define CFUNC_m_ml    DEF_FIELD(PyCFunctionObject, PyMethodDef*, m_ml, OB_type)
#define CFUNC_m_self  DEF_FIELD(PyCFunctionObject, PyObject*, m_self, CFUNC_m_ml)
#define iCFUNC_M_ML   FIELD_INDEX(CFUNC_m_ml)
#define iCFUNC_M_SELF FIELD_INDEX(CFUNC_m_self)
#define CFUNC_TOTAL   FIELDS_TOTAL(CFUNC_m_self)


EXTERNFN vinfo_t* PsycoCFunction_Call(PsycoObject* po, vinfo_t* func,
                                      vinfo_t* tuple, vinfo_t* kw);


 /***************************************************************/
  /***   Virtual-time object builder                           ***/

/* not-yet-computed C method objects, with a m_ml and m_self field.
   Usually not computed at all, but if it needs be, will call
   PyCFunction_New(). */
EXTERNVAR source_virtual_t psyco_computed_cfunction;

PSY_INLINE vinfo_t* PsycoCFunction_New(PsycoObject* po, PyMethodDef* ml,
                                   vinfo_t* self)
{
	vinfo_t* result = vinfo_new(VirtualTime_New(&psyco_computed_cfunction));
	result->array = array_new(CFUNC_TOTAL);
	result->array->items[iOB_TYPE] =
		vinfo_new(CompileTime_New((long)(&PyCFunction_Type)));
	result->array->items[iCFUNC_M_ML] =
		vinfo_new(CompileTime_New((long) ml));
	vinfo_incref(self);
	result->array->items[iCFUNC_M_SELF] = self;
	return result;
}


#endif /* _PSY_METHODOBJECT_H */