anchor.diff:  		    ok
   	    end,
   	    St1#state{print=false};
  -	St1 when record(St1, state) ->
  +	St1 when is_record(St1, state) ->
   	    St1
       end.
   
  
positive.code:     case parse_command(Cmd, St) of
  	quit ->
  	    quit;
  	St1 when function(St1#state.print) ->
  	    if
  		St1#state.dot /= 0 ->
  		    print_current(St1);
  
negative.code: 
  %% (1,$)w - write buffer to file
  
  write_command(_Cmd, [_First, _Last], _St) ->
      error(not_implemented).
      
  