Lines Matching +defs:save +defs:point
149 (defun calc-point-char (ch)
150 (interactive "cCharacter to use as decimal point: ")
153 (error "Control characters not allowed as decimal point"))
154 (calc-change-mode 'calc-point-char (char-to-string ch) t)
155 (message "Decimal point character is \"%c\"" ch)))
169 (message "Displaying floating-point numbers normally")
172 "Displaying floating-point numbers with %d significant digits"
174 (message "Displaying floating-point numbers with (precision%d)"
178 (interactive "NDigits after decimal point: ")
236 (max 1 (calc-locate-cursor-element (point)))))
267 (defun calc-save-modes ()
277 (goto-char (point-min))
281 (setq pos (point))
286 (delete-region pos (point)))
287 (goto-char (point-max))
306 (run-hooks 'calc-mode-save-hook)
308 (save-buffer)
310 (calc-embedded-save-original-modes)))))
395 (calc-change-mode 'calc-mode-save-mode
398 (if (eq calc-mode-save-mode 'save)
399 'local 'save))
400 ((eq calc-mode-save-mode 'local) 'edit)
401 ((eq calc-mode-save-mode 'edit) 'perm)
402 ((eq calc-mode-save-mode 'perm) 'global)
403 ((eq calc-mode-save-mode 'global) 'save)
404 ((eq calc-mode-save-mode 'save) nil)
405 ((eq calc-mode-save-mode nil) 'local)))
410 ((= n 5) 'save)
413 (cond ((and (eq calc-mode-save-mode 'local) calc-embedded-info)
415 ((eq calc-mode-save-mode 'edit)
417 ((eq calc-mode-save-mode 'perm)
419 ((eq calc-mode-save-mode 'global)
421 ((eq calc-mode-save-mode 'save)