X-Git-Url: http://git.sourceforge.jp/view?a=blobdiff_plain;f=gcc%2Ffortran%2Fparse.h;h=b18056c1cd7550b00d3e23ff2c222acdc6b2849d;hb=3b22926a09697ed1a69b8b0b28c9e95e806626f6;hp=65d1a7e604a8f80e1c2323d6aa289f992d79b02d;hpb=d18a512a42d8072efb8b9f2bb82ea97536b4cea3;p=pf3gnuchains%2Fgcc-fork.git

diff --git a/gcc/fortran/parse.h b/gcc/fortran/parse.h
index 65d1a7e604a..b18056c1cd7 100644
--- a/gcc/fortran/parse.h
+++ b/gcc/fortran/parse.h
@@ -42,6 +42,7 @@ typedef struct gfc_state_data
   gfc_symbol *sym;              /* Block name associated with this level */
   gfc_symtree *do_variable;     /* For DO blocks the iterator variable.  */
 
+  struct gfc_code *construct;
   struct gfc_code *head, *tail;
   struct gfc_state_data *previous;
 
@@ -68,5 +69,4 @@ match gfc_match_enumerator_def (void);
 void gfc_free_enum_history (void);
 extern bool gfc_matching_function;
 match gfc_match_prefix (gfc_typespec *);
-gfc_namespace* gfc_build_block_ns (gfc_namespace *);
 #endif  /* GFC_PARSE_H  */