Fix isClosingFileOp (fixes issue #862)

The isClosingFileOp function expected closing file ops to use T_IoFile, but
they actually use T_IoDuplicate; so it effectively always returned False.
This commit is contained in:
Luke Shumaker 2017-11-05 18:35:50 -05:00
parent 102683ab04
commit df068bc8ed
2 changed files with 3 additions and 2 deletions

View file

@ -487,8 +487,8 @@ getModifiedVariables t =
isClosingFileOp op =
case op of
T_IoFile _ (T_GREATAND _) (T_NormalWord _ [T_Literal _ "-"]) -> True
T_IoFile _ (T_LESSAND _) (T_NormalWord _ [T_Literal _ "-"]) -> True
T_IoDuplicate _ (T_GREATAND _) "-" -> True
T_IoDuplicate _ (T_LESSAND _) "-" -> True
_ -> False