Commit 0829ab94 authored by Taddeüs Kroes's avatar Taddeüs Kroes

Removed --keep-comments option (would make tokenization difficult)

parent c6447bc5
......@@ -6,7 +6,6 @@ type args = {
mutable outfile : string option;
mutable verbose : int;
mutable echo : bool;
mutable keep_comments : bool;
}
(* Parse command-line arguments *)
......@@ -16,7 +15,6 @@ let parse_args () =
outfile = None;
verbose = 1;
echo = false;
keep_comments = false;
} in
let args_spec = [
("<file> ...", Arg.Rest (fun _ -> ()),
......@@ -31,9 +29,6 @@ let parse_args () =
("--echo", Arg.Unit (fun _ -> args.echo <- true),
" Don't minify, just pretty-print the parsed CSS");
("--keep-comments", Arg.Unit (fun _ -> args.keep_comments <- true),
"\n Preserve top-level comments");
] in
let usage =
......
......@@ -130,8 +130,6 @@ let rec string_of_statement = function
| Supports (condition, statements) ->
"@supports " ^ stringify_condition " " condition ^
block (cat "\n\n" string_of_statement statements)
| Comment text ->
"/*" ^ text ^ "*/"
let string_of_stylesheet = cat "\n\n" string_of_statement
......
......@@ -50,8 +50,6 @@ type statement =
(* @keyframes <id> { <rulesets> } *)
| Supports of condition * statement list
(* @supports <condition> { <rulesets> } *)
| Comment of string
(* /* ... */ *)
type stylesheet = statement list
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment