anchor.diff:  
   noCmd(Eed, Range, false) ->
     incLine(Eed, Range, false);
  -noCmd(Eed, {A, E}, RangeGiven) ->
  -  print(Eed, {A, E}, RangeGiven).
  +noCmd(Eed, Range, RangeGiven) ->
  +  print(Eed, Range, RangeGiven).
   
   quit(_Eed, _Range, false) ->
     {quit, ""};
  
positive.code: 
  commandSplit(Command) ->
  % [address [,address]]command[parameters] - from GNU Ed Manual
    {match,R} = re:run(Command,"([[:digit:].$]*)(,?)([[:digit:].$]*)([[:alpha:]+-]?)",[global,{capture,all_but_first,list}]),
    [A,C,E,O] = hd(R),
    {A,C,E,O}.
  
  
negative.code:   sendRecv(Eed, getLineNumber);
  getLineRef(Eed, "$") ->
    sendRecv(Eed, lineCount);
  getLineRef(Eed, [$+]) ->
    sendRecv(Eed, getLineNumber) + 1;
  getLineRef(Eed, [$+ | Num]) ->
    sendRecv(Eed, getLineNumber) + getnum(Num);
  getLineRef(Eed, [$-]) ->
    sendRecv(Eed, getLineNumber) - 1;
  getLineRef(Eed, [$- | Num]) ->
    sendRecv(Eed, getLineNumber) - getnum(Num);
  getLineRef(_Eed, Num) ->
    getnum(Num).
  
  