anchor.diff:      Ctxt1 = reset_check_bracket(reset_prec(Ctxt)),
       Node1 = wrangler_syntax:compact_list(Node),
       PrefixElems = wrangler_syntax:list_prefix(Node1),
  -    Sep = get_separator(PrefixElems, Ctxt, ","),
  -    D0 = seq(PrefixElems, floating(text(Sep)), Ctxt1, fun lay/2),
  +    {Sep, SameLine} = get_separator(PrefixElems, Ctxt, ","),
  +    %% D0 = seq(PrefixElems, floating(text(Sep)), Ctxt1, fun lay/2),
  +    D0 = seq(PrefixElems,text(Sep), SameLine, Ctxt1, fun lay/2),
       D1 = lay_elems(fun wrangler_prettypr_0:par/1, D0, PrefixElems, Ctxt),
       {{StartLn, StartCol}, {EndLn, EndCol}} = get_start_end_loc(Node),
       {PrefixStart={PrefixStartLn, PrefixStartCol},
  
positive.code: 
  
  lay_type_0(T, Ctxt) -> 
     %% wrangler_io:format("T:\n~p\n", [T]),
      lay_type(T, Ctxt).
  
  lay_type({ann_type,_Line,[V,T]}, Ctxt) ->
  
negative.code: 
  		    
  get_separator(_NodeList, [], Default) ->
      {Default, true};
  get_separator([],_, Default) ->
      {Default, true};
  get_separator(NodeList, Ctxt, Default) when is_list(NodeList) -> 
      Toks = Ctxt#ctxt.tokens,
      NodeToks = get_node_toks(Toks,NodeList),
      {NodeListToks, SameLineAssoc} = 
          lists:unzip([get_node_toks_and_assoc(Toks, Elem)||
                          Elem<-NodeList]),
      SepToks = NodeToks -- lists:append(NodeListToks),
      case SepToks of 
          [] ->
              {Default, true};
  	_ ->
              AppendAfterCount = length([true||true <- SameLineAssoc]),
              AppendBeforeCount = length([false||false <- SameLineAssoc]),
              SameLine = AppendAfterCount >= AppendBeforeCount,
              case SameLine of 
                  false -> 
                      {",", SameLine};
                  true ->
                      {OnlyComma, CommaWithSpace} =get_comma_tokens(SepToks), 
                      case length(OnlyComma) >length(CommaWithSpace) of 
                          true ->
                              {",", SameLine};
                          false ->
                              {", ", SameLine}
                      end
              end
      end;
  get_separator(_Node, _Ctxt, Default) ->
      {Default, true}.
  
  get_node_toks(Toks, Node) ->
      {Start, End} = get_start_end_loc(Node),
  