*** empty log message ***

[binutils.git] / gdb / f-exp.y

diff --git a/gdb/f-exp.y b/gdb/f-exp.y
index 56fd70af954871ff8f1b5143e53b2132be0e937e..69662310e1de9f4084860ea259e965f13fd650c7 100644 (file)
--- a/gdb/f-exp.y
+++ b/gdb/f-exp.y
@@ -564,7 +564,7 @@ direct_abs_decl: '(' abs_decl ')'
 func_mod:      '(' ')'
                        { $$ = 0; }
        |       '(' nonempty_typelist ')'
-                       { free ((PTR)$2); $$ = 0; }
+                       { free ($2); $$ = 0; }
        ;
 
 typebase  /* Implements (approximately): (type-qualifier)* type-specifier */