X-Git-Url: http://drtracing.org/?a=blobdiff_plain;f=gdb%2Ff-lang.c;h=022918efa2d928fdfbf87a354d596adad3f671bc;hb=401e101e0274d401e90e50cd8280a9ff36006477;hp=fd4ad0f1411bcba917a01d8ea5c765473efbe2e0;hpb=34877895ca38f74ae31bd65a6916560020d9d62b;p=deliverable%2Fbinutils-gdb.git

diff --git a/gdb/f-lang.c b/gdb/f-lang.c
index fd4ad0f141..022918efa2 100644
--- a/gdb/f-lang.c
+++ b/gdb/f-lang.c
@@ -243,7 +243,8 @@ f_collect_symbol_completion_matches (completion_tracker &tracker,
 }
 
 /* Special expression evaluation cases for Fortran.  */
-struct value *
+
+static struct value *
 evaluate_subexp_f (struct type *expect_type, struct expression *exp,
 		   int *pos, enum noside noside)
 {