From 083fcd59cab1a76269852c22b8b181ad12d6cfe9 Mon Sep 17 00:00:00 2001 From: Jarkko Hietaniemi Date: Mon, 18 Mar 2002 13:57:06 +0000 Subject: NetWare tweaks from C Aditya p4raw-id: //depot/perl@15292 --- iperlsys.h | 20 ++++++++++++++++++++ 1 file changed, 20 insertions(+) (limited to 'iperlsys.h') diff --git a/iperlsys.h b/iperlsys.h index 7eda973426..b2b21727e4 100644 --- a/iperlsys.h +++ b/iperlsys.h @@ -795,6 +795,25 @@ struct IPerlMemInfo (*PL_Mem->pIsLocked)(PL_Mem) /* Shared memory macros */ +#ifdef NETWARE + + #define PerlMemShared_malloc(size) \ + (*PL_Mem->pMalloc)(PL_Mem, (size)) +#define PerlMemShared_realloc(buf, size) \ + (*PL_Mem->pRealloc)(PL_Mem, (buf), (size)) +#define PerlMemShared_free(buf) \ + (*PL_Mem->pFree)(PL_Mem, (buf)) +#define PerlMemShared_calloc(num, size) \ + (*PL_Mem->pCalloc)(PL_Mem, (num), (size)) +#define PerlMemShared_get_lock() \ + (*PL_Mem->pGetLock)(PL_Mem) +#define PerlMemShared_free_lock() \ + (*PL_Mem->pFreeLock)(PL_Mem) +#define PerlMemShared_is_locked() \ + (*PL_Mem->pIsLocked)(PL_Mem) + +#else + #define PerlMemShared_malloc(size) \ (*PL_MemShared->pMalloc)(PL_MemShared, (size)) #define PerlMemShared_realloc(buf, size) \ @@ -810,6 +829,7 @@ struct IPerlMemInfo #define PerlMemShared_is_locked() \ (*PL_MemShared->pIsLocked)(PL_MemShared) +#endif /* Parse tree memory macros */ #define PerlMemParse_malloc(size) \ -- cgit v1.2.1