diff options
| author | Sergey Poznyakoff <gray@gnu.org> | 2015-11-25 16:03:13 +0200 |
|---|---|---|
| committer | Sergey Poznyakoff <gray@gnu.org> | 2015-11-25 16:03:13 +0200 |
| commit | 27ac5a32a7ca4cddacce307c586830fbb877b4ce (patch) | |
| tree | 9d6e65df2ed55d3363b10888a8ff428e6ca3b09f | |
| parent | 09b569b0137960070cb9923b70dfeec47a804079 (diff) | |
| download | grecs-27ac5a32a7ca4cddacce307c586830fbb877b4ce.tar.gz grecs-27ac5a32a7ca4cddacce307c586830fbb877b4ce.tar.bz2 | |
Fix descriptor leak
* src/grecs-lex.l (yywrap): Close yyin.
| -rw-r--r-- | src/grecs-lex.l | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/grecs-lex.l b/src/grecs-lex.l index ce55aeb..15d5e9b 100644 --- a/src/grecs-lex.l +++ b/src/grecs-lex.l @@ -187,9 +187,10 @@ pid_t grecs_preproc_pid; int yywrap() { - if (yyin) + if (yyin) { grecs_preproc_extrn_shutdown(grecs_preproc_pid); - else + fclose(yyin); + } else grecs_preproc_done(); grecs_current_locus_point.file = NULL; return 1; |