Function: tuareg-smie--search-forward

tuareg-smie--search-forward is a natively compiled function defined in tuareg.el.

Signature

(tuareg-smie--search-forward TOKENS)

Source Code

;; Defined in /nix/store/6mbh851dhnag8f92qfrlh9ckldzwf6c6-emacs-packages-deps/share/emacs/site-lisp/elpa/tuareg-20260626.936/tuareg.el
(defun tuareg-smie--search-forward (tokens)
  (let (tok)
    (while (progn
             (setq tok (tuareg-smie--forward-token))
             (if (not (zerop (length tok)))
                 (not (member tok tokens))
               (unless (eobp)
                 (condition-case err
                     (progn (forward-sexp) t)
                   (scan-error
                    (setq tok (buffer-substring (nth 2 err) (nth 3 err)))
                    nil))))))
    tok))