Function: ccl-compile-repeat

ccl-compile-repeat is a byte-compiled function defined in ccl.el.gz.

Signature

(ccl-compile-repeat CMD)

Documentation

Compile REPEAT statement.

Source Code

;; Defined in /usr/src/emacs/lisp/international/ccl.el.gz
(defun ccl-compile-repeat (cmd)
  "Compile REPEAT statement."
  (if (/= (length cmd) 1)
      (error "CCL: Invalid number of arguments: %s" cmd))
  (if (null ccl-loop-head)
      (error "CCL: No outer loop: %s" cmd))
  (ccl-embed-code 'jump 0 ccl-loop-head)
  t)