Method: (SAVE-SCHEMA-TABLE-IF-NECESSARY SCHEMA-TABLE)

Source

(defmethod save-schema-table-if-necessary ((table schema-table))
  (when (dirty-p table)
    (save-schema-table table)))