Re: Ispell: Skipping part of text in texinfo-mode

[Eli Zaretskii <eliz@gnu.org>]

> From: Arash Esbati <arash@gnu.org>
> Cc: emacs-devel@gnu.org
> Date: Fri, 30 Aug 2024 10:13:59 +0200
> 
> Yes, at some point, I have to go through the @-Command List section in
> the Texinfo manual.

Then let's discuss them one by one, based on the Texinfo manual (which
documents much more than you can find in our manuals).  Some commands
need to ignore their arguments, some don't.  For example, @var's
argument is more often than not be a real word or a phrase made out of
words, like @var{next-file}.

> > Very simple: press 'a' once on each directive you never want to look
> > at, and leave the rest for judgment calls.
> 
> Thanks, this was also my approach until now, but I didn't find it
> satisfactory.

It's definitely a possibility, I think, so we IMO should support it,
at least as an option.

> We can discuss which macros to include and which to drop once the code
> is working.  I'm currently facing the issue that when I open a .texi
> file, eval (setq ispell-parser 'texinfo) and do M-x ispell RET, also
> comments in the file are checked, the value of `ispell-check-comments'
> is nil, though.  Do you have an idea what's going wrong?  I don't get
> this in a .tex buffer.

Doesn't ispell-check-comments only relevant to
ispell-comments-and-strings?

> +(defvar ispell--texinfo-arg-end-syntax-table
> +  (let ((table (make-syntax-table))
> +        (chars '((?\f . ">") (?\n . ">")
> +                 (?\" . " ") (?\@ . "/")
> +                 (?\( . " ") (?\) . " ")
> +                 (?\[ . " ") (?\] . " ")
> +                 (?\< . " ") (?\> . " ")
> +                 (?\\ . " ")
> +                 (?\{ . "(}") (?\} . "){"))))
> +    (dolist (elt chars)
> +      (modify-syntax-entry (car elt) (cdr elt) table))
> +    table))
> +
> +(defun ispell-texinfo-arg-end (&optional arg)
> +  "Skip across ARG number of braces."
> +  (condition-case nil
> +      (with-syntax-table ispell--texinfo-arg-end-syntax-table
> +        (unless (= (following-char) ?\{)
> +          (skip-chars-forward "^{"))
> +        (forward-sexp (or arg 1)))
> +    (error
> +     (message "Error skipping s-expressions at point %d." (point))
> +     (beep)
> +     (sit-for 2))))

Does this support nested markup, as in

  @w{@code{(@var{file} . @var{buffer})}}

in a way that will allow to spell-check "file" and "buffer"?  I'm not
sure syntax-table feature supports nesting.