anchor.diff:        ("trivial_pre_for_unannotated_effectful_fns"
                                         , Bool true);
         ("profile_group_by_decl"        , Bool false);
  -      ("profile_phase"                , List []);
  -      ("profile_module"               , Unset);
  +      ("profile_component"            , Unset);
  +      ("profile"                      , Unset);
         ]
   
   let parse_warn_error_set_get =
  
positive.code:     | None -> false
      | Some (_, flag) -> flag
  
  
  let should_extract m =
      let m = String.lowercase m in
  
negative.code:          Const (Bool true),
          "Emit profiles grouped by declaration rather than by module");
  
         ( noshort,
          "profile_component",
           Accumulated (SimpleStr "One or more space-separated occurrences of '[+|-]( * | namespace | module | identifier)'"),
          "\n\t\nSpecific source locations in the compiler are instrumented with profiling counters.\n\t
            Pass `--profile_component FStar.TypeChecker` to enable all counters in the FStar.TypeChecker namespace.\n\t
            This option is a module or namespace selector, like many other options (e.g., `--extract`)");
  
         ( noshort,
           "profile",
           Accumulated (SimpleStr "One or more space-separated occurrences of '[+|-]( * | namespace | module)'"),
          "\n\t\nProfiling can be enabled when the compiler is processing a given set of source modules.\n\t
            Pass `--profile FStar.Pervasives` to enable profiling when the compiler is processing any module in FStar.Pervasives.\n\t
            This option is a module or namespace selector, like many other options (e.g., `--extract`)");
  
         ('h',
          "help", WithSideEffect ((fun _ -> display_usage_aux (specs ()); exit 0),
  