;ELC ;;; Compiled ;;; in Emacs version 26.3 ;;; with all optimizations. ;;; This file uses dynamic docstrings, first added in Emacs 19.29. ;;; This file does not contain utf-8 non-ASCII characters, ;;; and so can be loaded in Emacs versions earlier than 23. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (byte-code "\300\301!\210\300\302!\210\300\303!\210\304\305\306\307!\"\210\304\310\311\307!\"\210\304\312\310\"\210\313\312\314\315#\210\316\307\317\310#\320\307\321\322\323$\207" [require cl-generic eieio rudel-operations defalias jupiter-operation-p eieio-make-class-predicate jupiter-operation jupiter-operation--eieio-childp eieio-make-child-predicate jupiter-operation-child-p make-obsolete "use (cl-typep ... \\='jupiter-operation) instead" "25.1" define-symbol-prop cl-deftype-satisfies eieio-defclass-internal (rudel-operation) nil (:documentation "Objects of derived classes represent operations, which change documents.\nObjects can transform each other to produce sequences of\noperations, which produce identical changes than permutations of\nthe same operations." :abstract t)] 6) #@75 You cannot create a new object of type `jupiter-operation'. (fn &rest _) (defalias 'jupiter-operation #[128 "\300\301!\207" [error "Class jupiter-operation is abstract"] 3 (#$ . 1202)]) (byte-code "\300\301\302\301\303\304#\305#\210\306\307!\207" [defalias jupiter-transform cl-generic-define ((this jupiter-operation) other) nil "Transform OTHER such that the effect of applying it after THIS are equal to applying OTHER before THIS unmodified.\nIn general, OTHER is destructively modified or replaced.\n\n(fn (this jupiter-operation) OTHER)" provide jupiter-operation] 6)