SICS-776 Close the anti-collider file

This commit is contained in:
Douglas Clowes
2014-09-12 10:35:33 +10:00
parent 00f4dfe588
commit e8ec81ad5d

View File

@ -45,6 +45,7 @@ proc handle_acscript_exception {status message args} {
proc ::anticollider::loadscript {args} {
variable veto_rules
catch {
set fh [open $::cfPath(anticollider)/[lindex $args 0] RDONLY ]
while {[gets $fh line] >= 0} {
# Skip empty lines and comments
@ -54,6 +55,10 @@ proc ::anticollider::loadscript {args} {
lappend veto_rules $line
}
}
catch {
close $fh
}
}
##
# @brief Compile compile an anticollider declaration into a veto region table