Fix tree operations of Ada.Tags to be tail recursion