Gecko [ goons4good.org ]

Name	Size	Permission	Date
README	8.41 KB	-rw-r--r--	2013-01-02 20:45
README.prev	30.98 KB	-rw-r--r--	2013-01-01 15:37
calc-aent.elc	26.25 KB	-rw-r--r--	2023-06-07 04:11
calc-alg.elc	47.46 KB	-rw-r--r--	2023-06-07 04:11
calc-arith.elc	80.63 KB	-rw-r--r--	2023-06-07 04:11
calc-bin.elc	21.67 KB	-rw-r--r--	2023-06-07 04:11
calc-comb.elc	28.98 KB	-rw-r--r--	2023-06-07 04:11
calc-cplx.elc	8.44 KB	-rw-r--r--	2023-06-07 04:11
calc-embed.elc	29.32 KB	-rw-r--r--	2023-06-07 04:11
calc-ext.elc	107.11 KB	-rw-r--r--	2023-06-07 04:11
calc-fin.elc	11.78 KB	-rw-r--r--	2023-06-07 04:11
calc-forms.elc	47.54 KB	-rw-r--r--	2023-06-07 04:11
calc-frac.elc	6.07 KB	-rw-r--r--	2023-06-07 04:11
calc-funcs.elc	25.39 KB	-rw-r--r--	2023-06-07 04:11
calc-graph.elc	35.03 KB	-rw-r--r--	2023-06-07 04:11
calc-help.elc	20.46 KB	-rw-r--r--	2023-06-07 04:11
calc-incom.elc	5.22 KB	-rw-r--r--	2023-06-07 04:11
calc-keypd.elc	15.92 KB	-rw-r--r--	2023-06-07 04:11
calc-lang.elc	58.46 KB	-rw-r--r--	2023-06-07 04:11
calc-loaddefs.el	10.05 KB	-rw-r--r--	2023-06-07 04:00
calc-macs.elc	6.03 KB	-rw-r--r--	2023-06-07 04:11
calc-map.elc	28.51 KB	-rw-r--r--	2023-06-07 04:11
calc-math.elc	59.89 KB	-rw-r--r--	2023-06-07 04:11
calc-menu.elc	38.83 KB	-rw-r--r--	2023-06-07 04:11
calc-misc.elc	21.87 KB	-rw-r--r--	2023-06-07 04:11
calc-mode.elc	19.64 KB	-rw-r--r--	2023-06-07 04:11
calc-mtx.elc	6.91 KB	-rw-r--r--	2023-06-07 04:11
calc-nlfit.elc	13.37 KB	-rw-r--r--	2023-06-07 04:12
calc-poly.elc	24.29 KB	-rw-r--r--	2023-06-07 04:12
calc-prog.elc	50.68 KB	-rw-r--r--	2023-06-07 04:12
calc-rewr.elc	39.51 KB	-rw-r--r--	2023-06-07 04:12
calc-rules.elc	17.54 KB	-rw-r--r--	2023-06-07 04:12
calc-sel.elc	19.82 KB	-rw-r--r--	2023-06-07 04:12
calc-stat.elc	13.92 KB	-rw-r--r--	2023-06-07 04:12
calc-store.elc	16.85 KB	-rw-r--r--	2023-06-07 04:12
calc-stuff.elc	7.78 KB	-rw-r--r--	2023-06-07 04:12
calc-trail.elc	4.76 KB	-rw-r--r--	2023-06-07 04:12
calc-undo.elc	3.29 KB	-rw-r--r--	2023-06-07 04:12
calc-units.elc	52.73 KB	-rw-r--r--	2023-06-07 04:12
calc-vec.elc	37.74 KB	-rw-r--r--	2023-06-07 04:12
calc-yank.elc	16.59 KB	-rw-r--r--	2023-06-07 04:12
calc.elc	102.9 KB	-rw-r--r--	2023-06-07 04:12
calcalg2.elc	78.94 KB	-rw-r--r--	2023-06-07 04:12
calcalg3.elc	41.76 KB	-rw-r--r--	2023-06-07 04:12
calccomp.elc	33.11 KB	-rw-r--r--	2023-06-07 04:12
calcsel2.elc	5.98 KB	-rw-r--r--	2023-06-07 04:12

Rename

;ELC���
;;; Compiled by mockbuild@buildfarm06.corp.cloudlinux.com on Wed Jun  7 08:12:03 2023
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/calc/calc-undo.el
;;; in Emacs version 24.3.1
;;; 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!\207" [require calc-ext calc-macs] 2)
(defalias 'calc-undo #[(n) "\203�\302\303!\210	\304X\203�	\304W\203�\305	[!\207\306\307!\207\310\311!\207" [calc-executing-macro n error "Use C-x e, not X, to run a keyboard macro that uses Undo" 0 calc-redo calc-last-args 1 calc-do #[nil "S	\233\204�\304\305!\210	\233\n\306\307	\"\210))\310\311!\207" [n calc-undo-list calc-stack-top saved-stack-top error "No further undo information available" 0 calc-handle-undos message "Undo!"] 4]] 2 nil "p"])
(defalias 'calc-handle-undos #[(cl n) "\305V\205�	\306\307\f@!\210\310\n\")\311\fAS\"\207" [n calc-redo-list old-redo calc-undo-list cl 0 nil calc-handle-undo append calc-handle-undos] 3])
(defalias 'calc-handle-undo #[(list) "\205\266�@\211@\303=\203�\304\305	A@\306#\210\202\261�	@\307=\203,�\310\311	8	A@\"\210\202\261�	@\312=\203J�\313\312	A@	A@JE!\210	A@\311	8L\210\202\261�	@\314=\203\217�\315	A@!\313\314	A@\316\n!\205d�\nJE!\210\317\320\321\322	A@!\"!\203\213�\311	8\203\203�\n\311	8L\210\202\207�\323\n!\210\324\n!\210)\202\261�	@\325=\203\261�\313\326\325\311	8	A@E	AAA\"!\210\327	A@	AAA\"\210\330A!)\207" [list action v push calc-pop-stack 1 t pop calc-push-list 2 set calc-record-undo store intern boundp y-or-n-p format "Un-store variable %s? " calc-var-name makunbound calc-refresh-evaltos eval append apply calc-handle-undo] 6])
(defalias 'calc-redo #[(n) "\203�\302\303!\210	\304X\203�\305	[!\207\306\307!\207" [calc-executing-macro n error "Use C-x e, not X, to run a keyboard macro that uses Redo" 0 calc-undo calc-do #[nil "S	\233\204�\304\305!\210	\233\n\306\307	\"\210))\310\311!\207" [n calc-redo-list calc-stack-top saved-stack-top error "Unable to redo" 0 calc-handle-redos message "Redo!"] 4]] 2 nil "p"])
(defalias 'calc-handle-redos #[(cl n) "\304V\205�	\305\306@!\210\307	\n\")\310AS\"\207" [n calc-undo-list old-undo cl 0 nil calc-handle-undo append calc-handle-redos] 3])
(defalias 'calc-last-args #[(n) "\203�\301\302!\210\303\304!\207" [calc-executing-macro error "Use C-x e, not X, to run a keyboard macro that uses last-args" calc-do #[nil "\303	\"\211\203�\304\n!\202�\305\306!)\207" [calc-undo-list n urec calc-find-last-x calc-handle-last-x error "Not enough undo information available"] 4]] 2 nil "p"])
(defalias 'calc-handle-last-x #[(list) "\205�@\211@\302=\203�\303\304\305\306\307\310	8\"#\210\311A!)\207" [list action pop calc-pop-push-record-list 0 "larg" delq top-of-stack 2 calc-handle-last-x] 8])
(defalias 'calc-find-last-x #[(ul n) "\205 �\302@!\203�	\303X\203�@\207\304A	S\"\207\304A	\"\207" [ul n calc-undo-does-pushes 1 calc-find-last-x] 3])
(defalias 'calc-undo-does-pushes #[(list) "\205�@@\301=\206�\302A!\207" [list pop calc-undo-does-pushes] 2])
(provide 'calc-undo)