method
cvs_tags_file file =
try
Ocvs_commands
.tags_file file
with
CvsFailure
s
->
raise (
Failure
s)