Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Notation in the where part of an Inductive command is not prettified. #209

Open
Lysxia opened this issue Oct 29, 2018 · 1 comment
Open

Comments

@Lysxia
Copy link

Lysxia commented Oct 29, 2018

The following snippet

Reserved Notation " t '-->' t' " (at level 40).

Inductive step : nat -> nat -> Prop :=
  where " t '-->' t' " := (step t t').

renders as follows

sc-2018-10-29t14 44 21-04 00

The last --> is not prettified!

@cpitclaudel
Copy link
Owner

Snap! Good catch.
The place to fix would be this snippet:

(defun company-coq-features/prettify-symbols--predicate-1 (pos)
  "Check if POS should be prettified."
  (save-excursion
    (goto-char pos)
    (let ((pp (syntax-ppss)))
      (or (company-coq--in-code-p-1 pp)
          (company-coq--in-notation-string-1 pp)
          ;; Add something here
          ))))

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Labels
None yet
Projects
None yet
Development

No branches or pull requests

2 participants