2007-03-16  Tobias Burnus  <burnus@net-b.de>

       * trans-decl.c (gfc_generate_function_code): Use all arguments of
         set_std.

From-SVN: r122981