anchor.diff:                            to           = From,
                             label        = Label,
                             contents     = [{label, Label},
  -					  {detail_level, DetailLevel},
  -					  {from, From},
  -					  {to, From},
  -					  {gc_items, GcKeyValueList}]}};
  +                                          {detail_level, DetailLevel},
  +                                          {from, From},
  +                                          {to, From},
  +                                          {gc_items, GcKeyValueList}]}};
  +        gc_major_start ->
  +            DetailLevel = 80,
  +            [GcKeyValueList] = Contents,
  +            {true, #event{detail_level = DetailLevel,
  +                          trace_ts     = ReportedTS,
  +                          event_ts     = ParsedTS,
  +                          from         = From,
  +                          to           = From,
  +                          label        = Label,
  +                          contents     = [{label, Label},
  +                                          {detail_level, DetailLevel},
  +                                          {from, From},
  +                                          {to, From},
  +                                          {gc_items, GcKeyValueList}]}};
  +        gc_major_end ->
  +            DetailLevel = 85,
  +            [GcKeyValueList] = Contents,
  +            {true, #event{detail_level = DetailLevel,
  +                          trace_ts     = ReportedTS,
  +                          event_ts     = ParsedTS,
  +                          from         = From,
  +                          to           = From,
  +                          label        = Label,
  +                          contents     = [{label, Label},
  +                                          {detail_level, DetailLevel},
  +                                          {from, From},
  +                                          {to, From},
  +                                          {gc_items, GcKeyValueList}]}};
           _ ->
               error_logger:format("~p(~p): Ignoring unknown trace type -> ~p~n~n",
                                   [?MODULE, ?LINE, Trace]),
  
positive.code: 
  -module(et_selector).
  
  -export([
           make_pattern/1, 
           change_pattern/1,
           parse_event/2
          ]).
  
  -compile([{nowarn_deprecated_function,[{erlang,now,0}]}]).
  
  
negative.code: 					  {from, From},
  					  {to, From},
  					  {gc_items, GcKeyValueList}]}};
          gc_minor_end ->
              DetailLevel = 85,
              [GcKeyValueList] = Contents,
              {true, #event{detail_level = DetailLevel,
  