anchor.diff:  			print(P,"Unrecognized command. ~p",[P#dp.curdb])
   	end.
   
  -cmd_show(#dp{curdb = actordb} = P,_R) ->
  -	P;
  -cmd_show(P,_R) ->
  -	P.
  +% cmd_show(#dp{curdb = actordb} = P,_R) ->
  +% 	P;
  +% cmd_show(P,_R) ->
  +% 	P.
   
   append(P,<<>>) ->
   	P;
  
positive.code: 				_ ->
  					print(P,"Invalid db")
  			end;
  		print ->
  			print(P,io_lib:fwrite("~s",[butil:iolist_join(lists:reverse(P#dp.buffer),"\n")]));
  		rollback ->
  
negative.code: "h            print this header\n"++
  "commit (c)   execute transaction\n"++
  "rollback (r) abort transaction\n"++
  "print (p)    print transaction\n"
  "show (s)     show schema\n"++delim()).
  
  delim() ->
  	"*******************************************************************\n".
  