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 2007/06/29 21:58:08 UTC
svn commit: r552015 - in /perl/embperl/trunk: Changes.pod epdom.c
Author: richter
Date: Fri Jun 29 12:58:07 2007
New Revision: 552015
URL: http://svn.apache.org/viewvc?view=rev&rev=552015
Log:
- Added internal check and error message when due to a syntax
error in the source a node is parsed as attribute.
Spotted by Kato M. Yoshiro.
Modified:
perl/embperl/trunk/Changes.pod
perl/embperl/trunk/epdom.c
Modified: perl/embperl/trunk/Changes.pod
URL: http://svn.apache.org/viewvc/perl/embperl/trunk/Changes.pod?view=diff&rev=552015&r1=552014&r2=552015
==============================================================================
--- perl/embperl/trunk/Changes.pod (original)
+++ perl/embperl/trunk/Changes.pod Fri Jun 29 12:58:07 2007
@@ -19,6 +19,9 @@
by Robert.
- Fixed missing Perl Stack setup which causes memory errors on
BSD systems. Patch from Doug Rayner.
+ - Added internal check and error message when due to a syntax
+ error in the source a node is parsed as attribute.
+ Spotted by Kato M. Yoshiro.
=head1 2.2.0 8. Apr. 2006
Modified: perl/embperl/trunk/epdom.c
URL: http://svn.apache.org/viewvc/perl/embperl/trunk/epdom.c?view=diff&rev=552015&r1=552014&r2=552015
==============================================================================
--- perl/embperl/trunk/epdom.c (original)
+++ perl/embperl/trunk/epdom.c Fri Jun 29 12:58:07 2007
@@ -2432,6 +2432,9 @@
ASSERT_NODE_VALID(a,pNode) ;
+ if ((pNode -> nType & 0x1f) == ntypAttr)
+ mydie (a, "Node expected, but Attribute found. Maybe unclosed quote?") ;
+
if (pNode -> xDomTree == pDomTree -> xNdx && pNode -> nRepeatLevel == nRepeatLevel)
return pNode ;
---------------------------------------------------------------------
To unsubscribe, e-mail: embperl-cvs-unsubscribe@perl.apache.org
For additional commands, e-mail: embperl-cvs-help@perl.apache.org