richter 00/12/12 07:07:28
Modified: . Tag: Embperl2c epdom.c
Log:
- Embperl 2 - new memory management
Revision Changes Path
No revision
No revision
1.4.2.12 +4 -3 embperl/Attic/epdom.c
Index: epdom.c
===================================================================
RCS file: /home/cvs/embperl/Attic/epdom.c,v
retrieving revision 1.4.2.11
retrieving revision 1.4.2.12
diff -u -r1.4.2.11 -r1.4.2.12
--- epdom.c 2000/12/07 09:35:23 1.4.2.11
+++ epdom.c 2000/12/12 15:07:28 1.4.2.12
@@ -1113,10 +1113,11 @@
struct tAttrData * pNew ;
tIndex xNdx ;
- pNew = ((struct tAttrData * )(pParent + 1)) + pParent -> numAttr ;
-
pParent = dom_realloc (pParent, sizeof (tNodeData) + (pParent -> numAttr + 1)
* sizeof (tAttrData)) ;
- pDomTree -> pLookup[pParent -> xNdx] = pParent ;
+ pDomTree -> pLookup[xParent] = pParent ;
+
+ pNew = ((struct tAttrData * )(pParent + 1)) + pParent -> numAttr ;
+
xNdx = ArrayAdd (&pDomTree -> pLookup, 1) ;
pDomTree -> pLookup[xNdx] = (struct tNodeData *)pNew ;
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
