Common helper for ad hoc debugging. Don't use them inside production code.

val print_all_handles : file -> Int_result.unit

Prints all handles associated with the given loop to the given stream.

val print_active_handles : file -> Int_result.unit

This is the same as print_all_handles except only active handles are printed.