You are viewing a plain text version of this content. The canonical link for it is here.
Posted to embperl-cvs@perl.apache.org by ri...@apache.org on 2002/03/12 10:33:11 UTC
cvs commit: embperl Embperl.pm Embperl.xs epinit.c epnames.h test.pl
richter 02/03/12 01:33:11
Modified: . Tag: Embperl2c Embperl.pm Embperl.xs epinit.c
epnames.h test.pl
Log:
-
Revision Changes Path
No revision
No revision
1.118.4.98 +0 -0 embperl/Embperl.pm
Index: Embperl.pm
===================================================================
RCS file: /home/cvs/embperl/Embperl.pm,v
retrieving revision 1.118.4.97
retrieving revision 1.118.4.98
diff -u -r1.118.4.97 -r1.118.4.98
--- Embperl.pm 12 Mar 2002 04:52:07 -0000 1.118.4.97
+++ Embperl.pm 12 Mar 2002 09:33:10 -0000 1.118.4.98
@@ -10,7 +10,7 @@
# IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
# WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
#
-# $Id: Embperl.pm,v 1.118.4.97 2002/03/12 04:52:07 richter Exp $
+# $Id: Embperl.pm,v 1.118.4.98 2002/03/12 09:33:10 richter Exp $
#
###################################################################################
1.29.4.48 +10 -0 embperl/Embperl.xs
Index: Embperl.xs
===================================================================
RCS file: /home/cvs/embperl/Embperl.xs,v
retrieving revision 1.29.4.47
retrieving revision 1.29.4.48
diff -u -r1.29.4.47 -r1.29.4.48
--- Embperl.xs 11 Mar 2002 14:15:08 -0000 1.29.4.47
+++ Embperl.xs 12 Mar 2002 09:33:10 -0000 1.29.4.48
@@ -16,6 +16,16 @@
#include "xs/ep_xs_typedefs.h"
#include "xs/ep_xs_sv_convert.h"
+
+void boot_Embperl(aTHX_ CV * cv) ;
+
+void boot_Embperl2 (pTHX_ CV * cv)
+ {
+ boot_Embperl(aTHX_ cv) ;
+ }
+
+
+
MODULE = Embperl PACKAGE = Embperl PREFIX = embperl_
int
1.1.2.43 +14 -16 embperl/Attic/epinit.c
Index: epinit.c
===================================================================
RCS file: /home/cvs/embperl/Attic/epinit.c,v
retrieving revision 1.1.2.42
retrieving revision 1.1.2.43
diff -u -r1.1.2.42 -r1.1.2.43
--- epinit.c 12 Mar 2002 08:58:44 -0000 1.1.2.42
+++ epinit.c 12 Mar 2002 09:33:10 -0000 1.1.2.43
@@ -10,7 +10,7 @@
# IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
# WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
#
-# $Id: epinit.c,v 1.1.2.42 2002/03/12 08:58:44 richter Exp $
+# $Id: epinit.c,v 1.1.2.43 2002/03/12 09:33:10 richter Exp $
#
###################################################################################*/
@@ -341,7 +341,6 @@
if (strcmp (pCfg -> sSessionHandlerClass, "no") == 0)
return ok ;
- tainted = 0 ;
if (!pArgs)
pCfg -> pSessionArgs = pArgs = newHV() ;
@@ -371,6 +370,14 @@
pGenerator = newSVpv("MD5", 3) ;
hv_store (pArgs, "Generate", 8, pGenerator, 0) ;
}
+ else
+ {
+ /* workaround for perl bug in newHVhv when to less hash entries */
+ hv_store (pArgs, "__dummy1__", 10, newSViv (1), 0) ;
+ hv_store (pArgs, "__dummy2__", 10, newSViv (1), 0) ;
+ hv_store (pArgs, "__dummy3__", 10, newSViv (1), 0) ;
+ hv_store (pArgs, "__dummy4__", 10, newSViv (1), 0) ;
+ }
if (pCfg -> sSessionConfig)
hv_store (pArgs, "config", 5, newSVpv (pCfg -> sSessionConfig, 0), 0) ;
@@ -380,35 +387,28 @@
pArgs1 = newHVhv(pArgs) ;
hv_store (pArgs1, "Transaction", 11, newSViv (1), 0) ;
+ pArgs2 = newHVhv(pArgs) ;
+ hv_store (pArgs2, "recreate_id", 11, newSViv (1), 0) ;
+ pArgs3 = newHVhv(pArgs2) ;
- tainted = 0 ;
if ((rc = embperl_CreateSessionObject (a, pArgs1, &a -> pAppHash, &a -> pAppObj)) != ok)
return rc ;
- tainted = 0 ;
PUSHMARK(sp);
XPUSHs(a -> pAppObj);
XPUSHs(sv_2mortal (newSVpv(a -> Config.sAppName, 0)));
PUTBACK;
perl_call_method ("setidfrom", G_DISCARD) ;
- tainted = 0 ;
- pArgs2 = newHVhv(pArgs) ;
- hv_store (pArgs2, "recreate_id", 11, newSViv (1), 0) ;
- pArgs3 = newHVhv(pArgs2) ;
-
if ((rc = embperl_CreateSessionObject (a, pArgs2, &a -> pUserHash, &a -> pUserObj)) != ok)
return rc ;
- tainted = 0 ;
hv_store (pArgs3, "newid", 5, newSViv (1), 0) ;
if ((rc = embperl_CreateSessionObject (a, pArgs3, &a -> pStateHash, &a -> pStateObj)) != ok)
return rc ;
- tainted = 0 ;
-
return ok ;
}
@@ -715,10 +715,8 @@
}
#endif
- if (pMainPool)
- return ok ; /* initialization has already be done */
-
- pMainPool = ep_init_alloc() ;
+ if (!pMainPool)
+ pMainPool = ep_init_alloc() ;
if ((rc = embperl_SetupThread (aTHX_ &pThread)) != ok)
return rc ;
1.19.4.18 +187 -187 embperl/epnames.h
Index: epnames.h
===================================================================
RCS file: /home/cvs/embperl/epnames.h,v
retrieving revision 1.19.4.17
retrieving revision 1.19.4.18
diff -u -r1.19.4.17 -r1.19.4.18
--- epnames.h 19 Jan 2002 13:45:40 -0000 1.19.4.17
+++ epnames.h 12 Mar 2002 09:33:10 -0000 1.19.4.18
@@ -10,7 +10,7 @@
# IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
# WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
#
-# $Id: epnames.h,v 1.19.4.17 2002/01/19 13:45:40 richter Exp $
+# $Id: epnames.h,v 1.19.4.18 2002/03/12 09:33:10 richter Exp $
#
###################################################################################*/
@@ -19,196 +19,196 @@
*/
-#define oBegin EMBPERL_oBegin
-#define oRollback EMBPERL_oRollback
-#define oRollbackOutput EMBPERL_oRollbackOutput
-#define oCommit EMBPERL_oCommit
-#define oCommitToMem EMBPERL_oCommitToMem
-#define OpenInput EMBPERL_OpenInput
-#define CloseInput EMBPERL_CloseInput
-#define ReadInputFile EMBPERL_ReadInputFile
-#define iread EMBPERL_iread
-#define igets EMBPERL_igets
-#define OpenOutput EMBPERL_OpenOutput
-#define CloseOutput EMBPERL_CloseOutput
-#define oputs EMBPERL_oputs
-#define owrite EMBPERL_owrite
-#define oputc EMBPERL_oputc
-#define OpenLog EMBPERL_OpenLog
-#define CloseLog EMBPERL_CloseLog
-#define FlushLog EMBPERL_FlushLog
-#define lprintf EMBPERL_lprintf
-#define lwrite EMBPERL_lwrite
-#define _free EMBPERL__free
-#define _malloc EMBPERL__malloc
-#define LogError EMBPERL_LogError
-#define OutputToHtml EMBPERL_OutputToHtml
-#define OutputEscape EMBPERL_OutputEscape
-#define Eval EMBPERL_Eval
-#define EvalNum EMBPERL_EvalNum
-#define EvalBool EMBPERL_EvalBool
-#define EvalConfig EMBPERL_EvalConfig
-#define stristr EMBPERL_stristr
-#define strlower EMBPERL_strlower
-#define TransHtml EMBPERL_TransHtml
-#define TransHtmlSV EMBPERL_TransHtmlSV
-#define GetHtmlArg EMBPERL_GetHtmlArg
-#define GetHashValueLen EMBPERL_GetHashValueLen
-#define GetHashValue EMBPERL_GetHashValue
-#define GetHashValueInt EMBPERL_GetHashValueInt
-#define GetHashValueCREF EMBPERL_GetHashValueCREF
-#define GetHashValueHREF EMBPERL_GetHashValueHREF
-#define GetHashValueSV EMBPERL_GetHashValueSV
-#define GetHashValueSVinc EMBPERL_GetHashValueSVinc
-#define GetHashValueStrOrHash EMBPERL_GetHashValueStrOrHash
-#define GetHashValueUInt EMBPERL_GetHashValueUInt
-#define GetHashValueStrDup EMBPERL_GetHashValueStrDup
-#define SetHashValueStr EMBPERL_SetHashValueStr
-#define CreateHashRef EMBPERL_CreateHashRef
-#define ChdirToSource EMBPERL_ChdirToSource
-#define Char2XML EMBPERL_Char2XML
-#define Char2Html EMBPERL_Char2Html
-#define Html2Char EMBPERL_Html2Char
-#define sizeHtml2Char EMBPERL_sizeHtml2Char
-#define OutputToMemBuf EMBPERL_OutputToMemBuf
-#define OutputToStd EMBPERL_OutputToStd
-#define GetLogHandle EMBPERL_GetLogHandle
-#define SearchCmd EMBPERL_SearchCmd
-#define ProcessCmd EMBPERL_ProcessCmd
-#define ProcessSub EMBPERL_ProcessSub
-#define Char2Url EMBPERL_Char2Url
-#define CmdTab EMBPERL_CmdTab
-#define EvalTrans EMBPERL_EvalTrans
-#define EvalMain EMBPERL_EvalMain
-#define EvalTransFlags EMBPERL_EvalTransFlags
-#define EvalTransOnFirstCall EMBPERL_EvalTransOnFirstCall
-#define EvalSub EMBPERL_EvalSub
-#define EvalOnly EMBPERL_EvalOnly
-#define CallCV EMBPERL_CallCV
-#define GetContentLength EMBPERL_GetContentLength
-#define GetLogFilePos EMBPERL_GetLogFilePos
-#define ReadHTML EMBPERL_ReadHTML
-#define ScanCmdEvalsInString EMBPERL_ScanCmdEvalsInString
-#define EvalDirect EMBPERL_EvalDirect
-#define GetLineNo EMBPERL_GetLineNo
-#define GetLineNoOf EMBPERL_GetLineNoOf
-#define Dirname EMBPERL_Dirname
-#define CommitError EMBPERL_CommitError
-#define RollbackError EMBPERL_RollbackError
-#define _memstrcat EMBPERL__memstrcat
-#define _ep_strdup EMBPERL__ep_strdup
-#define _ep_strndup EMBPERL__ep_strndup
-#define _realloc EMBPERL__realloc
-#define ExecuteReq EMBPERL_ExecuteReq
-#define FreeConfData EMBPERL_FreeConfData
-#define FreeRequest EMBPERL_FreeRequest
-#define GetHashValueInt EMBPERL_GetHashValueInt
-#define GetHashValueStr EMBPERL_GetHashValueStr
-#define Init EMBPERL_Init
-#define ResetHandler EMBPERL_ResetHandler
-#define SetupConfData EMBPERL_SetupConfData
-#define SetupFileData EMBPERL_SetupFileData
-#define SetupRequest EMBPERL_SetupRequest
-#define Term EMBPERL_Term
-#define sstrdup EMBPERL_sstrdup
-#define strnstr EMBPERL_strnstr
-#define ClearSymtab EMBPERL_ClearSymtab
-#define UndefSub EMBPERL_UndefSub
-#define _ep_memdup EMBPERL__ep_memdup
-#define ProcessBlock EMBPERL_ProcessBlock
-#define NewEscMode EMBPERL_NewEscMode
-#define GetSubTextPos EMBPERL_GetSubTextPos
-#define SetSubTextPos EMBPERL_SetSubTextPos
-#define SetupDebugger EMBPERL_SetupDebugger
-#define GetFileData EMBPERL_GetFileData
-#define SplitFdat EMBPERL_SplitFdat
-#define AddMagicAV EMBPERL_AddMagicAV
+#define oBegin EMBPERL2_oBegin
+#define oRollback EMBPERL2_oRollback
+#define oRollbackOutput EMBPERL2_oRollbackOutput
+#define oCommit EMBPERL2_oCommit
+#define oCommitToMem EMBPERL2_oCommitToMem
+#define OpenInput EMBPERL2_OpenInput
+#define CloseInput EMBPERL2_CloseInput
+#define ReadInputFile EMBPERL2_ReadInputFile
+#define iread EMBPERL2_iread
+#define igets EMBPERL2_igets
+#define OpenOutput EMBPERL2_OpenOutput
+#define CloseOutput EMBPERL2_CloseOutput
+#define oputs EMBPERL2_oputs
+#define owrite EMBPERL2_owrite
+#define oputc EMBPERL2_oputc
+#define OpenLog EMBPERL2_OpenLog
+#define CloseLog EMBPERL2_CloseLog
+#define FlushLog EMBPERL2_FlushLog
+#define lprintf EMBPERL2_lprintf
+#define lwrite EMBPERL2_lwrite
+#define _free EMBPERL2__free
+#define _malloc EMBPERL2__malloc
+#define LogError EMBPERL2_LogError
+#define OutputToHtml EMBPERL2_OutputToHtml
+#define OutputEscape EMBPERL2_OutputEscape
+#define Eval EMBPERL2_Eval
+#define EvalNum EMBPERL2_EvalNum
+#define EvalBool EMBPERL2_EvalBool
+#define EvalConfig EMBPERL2_EvalConfig
+#define stristr EMBPERL2_stristr
+#define strlower EMBPERL2_strlower
+#define TransHtml EMBPERL2_TransHtml
+#define TransHtmlSV EMBPERL2_TransHtmlSV
+#define GetHtmlArg EMBPERL2_GetHtmlArg
+#define GetHashValueLen EMBPERL2_GetHashValueLen
+#define GetHashValue EMBPERL2_GetHashValue
+#define GetHashValueInt EMBPERL2_GetHashValueInt
+#define GetHashValueCREF EMBPERL2_GetHashValueCREF
+#define GetHashValueHREF EMBPERL2_GetHashValueHREF
+#define GetHashValueSV EMBPERL2_GetHashValueSV
+#define GetHashValueSVinc EMBPERL2_GetHashValueSVinc
+#define GetHashValueStrOrHash EMBPERL2_GetHashValueStrOrHash
+#define GetHashValueUInt EMBPERL2_GetHashValueUInt
+#define GetHashValueStrDup EMBPERL2_GetHashValueStrDup
+#define SetHashValueStr EMBPERL2_SetHashValueStr
+#define CreateHashRef EMBPERL2_CreateHashRef
+#define ChdirToSource EMBPERL2_ChdirToSource
+#define Char2XML EMBPERL2_Char2XML
+#define Char2Html EMBPERL2_Char2Html
+#define Html2Char EMBPERL2_Html2Char
+#define sizeHtml2Char EMBPERL2_sizeHtml2Char
+#define OutputToMemBuf EMBPERL2_OutputToMemBuf
+#define OutputToStd EMBPERL2_OutputToStd
+#define GetLogHandle EMBPERL2_GetLogHandle
+#define SearchCmd EMBPERL2_SearchCmd
+#define ProcessCmd EMBPERL2_ProcessCmd
+#define ProcessSub EMBPERL2_ProcessSub
+#define Char2Url EMBPERL2_Char2Url
+#define CmdTab EMBPERL2_CmdTab
+#define EvalTrans EMBPERL2_EvalTrans
+#define EvalMain EMBPERL2_EvalMain
+#define EvalTransFlags EMBPERL2_EvalTransFlags
+#define EvalTransOnFirstCall EMBPERL2_EvalTransOnFirstCall
+#define EvalSub EMBPERL2_EvalSub
+#define EvalOnly EMBPERL2_EvalOnly
+#define CallCV EMBPERL2_CallCV
+#define GetContentLength EMBPERL2_GetContentLength
+#define GetLogFilePos EMBPERL2_GetLogFilePos
+#define ReadHTML EMBPERL2_ReadHTML
+#define ScanCmdEvalsInString EMBPERL2_ScanCmdEvalsInString
+#define EvalDirect EMBPERL2_EvalDirect
+#define GetLineNo EMBPERL2_GetLineNo
+#define GetLineNoOf EMBPERL2_GetLineNoOf
+#define Dirname EMBPERL2_Dirname
+#define CommitError EMBPERL2_CommitError
+#define RollbackError EMBPERL2_RollbackError
+#define _memstrcat EMBPERL2__memstrcat
+#define _ep_strdup EMBPERL2__ep_strdup
+#define _ep_strndup EMBPERL2__ep_strndup
+#define _realloc EMBPERL2__realloc
+#define ExecuteReq EMBPERL2_ExecuteReq
+#define FreeConfData EMBPERL2_FreeConfData
+#define FreeRequest EMBPERL2_FreeRequest
+#define GetHashValueInt EMBPERL2_GetHashValueInt
+#define GetHashValueStr EMBPERL2_GetHashValueStr
+#define Init EMBPERL2_Init
+#define ResetHandler EMBPERL2_ResetHandler
+#define SetupConfData EMBPERL2_SetupConfData
+#define SetupFileData EMBPERL2_SetupFileData
+#define SetupRequest EMBPERL2_SetupRequest
+#define Term EMBPERL2_Term
+#define sstrdup EMBPERL2_sstrdup
+#define strnstr EMBPERL2_strnstr
+#define ClearSymtab EMBPERL2_ClearSymtab
+#define UndefSub EMBPERL2_UndefSub
+#define _ep_memdup EMBPERL2__ep_memdup
+#define ProcessBlock EMBPERL2_ProcessBlock
+#define NewEscMode EMBPERL2_NewEscMode
+#define GetSubTextPos EMBPERL2_GetSubTextPos
+#define SetSubTextPos EMBPERL2_SetSubTextPos
+#define SetupDebugger EMBPERL2_SetupDebugger
+#define GetFileData EMBPERL2_GetFileData
+#define SplitFdat EMBPERL2_SplitFdat
+#define AddMagicAV EMBPERL2_AddMagicAV
-#define InitialReq EMBPERL_InitialReq
-#define pCurrReq EMBPERL_pCurrReq
+#define InitialReq EMBPERL2_InitialReq
+#define pCurrReq EMBPERL2_pCurrReq
-#define ArrayAdd EMBPERL_ArrayAdd
-#define ArrayClone EMBPERL_ArrayClone
-#define ArrayFree EMBPERL_ArrayFree
-#define ArrayGetSize EMBPERL_ArrayGetSize
+#define ArrayAdd EMBPERL2_ArrayAdd
+#define ArrayClone EMBPERL2_ArrayClone
+#define ArrayFree EMBPERL2_ArrayFree
+#define ArrayGetSize EMBPERL2_ArrayGetSize
#ifndef DMALLOC
-#define ArrayNew EMBPERL_ArrayNew
-#define ArrayNewZero EMBPERL_ArrayNewZero
+#define ArrayNew EMBPERL2_ArrayNew
+#define ArrayNewZero EMBPERL2_ArrayNewZero
#endif
-#define ArraySet EMBPERL_ArraySet
-#define ArraySetSize EMBPERL_ArraySetSize
-#define ArraySub EMBPERL_ArraySub
-#define Attr_selfValue EMBPERL_Attr_selfValue
-#define BuildTokenTable EMBPERL_BuildTokenTable
-#define CallStoredCV EMBPERL_CallStoredCV
-#define DefaultTokenTable EMBPERL_DefaultTokenTable
-#define DomInit EMBPERL_DomInit
-#define DomStats EMBPERL_DomStats
-#define DomTree_alloc EMBPERL_DomTree_alloc
-#define DomTree_checkpoint EMBPERL_DomTree_checkpoint
-#define DomTree_clone EMBPERL_DomTree_clone
-#define DomTree_delete EMBPERL_DomTree_delete
-#define DomTree_discardAfterCheckpoint EMBPERL_DomTree_discardAfterCheckpoint
-#define DomTree_mvtTab EMBPERL_DomTree_mvtTab
-#define DomTree_new EMBPERL_DomTree_new
-#define DomTree_selfCheckpoint EMBPERL_DomTree_selfCheckpoint
-#define DomTree_selfDiscardAfterCheckpoint EMBPERL_DomTree_selfDiscardAfterCheckpoint
-#define Element_selfGetAttribut EMBPERL_Element_selfGetAttribut
-#define Element_selfGetNthAttribut EMBPERL_Element_selfGetNthAttribut
-#define Element_selfRemoveAttribut EMBPERL_Element_selfRemoveAttribut
-#define Element_selfSetAttribut EMBPERL_Element_selfSetAttribut
-#define EvalStore EMBPERL_EvalStore
-#define NdxStringFree EMBPERL_NdxStringFree
-#define NodeList_toString EMBPERL_NodeList_toString
-#define Node_appendChild EMBPERL_Node_appendChild
-#define Node_childsText EMBPERL_Node_childsText
-#define Node_cloneNode EMBPERL_Node_cloneNode
-#define Node_insertAfter EMBPERL_Node_insertAfter
-#define Node_insertAfter_CDATA EMBPERL_Node_insertAfter_CDATA
-#define Node_newAndAppend EMBPERL_Node_newAndAppend
-#define Node_nextSibling EMBPERL_Node_nextSibling
-#define Node_previousSibling EMBPERL_Node_previousSibling
-#define Node_removeChild EMBPERL_Node_removeChild
-#define Node_replaceChildWithCDATA EMBPERL_Node_replaceChildWithCDATA
-#define Node_replaceChildWithNode EMBPERL_Node_replaceChildWithNode
-#define Node_replaceChildWithUrlDATA EMBPERL_Node_replaceChildWithUrlDATA
-#define Node_selfCloneNode EMBPERL_Node_selfCloneNode
-#define Node_selfCondCloneNode EMBPERL_Node_selfCondCloneNode
-#define Node_selfExpand EMBPERL_Node_selfExpand
-#define Node_selfLastChild EMBPERL_Node_selfLastChild
-#define Node_selfNextSibling EMBPERL_Node_selfNextSibling
-#define Node_selfNthChild EMBPERL_Node_selfNthChild
-#define Node_selfPreviousSibling EMBPERL_Node_selfPreviousSibling
-#define Node_selfRemoveChild EMBPERL_Node_selfRemoveChild
-#define Node_toString EMBPERL_Node_toString
-#define Node_toString2 EMBPERL_Node_toString2
-#define ParseFile EMBPERL_ParseFile
-#define String2NdxInc EMBPERL_String2NdxInc
-#define String2UniqueNdx EMBPERL_String2UniqueNdx
-#define StringAdd EMBPERL_StringAdd
-#define StringFree EMBPERL_StringFree
-#define StringNew EMBPERL_StringNew
-#define dom_free EMBPERL_dom_free
-#define dom_malloc EMBPERL_dom_malloc
-#define dom_realloc EMBPERL_dom_realloc
-#define mydie EMBPERL_mydie
-#define nCheckpointCache EMBPERL_nCheckpointCache
-#define nCheckpointCacheMask EMBPERL_nCheckpointCacheMask
-#define nInitialNodePadSize EMBPERL_nInitialNodePadSize
-#define pDomTrees EMBPERL_pDomTrees
-#define pFreeDomTrees EMBPERL_pFreeDomTrees
-#define pStringTableArray EMBPERL_pStringTableArray
-#define pStringTableHash EMBPERL_pStringTableHash
-#define str_free EMBPERL_str_free
-#define str_malloc EMBPERL_str_malloc
-#define str_realloc EMBPERL_str_realloc
-#define xCheckpointCache EMBPERL_xCheckpointCache
-#define xDocument EMBPERL_xDocument
-#define xDocumentFraq EMBPERL_xDocumentFraq
-#define xDomTreeAttr EMBPERL_xDomTreeAttr
-#define xNoName EMBPERL_xNoName
-#define xOrderIndexAttr EMBPERL_xOrderIndexAttr
-#define Escape EMBPERL_Escape
+#define ArraySet EMBPERL2_ArraySet
+#define ArraySetSize EMBPERL2_ArraySetSize
+#define ArraySub EMBPERL2_ArraySub
+#define Attr_selfValue EMBPERL2_Attr_selfValue
+#define BuildTokenTable EMBPERL2_BuildTokenTable
+#define CallStoredCV EMBPERL2_CallStoredCV
+#define DefaultTokenTable EMBPERL2_DefaultTokenTable
+#define DomInit EMBPERL2_DomInit
+#define DomStats EMBPERL2_DomStats
+#define DomTree_alloc EMBPERL2_DomTree_alloc
+#define DomTree_checkpoint EMBPERL2_DomTree_checkpoint
+#define DomTree_clone EMBPERL2_DomTree_clone
+#define DomTree_delete EMBPERL2_DomTree_delete
+#define DomTree_discardAfterCheckpoint EMBPERL2_DomTree_discardAfterCheckpoint
+#define DomTree_mvtTab EMBPERL2_DomTree_mvtTab
+#define DomTree_new EMBPERL2_DomTree_new
+#define DomTree_selfCheckpoint EMBPERL2_DomTree_selfCheckpoint
+#define DomTree_selfDiscardAfterCheckpoint EMBPERL2_DomTree_selfDiscardAfterCheckpoint
+#define Element_selfGetAttribut EMBPERL2_Element_selfGetAttribut
+#define Element_selfGetNthAttribut EMBPERL2_Element_selfGetNthAttribut
+#define Element_selfRemoveAttribut EMBPERL2_Element_selfRemoveAttribut
+#define Element_selfSetAttribut EMBPERL2_Element_selfSetAttribut
+#define EvalStore EMBPERL2_EvalStore
+#define NdxStringFree EMBPERL2_NdxStringFree
+#define NodeList_toString EMBPERL2_NodeList_toString
+#define Node_appendChild EMBPERL2_Node_appendChild
+#define Node_childsText EMBPERL2_Node_childsText
+#define Node_cloneNode EMBPERL2_Node_cloneNode
+#define Node_insertAfter EMBPERL2_Node_insertAfter
+#define Node_insertAfter_CDATA EMBPERL2_Node_insertAfter_CDATA
+#define Node_newAndAppend EMBPERL2_Node_newAndAppend
+#define Node_nextSibling EMBPERL2_Node_nextSibling
+#define Node_previousSibling EMBPERL2_Node_previousSibling
+#define Node_removeChild EMBPERL2_Node_removeChild
+#define Node_replaceChildWithCDATA EMBPERL2_Node_replaceChildWithCDATA
+#define Node_replaceChildWithNode EMBPERL2_Node_replaceChildWithNode
+#define Node_replaceChildWithUrlDATA EMBPERL2_Node_replaceChildWithUrlDATA
+#define Node_selfCloneNode EMBPERL2_Node_selfCloneNode
+#define Node_selfCondCloneNode EMBPERL2_Node_selfCondCloneNode
+#define Node_selfExpand EMBPERL2_Node_selfExpand
+#define Node_selfLastChild EMBPERL2_Node_selfLastChild
+#define Node_selfNextSibling EMBPERL2_Node_selfNextSibling
+#define Node_selfNthChild EMBPERL2_Node_selfNthChild
+#define Node_selfPreviousSibling EMBPERL2_Node_selfPreviousSibling
+#define Node_selfRemoveChild EMBPERL2_Node_selfRemoveChild
+#define Node_toString EMBPERL2_Node_toString
+#define Node_toString2 EMBPERL2_Node_toString2
+#define ParseFile EMBPERL2_ParseFile
+#define String2NdxInc EMBPERL2_String2NdxInc
+#define String2UniqueNdx EMBPERL2_String2UniqueNdx
+#define StringAdd EMBPERL2_StringAdd
+#define StringFree EMBPERL2_StringFree
+#define StringNew EMBPERL2_StringNew
+#define dom_free EMBPERL2_dom_free
+#define dom_malloc EMBPERL2_dom_malloc
+#define dom_realloc EMBPERL2_dom_realloc
+#define mydie EMBPERL2_mydie
+#define nCheckpointCache EMBPERL2_nCheckpointCache
+#define nCheckpointCacheMask EMBPERL2_nCheckpointCacheMask
+#define nInitialNodePadSize EMBPERL2_nInitialNodePadSize
+#define pDomTrees EMBPERL2_pDomTrees
+#define pFreeDomTrees EMBPERL2_pFreeDomTrees
+#define pStringTableArray EMBPERL2_pStringTableArray
+#define pStringTableHash EMBPERL2_pStringTableHash
+#define str_free EMBPERL2_str_free
+#define str_malloc EMBPERL2_str_malloc
+#define str_realloc EMBPERL2_str_realloc
+#define xCheckpointCache EMBPERL2_xCheckpointCache
+#define xDocument EMBPERL2_xDocument
+#define xDocumentFraq EMBPERL2_xDocumentFraq
+#define xDomTreeAttr EMBPERL2_xDomTreeAttr
+#define xNoName EMBPERL2_xNoName
+#define xOrderIndexAttr EMBPERL2_xOrderIndexAttr
+#define Escape EMBPERL2_Escape
#ifndef PERL_VERSION
1.70.4.129 +2 -2 embperl/test.pl
Index: test.pl
===================================================================
RCS file: /home/cvs/embperl/test.pl,v
retrieving revision 1.70.4.128
retrieving revision 1.70.4.129
diff -u -r1.70.4.128 -r1.70.4.129
--- test.pl 12 Mar 2002 08:58:44 -0000 1.70.4.128
+++ test.pl 12 Mar 2002 09:33:10 -0000 1.70.4.129
@@ -11,7 +11,7 @@
# IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
# WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
#
-# $Id: test.pl,v 1.70.4.128 2002/03/12 08:58:44 richter Exp $
+# $Id: test.pl,v 1.70.4.129 2002/03/12 09:33:10 richter Exp $
#
###################################################################################
@@ -2435,7 +2435,7 @@
}
}
- my $tries = ($opt_gdb || $opt_ddd)?20:10 ;
+ my $tries = ($opt_gdb || $opt_ddd)?30:10 ;
$httpdpid = 0 ;
my $herr = 0 ;
---------------------------------------------------------------------
To unsubscribe, e-mail: embperl-cvs-unsubscribe@perl.apache.org
For additional commands, e-mail: embperl-cvs-help@perl.apache.org