Parent Directory | Revision Log | Patch
revision 1.4 by mldonkey, Mon May 3 08:22:25 2004 UTC | revision 1.5 by spiralvoice, Thu Jul 7 00:25:46 2005 UTC | |
---|---|---|
# | Line 153 let parse_range range = | Line 153 let parse_range range = |
153 | ||
154 | let parse_range range = | let parse_range range = |
155 | let x, y, z = parse_range range in | let x, y, z = parse_range range in |
156 | lprintf "Range parsed: %Ld-%s/%s" x | if !verbose then lprintf "Range parsed: %Ld-%s/%s" x |
157 | (match y with None -> "" | Some y -> Int64.to_string y) | (match y with None -> "" | Some y -> Int64.to_string y) |
158 | (match z with None -> "*" | Some y -> Int64.to_string y); | (match z with None -> "*" | Some y -> Int64.to_string y); |
159 | x, y, z | x, y, z |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |