* expression.h (enum exp_opcode): Document OP_COMPLEX to take

a type parameter as expression element.
	* eval.c (evaluate_subexp_standard) [OP_COMPLEX]: Retrieve result
	type as expression element.
	* f-exp.y: Pass in type when buildin OP_COMPLEX expression.
	* parse.c (operator_length_standard): Update length of OP_COMPLEX.
This commit is contained in:
Ulrich Weigand
2008-09-11 14:12:15 +00:00
parent fbb06eb1ba
commit c806c55a06
5 changed files with 18 additions and 5 deletions

View File

@ -193,8 +193,9 @@ enum exp_opcode
indicates that we have found something of the form <name> ( <stuff> ) */
OP_F77_UNDETERMINED_ARGLIST,
/* The following OP is a special one, it introduces a F77 complex
literal. It is followed by exactly two args that are doubles. */
/* OP_COMPLEX takes a type in the following element, followed by another
OP_COMPLEX, making three exp_elements. It is followed by two double
args, and converts them into a complex number of the given type. */
OP_COMPLEX,
/* OP_STRING represents a string constant.