Fix 2000-03-09 breakage gcc/f/com.c

[Alan Modra]

This one was missing from the
2000-03-09  Jason Merrill  <jason@casey.cygnus.com>
        * tree.h (struct tree_common): Rename raises_flag to nothrow_flag.
        (TREE_NOTHROW): Rename from TREE_RAISES.
change.

--- gcc/f/com.c~	Fri Mar 10 12:08:49 2000
+++ gcc/f/com.c	Fri Mar 10 19:17:01 2000
@@ -1095,7 +1095,7 @@
   TREE_READONLY (result) = TREE_READONLY (ref);
   TREE_SIDE_EFFECTS (result) = TREE_SIDE_EFFECTS (ref);
   TREE_THIS_VOLATILE (result) = TREE_THIS_VOLATILE (ref);
-  TREE_RAISES (result) = TREE_RAISES (ref);
+  TREE_NOTHROW (result) = TREE_NOTHROW (ref);
 
   return result;
 }