Commit de37af8c by Tobias Schlüter Committed by Tobias Schlüter

resolve.c (merge_argument_lists): Revert unintentionally committed change.

* resolve.c (merge_argument_lists): Revert unintentionally
committed change.

From-SVN: r86498
parent 7be7d41b
2004-08-24 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de> 2004-08-24 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
* resolve.c (merge_argument_lists): Revert unintentionally
committed change.
2004-08-24 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
* trans-decl.c (build_function_decl): Fix spelling in comment. * trans-decl.c (build_function_decl): Fix spelling in comment.
(build_entry_thunks): Remove code with no function. (build_entry_thunks): Remove code with no function.
(gfc_build_intrinsic_function_decls): Remove empty line. (gfc_build_intrinsic_function_decls): Remove empty line.
......
...@@ -312,10 +312,6 @@ merge_argument_lists (gfc_symbol *proc, gfc_formal_arglist *new_args) ...@@ -312,10 +312,6 @@ merge_argument_lists (gfc_symbol *proc, gfc_formal_arglist *new_args)
/* Add a new argument. Argument order is not important. */ /* Add a new argument. Argument order is not important. */
new_arglist = gfc_get_formal_arglist (); new_arglist = gfc_get_formal_arglist ();
new_arglist->sym = new_sym; new_arglist->sym = new_sym;
/* We mark all arguments as optional, since in the common case
only a subset of the arguments will be present. This avoids
having to special case arguments of master functions later on. */
new_arglist->sym->attr.optional = 1;
new_arglist->next = proc->formal; new_arglist->next = proc->formal;
proc->formal = new_arglist; proc->formal = new_arglist;
} }
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment