blob: 62e72ab8db6dfbe6f9e958226f1e4298a2213f36 (
plain)
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
|
/*
ipmem.c
Interface for perl memory allocation
*/
#include <ipmem.h>
class CPerlMem : public IPerlMem
{
public:
CPerlMem() { pPerl = NULL; };
virtual void* Malloc(size_t);
virtual void* Realloc(void*, size_t);
virtual void Free(void*);
inline void SetPerlObj(CPerlObj *p) { pPerl = p; };
protected:
CPerlObj *pPerl;
};
void* CPerlMem::Malloc(size_t size)
{
return malloc(size);
}
void* CPerlMem::Realloc(void* ptr, size_t size)
{
return realloc(ptr, size);
}
void CPerlMem::Free(void* ptr)
{
free(ptr);
}
|