diff --git a/parser.c b/parser.c
index a10b3e3..75d2221 100644
--- a/parser.c
+++ b/parser.c
@@ -2297,7 +2297,7 @@
     xmlChar *ret = NULL;
     SHRINK;
     GROW;
-    in = CUR_PTR;
+    in = (xmlChar *) CUR_PTR;
     if (*in != '"' && *in != '\'') {
       ctxt->errNo = XML_ERR_ATTRIBUTE_NOT_STARTED;
       if ((ctxt->sax != NULL) && (ctxt->sax->error != NULL))
@@ -4405,15 +4405,6 @@
 }
 
 /**
- * xmlParseElementChildrenContentD:
- * @ctxt:  an XML parser context
- *
- * VMS version of xmlParseElementChildrenContentDecl()
- *
- * Returns the tree of xmlElementContentPtr describing the element 
- *          hierarchy.
- */
-/**
  * xmlParseElementChildrenContentDecl:
  * @ctxt:  an XML parser context
  *
@@ -4444,11 +4435,7 @@
  *          hierarchy.
  */
 xmlElementContentPtr
-#ifdef VMS
-xmlParseElementChildrenContentD
-#else
 xmlParseElementChildrenContentDecl
-#endif
 (xmlParserCtxtPtr ctxt, xmlParserInputPtr inputchk) {
     xmlElementContentPtr ret = NULL, cur = NULL, last = NULL, op = NULL;
     xmlChar *elem;