Function: LOAD-OBJECT-FIELDS

Documentation

Returns id, nr-slots, schema-id, transaction-id and prev-version (as 5 values).

Source

(defun load-object-fields (buffer object-id)
  "Returns id, nr-slots, schema-id, transaction-id and prev-version
(as 5 values)."
  (let ((prev-version (deserialize buffer))
        (transaction-id (deserialize buffer))
        (id (deserialize buffer))
        (nr-slots (deserialize buffer))
        (schema-id (deserialize buffer)))
    (unless (= id object-id)
      (internal-rucksack-error "Object-id mismatch (required: ~D; actual: ~D)."
                               object-id id))
    (values id nr-slots schema-id transaction-id prev-version)))