Function: ccl-dump-map-multiple

ccl-dump-map-multiple is a byte-compiled function defined in ccl.el.gz.

Signature

(ccl-dump-map-multiple RRR RRR RRR)

Source Code

;; Defined in /usr/src/emacs/lisp/international/ccl.el.gz
(defun ccl-dump-map-multiple (rrr RRR _Rrr)
  (let ((notbl (ccl-get-next-code))
	(i 0) id)
    (insert (format "map-multiple r%d r%d\n" RRR rrr))
    (insert (format "\tnumber of maps and separators is %d\n\t [" notbl))
    (while (< i notbl)
      (setq id (ccl-get-next-code))
      (if (= id -1)
	  (insert "]\n\t [")
	(insert (format "%S " id)))
      (setq i (1+ i)))
    (insert "]\n")))