src/Pure/System/build.ML
changeset 49242 e28b5d8f5613
parent 48927 ef462b5558eb
child 49911 262c36fd5f26
equal deleted inserted replaced
49241:fd11fe9dc6bb 49242:e28b5d8f5613
    69         map Present.read_variant (space_explode ":" (Options.string options "document_variants"));
    69         map Present.read_variant (space_explode ":" (Options.string options "document_variants"));
    70       val _ =
    70       val _ =
    71         (case duplicates (op =) (map fst document_variants) of
    71         (case duplicates (op =) (map fst document_variants) of
    72           [] => ()
    72           [] => ()
    73         | dups => error ("Duplicate document variants: " ^ commas_quote dups));
    73         | dups => error ("Duplicate document variants: " ^ commas_quote dups));
       
    74 
       
    75       val _ =
       
    76         if Options.string options "document_dump" = "" then ()
       
    77         else
       
    78           Output.physical_stderr
       
    79             "### Legacy feature: old option \"document_dump\" -- use \"document_output\" instead\n";
    74       val _ =
    80       val _ =
    75         Session.init do_output false
    81         Session.init do_output false
    76           (Options.bool options "browser_info") browser_info
    82           (Options.bool options "browser_info") browser_info
    77           (Options.string options "document")
    83           (Options.string options "document")
    78           (Options.bool options "document_graph")
    84           (Options.bool options "document_graph")