Update g_file_utility.tcl