Update do-db->lisp and reverse to be more generic