Add support for Chill bitstring literals (e.h. H'FF00').

* ch-exp.y (match_bitstring_literal):  Fix for proper endianness.
	* expprint.c (print_subexp):  Don't call error on OP_BITSTRING,
	just print B'<unimlemented>'.
	* gdbtypes.c (create_set_type):  Fix bug in length calculation.
	* valops.c, value.h (value_bitstring):  New function.
	* eval.c (evaluate_subexp):  Implement support for OP_BITSTRING.

	* ch-typeprint.c (chill_type_print_base): For TYPE_CODE_FUNC,
	check that return type is non-void, and print in proper Chill syntax.
This commit is contained in:
Per Bothner
1995-01-23 21:20:58 +00:00
parent ce51845b10
commit 6d34c23688
7 changed files with 92 additions and 28 deletions

View File

@ -166,7 +166,12 @@ chill_type_print_base (type, stream, show, level)
break;
case TYPE_CODE_FUNC:
fprintf_filtered (stream, "PROC (?)");
chill_type_print_base (TYPE_TARGET_TYPE (type), stream, show, level);
if (TYPE_CODE (TYPE_TARGET_TYPE (type)) != TYPE_CODE_VOID)
{
fputs_filtered (" RETURNS (", stream);
chill_type_print_base (TYPE_TARGET_TYPE (type), stream, show, level);
fputs_filtered (")", stream);
}
break;
case TYPE_CODE_STRUCT: