anchor.diff:  	    [ordsets:from_list([verbose, debug, time, load, pp_beam,
   				pp_icode, pp_rtl, pp_native, pp_asm,
   				timeout]),
  -	     expand_options([pp_all]),
  +	     expand_options([pp_all], HostArch),
   	     O1 -- [o1],
   	     (O2 -- O1) -- [o2],
   	     (O3 -- O2) -- [o3]]),
  
positive.code: -spec help_options() -> 'ok'.
  
  help_options() ->
    set_architecture([]), %% needed for target-specific option expansion
    O1 = expand_options([o1]),
    O2 = expand_options([o2]),
    O3 = expand_options([o3]),
    io:format("HiPE Compiler Options\n" ++
  	    " Boolean-valued options generally have corresponding " ++
  	    "aliases `no_...',\n" ++
  
negative.code:      %% verbose_spills,
       x87].
  
  %% Definitions:
  
  o1_opts(TargetArch) ->
    Common = [inline_fp, pmatch, peephole],
    case TargetArch of
      ultrasparc ->
        Common;
      powerpc ->
  