Parent Directory | Revision Log | Patch
revision 1.1 by spiralvoice, Sat Jul 23 14:19:48 2005 UTC | revision 1.2 by spiralvoice, Mon Aug 1 20:09:13 2005 UTC | |
---|---|---|
# | Line 175 let close_out oz = | Line 175 let close_out oz = |
175 | flush oz; | flush oz; |
176 | Pervasives.close_out oz.out_chan | Pervasives.close_out oz.out_chan |
177 | ||
178 | let bzlib_version_num () = | |
179 | begin | |
180 | try | |
181 | let s = Printf.sprintf "%s" (Bzlib.bzlib_version ()) in s | |
182 | with e -> "" | |
183 | end |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |