emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/wisi 27db81d 17/35: Fix some quoting problems in doc st


From: Stefan Monnier
Subject: [elpa] externals/wisi 27db81d 17/35: Fix some quoting problems in doc strings
Date: Sat, 28 Nov 2020 14:47:52 -0500 (EST)

branch: externals/wisi
commit 27db81da3c6a7662e97029c50e781b4a9e0bb651
Author: Paul Eggert <eggert@cs.ucla.edu>
Commit: Paul Eggert <eggert@cs.ucla.edu>

    Fix some quoting problems in doc strings
    
    Most of these are minor issues involving, e.g., quoting `like this'
    instead of 'like this'.  A few involve escaping ` and ' with a
    preceding \= when the characters should not be turned into curved single
    quotes.
---
 wisi-compile.el | 14 +++++++-------
 wisi-parse.el   | 14 +++++++-------
 wisi.el         |  4 ++--
 3 files changed, 16 insertions(+), 16 deletions(-)

diff --git a/wisi-compile.el b/wisi-compile.el
index b70a1ae..5c788e7 100644
--- a/wisi-compile.el
+++ b/wisi-compile.el
@@ -21,7 +21,7 @@
 ;;
 
 ;;; Commentary:
-;; 
+;;
 
 ;;;; History: first experimental version Jan 2013
 ;;
@@ -144,18 +144,18 @@ sides; nonterm is the left hand side.
 ACTIONS is an array indexed by parser state, of alists indexed by
 terminal tokens. The value of each item in the alists is one of:
 
-'error
+`error'
 
-'accept
+`accept'
 
 integer - shift; gives new state
 
-'(nonterm . index) - reduce by nonterm production index.
+(nonterm . index) - reduce by nonterm production index.
 
-'(integer (nonterm . index)) - a shift/reduce conflict
-'((nonterm . index) (nonterm . index)) - a reduce/reduce conflict
+(integer (nonterm . index)) - a shift/reduce conflict
+((nonterm . index) (nonterm . index)) - a reduce/reduce conflict
 
-The first item in the alist must have the key 'default (not a
+The first item in the alist must have the key `default' (not a
 terminal token); it is used when no other item matches the
 current token.
 
diff --git a/wisi-parse.el b/wisi-parse.el
index b9da937..a16a81d 100644
--- a/wisi-parse.el
+++ b/wisi-parse.el
@@ -269,20 +269,20 @@ point at which that max was spawned.")
 (defun wisi-parsers-active (parser-states active-count)
   "Return the type of parser cycle to execute.
 PARSER-STATES[*].active is the last action a parser took. If it
-was 'shift, that parser used the input token, and should not be
+was `shift', that parser used the input token, and should not be
 executed again until another input token is available, after all
 parsers have shifted the current token or terminated.
 
 Returns one of:
 
-'accept : all PARSER-STATES have active set to nil or 'accept -
+`accept' : all PARSER-STATES have active set to nil or `accept' -
 done parsing
 
-'shift : all PARSER-STATES have active set to nil, 'accept, or
-'shift - get a new token, execute 'shift parsers.
+`shift' : all PARSER-STATES have active set to nil, `accept', or
+`shift' - get a new token, execute `shift' parsers.
 
-'reduce : some PARSER-STATES have active set to 'reduce - no new
-token, execute 'reduce parsers."
+`reduce' : some PARSER-STATES have active set to `reduce' - no new
+token, execute `reduce' parsers."
   (let ((result nil)
        (i 0)
        (shift-count 0)
@@ -336,7 +336,7 @@ token, execute 'reduce parsers."
 (defun wisi-parse-elim-identical (parser-states active-parser-count)
   "Check for parsers in PARSER-STATES that have reached identical states 
eliminate one.
 Return new ACTIVE-PARSER-COUNT. Assumes all parsers have active
-nil, 'shift, or 'accept."
+nil, `shift', or `accept'."
   ;; parser-states passed by reference; active-parser-count by copy
   ;; see test/ada_mode-slices.adb for example
   (dotimes (parser-i (1- (length parser-states)))
diff --git a/wisi.el b/wisi.el
index 0b29b3e..bb49f65 100644
--- a/wisi.el
+++ b/wisi.el
@@ -197,7 +197,7 @@
 (defvar-local wisi-string-quote-escape-doubled nil
   "Non-nil if a string delimiter is escaped by doubling it (as in Ada).")
 (defvar-local wisi-string-quote-escape nil
-  "Cons '(delim . character) where 'character' escapes quotes in strings 
delimited by 'delim'.")
+  "Cons (delim . character) where `character' escapes quotes in strings 
delimited by `delim'.")
 (defvar-local wisi-string-single-term nil) ;; string delimited by single quotes
 (defvar-local wisi-symbol-term nil)
 (defvar-local wisi-number-term nil)
@@ -787,7 +787,7 @@ PAIRS is a vector of the form [TOKEN-NUMBER CLASS 
TOKEN-NUMBER
 CLASS ...] where TOKEN-NUMBER is the (1 indexed) token number in
 the production, CLASS is the wisi class of that token. Use in a
 grammar action as:
-  (wisi-statement-action [1 'statement-start 7 'statement-end])"
+  (wisi-statement-action [1 \\='statement-start 7 \\='statement-end])"
   (save-excursion
     (let ((first-item t)
          first-keyword-mark



reply via email to

[Prev in Thread] Current Thread [Next in Thread]