Function: frameset-valid-p

frameset-valid-p is a byte-compiled function defined in frameset.el.gz.

Signature

(frameset-valid-p OBJECT)

Documentation

Return non-nil if OBJECT is a valid frameset, nil otherwise.

Source Code

;; Defined in /usr/src/emacs/lisp/frameset.el.gz
(defun frameset-valid-p (object)
  "Return non-nil if OBJECT is a valid frameset, nil otherwise."
  (and (frameset-p object)
       (integerp (frameset-version object))
       (consp (frameset-timestamp object))
       (let ((app (frameset-app object)))
	 (or (null app)                   ; APP is nil
	     (symbolp app)                ; or a symbol
	     (and (consp app)             ; or a list
		  (symbolp (car app)))))  ; starting with a symbol
       (stringp (or (frameset-name object) ""))
       (stringp (or (frameset-description object) ""))
       (listp (frameset-properties object))
       (let ((states (frameset-states object)))
         (and (listp states)
              (cl-every #'consp (frameset-states object))))
       (frameset-version object)))        ; And VERSION is non-nil.