Function: calendar-mayan-string-from-long-count

calendar-mayan-string-from-long-count is a byte-compiled function defined in cal-mayan.el.gz.

Signature

(calendar-mayan-string-from-long-count STR)

Documentation

Given STR, a string of format "%d.%d.%d.%d.%d", return list of numbers.

Source Code

;; Defined in /usr/src/emacs/lisp/calendar/cal-mayan.el.gz
(defun calendar-mayan-string-from-long-count (str)
  "Given STR, a string of format \"%d.%d.%d.%d.%d\", return list of numbers."
  (let ((end 0)
        rlc)
    (condition-case nil
        (progn
          ;; cf split-string.
          (while (string-match "[0-9]+" str end)
            (setq rlc (cons (string-to-number (match-string 0 str)) rlc)
                  end (match-end 0)))
          (unless (= (length rlc) 5) (signal 'invalid-read-syntax nil)))
      (invalid-read-syntax nil))
    (nreverse rlc)))