Lines Matching refs:plain
35 (defun calc-show-plain (n)
39 (message (if (calc-change-mode 'calc-show-plain n nil t)
40 "Including \"plain\" formulas in Calc Embedded mode"
41 "Omitting \"plain\" formulas in Calc Embedded mode"))))
58 (defvar calc-embedded-open-plain)
59 (defvar calc-embedded-close-plain)
74 ("plain" . calc-show-plain)
270 (calc-plain-buffer-only)
418 (calc-plain-buffer-only)
446 (defun calc-plain-buffer-only ()
490 (defun calc-embedded-find-bounds (&optional plain)
512 (or (eq plain 'plain)
513 (if (looking-at (regexp-quote calc-embedded-open-plain))
516 (search-forward calc-embedded-close-plain))))
834 (newplain (assoc major-mode calc-embedded-open-close-plain-alist))
852 (make-local-variable 'calc-embedded-open-plain)
853 (make-local-variable 'calc-embedded-close-plain)
854 (setq calc-embedded-open-plain (nth 0 (cdr newplain)))
855 (setq calc-embedded-close-plain (nth 1 (cdr newplain))))
908 (calc-embedded-find-bounds 'plain))
910 (calc-embedded-find-bounds 'plain)))
935 (let* ((open-plain calc-embedded-open-plain)
936 (close-plain calc-embedded-close-plain)
937 (pref-len (length open-plain))
945 (equal (substring str 0 pref-len) open-plain)
946 (setq suff-pos (string-match (regexp-quote close-plain)
948 (setq val (math-read-plain-expr
1065 (open-plain calc-embedded-open-plain)
1066 (close-plain calc-embedded-close-plain)
1100 (and calc-show-plain
1101 (setq str (concat open-plain
1104 close-plain
1182 (if calc-show-plain
1213 (if calc-show-plain