correct UAT 563

gcc/cobol/UAT/testsuite.src/syn_misc.at

@@ -833,7 +833,7 @@ No BANANA here.
 prog.cob:9:20: error: name already in dictionary: X
     9 |          >> DEFINE X 1
       |                    ^
-prog.cob:9:20: error: X previously defined in :1
+prog.cob:9:20: error: X was defined on the command line
 prog.cob:10:1: error: syntax error, unexpected invalid token
    10 |        >> END-IF
       | ^

gcc/cobol/cdf.y

@@ -378,9 +378,12 @@ cdf_define:	CDF_DEFINE cdf_constant NAME as cdf_expr[value] override
 		  if( !cdfval_add( $NAME, cdfval_t($value), $override) ) {
 		    error_msg(@NAME, "name already in dictionary: %s", $NAME);
 		    const cdfval_t& entry = dictionary[$NAME];
-		    assert(entry.filename);
-		    error_msg(@NAME, "%s previously defined in %s:%d",
-		             $NAME, entry.filename, entry.lineno);
+		    if( entry.filename ) {
+		      error_msg(@NAME, "%s previously defined in %s:%d",
+				$NAME, entry.filename, entry.lineno);
+		    } else {
+		      error_msg(@NAME, "%s was defined on the command line", $NAME);
+		    }
 		    YYERROR;
 		  }
 		}