Thank you for the information,
Ella
On Thu, Jul 15, 2010 at 4:27 PM, Eduardo Fernandes
<modals...@yahoo.com.br>wrote:
> Ella
>
> I have problems with last hbxml.c file, v 1.40. I'm using previous 1.39
>
> regards,
> Eduardo
>
> --- Em *qui, 15/7/10, Ella Stern <ella.st...@xharbour.com>* escreveu:
>
>
> De: Ella Stern <ella.st...@xharbour.com>
> Assunto: [xHarbour-developers] TXMLDocument causes EXE hung up
> Para: "xharbour developer list" <xharbour-developers@lists.sourceforge.net
> >
> Data: Quinta-feira, 15 de Julho de 2010, 6:29
>
>
> I've modified xmltest.prg found at
> http://xharbour.cvs.sourceforge.net/viewvc/xharbour/xharbour/tests/xmltest/
> and I've used for testing the xmltest.xml file found at the same
> location.
>
> Here is my test code:
>
>
> #include "hbxml.ch"
> PROCEDURE Main()
> local i, cXml, cFileName:="xmltest.xml"
> // local oDoc, oNode
> SET EXACT OFF
> CLS
> if !file( cFileName )
> wait "File not found..."
> RETURN
> ENDIF
> for i:=1 to 30
> oDoc := TXmlDocument():New( cFileName )
> oNode := oDoc:CurNode
> IF oDoc:nStatus != HBXML_STATUS_OK
> wait "Error while reading file..."
> RETURN
> else
> ? "read ok"
> ENDIF
> cXml := oDoc:ToString( HBXML_STYLE_NOINDENT )
> ? cXml
> ? "@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@"
> wait str(i) + " Continue..."
>
> next
> RETURN
>
>
> [1] When running the test on my XP Pro SP3, after a number of loops (
> usually less then 10 ) the executable do hung up, and in most cases I get
> the below error message on the screen:
>
> Unrecoverable error 9027: Premature String Release detected: 'xml'
> Called from Inkey(0)
> Called from __WAIT(64)
> Called from MAIN(30)
>
>
> [2] When running the test on my Vista Basic, after a number of loops (
> less then 10 ) I get the generic error message "text.exe has stopped
> working..."
>
>
> Here is my .exe.log file geberated by xBuilder:
>
>
> Type: C >>>xhb.exe -o"tst.c" -m -n -p -q -gc0 -I"C:\xHB\include"
> -I"C:\xHB\include\w32" "tst.prg"<<<
> xHarbour Compiler build 1.2.1 (SimpLex) (Rev. 6715)
> Copyright 1999-2010, http://www.xharbour.org
> http://www.harbour-project.org/
> Generating object output to 'tst.obj'...
> Type: C >>>xlink.exe -NOEXPOBJ -MAP -FORCE:MULTIPLE -NOIMPLIB
> -subsystem:console -LIBPATH:"C:\xHB\lib" -LIBPATH:"C:\xHB\c_lib"
> -LIBPATH:"C:\xHB\c_lib\win" "tst.obj" "xhb.lib" "dbf.lib" "nsx.lib"
> "ntx.lib" "cdx.lib" "rmdbfcdx.lib" "ct3comm.lib" crt.lib kernel32.lib
> user32.lib winspool.lib ole32.lib oleaut32.lib odbc32.lib odbccp32.lib
> uuid.lib wsock32.lib ws2_32.lib wininet.lib advapi32.lib shlwapi.lib
> msimg32.lib mpr.lib OleDlg.lib version.lib -out:"tst.exe"<<<
>
>
> Ella
>
>
> -----Anexo incorporado-----
>
>
>
> ------------------------------------------------------------------------------
> This SF.net email is sponsored by Sprint
> What will you do first with EVO, the first 4G phone?
> Visit sprint.com/first -- http://p.sf.net/sfu/sprint-com-first
>
> -----Anexo incorporado-----
>
>
> _______________________________________________
> xHarbour-developers mailing list
> xHarbour-developers@lists.sourceforge.net<http://mc/compose?to=xharbour-develop...@lists.sourceforge.net>
> https://lists.sourceforge.net/lists/listinfo/xharbour-developers
>
>
>
------------------------------------------------------------------------------
This SF.net email is sponsored by Sprint
What will you do first with EVO, the first 4G phone?
Visit sprint.com/first -- http://p.sf.net/sfu/sprint-com-first
_______________________________________________
xHarbour-developers mailing list
xHarbour-developers@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/xharbour-developers
