Function: SAVE-ROOTS-IF-NECESSARY

Source

(defun save-roots-if-necessary (rucksack)
  (when (roots-changed-p rucksack)
    (save-roots rucksack)))