anchor.diff:      "p" -> print(Eed, NewRange, RangeGiven);
       "a" -> append(Eed, NewRange, RangeGiven);
       "d" -> delete(Eed, NewRange, RangeGiven);
  -    "+" -> incLine(Eed, NewRange, RangeGiven);
  -    "-" -> decLine(Eed, NewRange, RangeGiven);
  -    _ -> noCmd(Eed, NewRange, RangeGiven)
  +    "" -> noCmd(Eed, NewRange, RangeGiven)
     end.
   
   cmdloop(Eed) ->
  
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: 
  noCmd(Eed, Range, false) ->
    incLine(Eed, Range, false);
  noCmd(Eed, Range, RangeGiven) ->
    print(Eed, Range, RangeGiven).
  
  quit(_Eed, _Range, false) ->
    {quit, ""};
  