diff --git a/gcc/cp/ChangeLog b/gcc/cp/ChangeLog
index 6b8af653807..f26a659df8e 100644
--- a/gcc/cp/ChangeLog
+++ b/gcc/cp/ChangeLog
@@ -1,3 +1,7 @@
+1999-09-20  Nathan Sidwell  <nathan@acm.org>
+
+	* parse.y (primary): Use build_functional_cast for CV_QUALIFIER.
+
 1999-09-20  Nick Clifton  <nickc@cygnus.com>
 
 	* decl2.c (lang_decode_option): Extend comment.
diff --git a/gcc/cp/parse.y b/gcc/cp/parse.y
index ae8849d1c85..ce697d44a13 100644
--- a/gcc/cp/parse.y
+++ b/gcc/cp/parse.y
@@ -1474,15 +1474,9 @@ primary:
 		     `const (3)' is equivalent to `const int (3)'.  */
 		  tree type;
 
-		  if ($3 == error_mark_node)
-		    {
-		      $$ = error_mark_node;
-		      break;
-		    }
-
-		  type = cp_build_qualified_type (integer_type_node,
-						  cp_type_qual_from_rid ($1));
-		  $$ = build_c_cast (type, build_compound_expr ($3));
+		  type = hash_tree_cons (NULL_TREE, $1, NULL_TREE);
+		  type = groktypename (build_decl_list (type, NULL_TREE));
+		  $$ = build_functional_cast (type, $3);
 		}
 	| functional_cast
 	| DYNAMIC_CAST '<' type_id '>' '(' expr ')'