anchor.diff:  -spec help_option(comp_option()) -> 'ok'.
   
   help_option(Opt) ->
  -  set_architecture([]), %% needed for target-specific option expansion
  -  case expand_options([Opt]) of
  +  HostArch = erlang:system_info(hipe_architecture),
  +  case expand_options([Opt], HostArch) of
       [Opt] ->
         Name = if is_atom(Opt) -> Opt;
   		tuple_size(Opt) =:= 2 -> element(1, Opt)
  
positive.code: %% Therefore, this expands the current set of options for local use.
  
  pre_init(Opts) ->
    Options = expand_options(Opts),
    %% Initialise some counters used for measurements and benchmarking. If
    %% the option 'measure_regalloc' is given the compilation will return
    %% a keylist with the counter values.
  
negative.code:       ?EXIT({executing_on_an_unsupported_architecture,Arch})
    end.
  
  o2_opts(TargetArch) ->
    Common = [icode_ssa_const_prop, icode_ssa_copy_prop, % icode_ssa_struct_reuse,
  	    icode_type, icode_inline_bifs, rtl_lcm,
  	    rtl_ssa, rtl_ssa_const_prop,
  	    spillmin_color, use_indexing, remove_comments,
  	    concurrent_comp, binary_opt | o1_opts(TargetArch)],
    case TargetArch of
      ultrasparc ->
        Common;
      powerpc ->
  