git.iko.soy/typeable/yaml
on master help sign in
Drop redundant fclose_helper call
e878addPaolo G. Giarrusso
Text/Libyaml.hs−1
compare with master
unifiedsplit
@@ -543,7 +543,6 @@ decodeFile file =
543 file' <- openFile file read_flags "r"
543 file' <- openFile file read_flags "r"
544 if file' == nullPtr
544 if file' == nullPtr
545 then do
545 then do
546− c_fclose_helper file'
547 c_yaml_parser_delete ptr
546 c_yaml_parser_delete ptr
548 free ptr
547 free ptr
549 throwIO $ YamlException
548 throwIO $ YamlException