anchor.diff:  %%%===================================================================
   
   
  +count_brackets([], 
  +	       #pst { 
  +		  buffer = [], 
  +		  balance = start } = PSt)  ->
  +    { incomplete, PSt#pst {}};
  +
  +count_brackets([], 
  +	       #pst { 
  +		  buffer = Buffer, 
  +		  balance = start } = PSt)  ->
  +    count_brackets(Buffer, 
  +		   PSt#pst { 
  +		     buffer = [], 
  +		     balance = start } );
   count_brackets([${ | Rem], 
   	       #pst { 
   		  buffer = Buffer, 
  
positive.code: 			  buffer = [ C | Buffer ],
  			  escaped = false
  			 } ).
  
negative.code: 
      { complete, lists:reverse(Buffer), 
        PSt#pst {
  	buffer = Rem,
  	balance = start
         } 
      };
  