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

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

[elpa] externals/parser-generator c9906f7 420/434: Move order of export


From: ELPA Syncer
Subject: [elpa] externals/parser-generator c9906f7 420/434: Move order of export of LR lex-analyzer
Date: Mon, 29 Nov 2021 16:00:28 -0500 (EST)

branch: externals/parser-generator
commit c9906f7082283cb28ca8a8d628c7f5d5d9631a82
Author: Christian Johansson <christian@cvj.se>
Commit: Christian Johansson <christian@cvj.se>

    Move order of export of LR lex-analyzer
---
 parser-generator-lr-export.el | 64 +++++++++++++++++++++----------------------
 1 file changed, 32 insertions(+), 32 deletions(-)

diff --git a/parser-generator-lr-export.el b/parser-generator-lr-export.el
index 46d0d4f..b5d9501 100644
--- a/parser-generator-lr-export.el
+++ b/parser-generator-lr-export.el
@@ -118,36 +118,6 @@
         namespace
         parser-generator--table-translations))
 
-      ;; Lex-Analyzer Get Function
-      (insert
-       (format
-        "(defvar\n  %s-lex-analyzer--get-function\n  (lambda %S %S)\n  \"The 
lex-analyzer get function.\")\n\n"
-        namespace
-        (nth 2 parser-generator-lex-analyzer--get-function)
-        (nth 3 parser-generator-lex-analyzer--get-function)))
-
-      ;; Lex-Analyzer Function
-      (insert
-       (format
-        "(defvar\n  %s-lex-analyzer--function\n  (lambda %S %S)\n  \"The 
lex-analyzer function.\")\n\n"
-        namespace
-        (nth 2 parser-generator-lex-analyzer--function)
-        (nth 3 parser-generator-lex-analyzer--function)))
-
-      ;; Lex-Analyzer Reset Function
-      (insert
-       (format
-        "(defvar\n  %s-lex-analyzer--reset-function\n  "
-        namespace))
-      (if parser-generator-lex-analyzer--reset-function
-          (insert
-           (format
-            "(lambda %S %S)\n"
-            (nth 2 parser-generator-lex-analyzer--reset-function)
-            (nth 3 parser-generator-lex-analyzer--reset-function)))
-        (insert "nil\n"))
-      (insert "  \"The lex-analyzer reset function.\")\n\n")
-
       ;; E-identifier
       (insert
        (format
@@ -171,18 +141,48 @@
 
       (insert "\n;;; Variables:\n\n")
 
-      ;; Lex-analyzer index
+      ;; Index
       (insert
        (format
         "(defvar-local\n  %s-lex-analyzer--index\n  0\n  \"The current index 
of the lex-analyzer.\")\n\n"
         namespace))
 
-      ;; Lex-analyzer move to index flag
+      ;; Move to index flag
       (insert
        (format
         "(defvar-local\n  %s-lex-analyzer--move-to-index-flag\n  nil\n  
\"Non-nil means move index to value.\")\n\n"
         namespace))
 
+      ;; Lex-Analyzer Get Function
+      (insert
+       (format
+        "(defvar\n  %s-lex-analyzer--get-function\n  (lambda %S %S)\n  \"The 
lex-analyzer get function.\")\n\n"
+        namespace
+        (nth 2 parser-generator-lex-analyzer--get-function)
+        (nth 3 parser-generator-lex-analyzer--get-function)))
+
+      ;; Lex-Analyzer Function
+      (insert
+       (format
+        "(defvar\n  %s-lex-analyzer--function\n  (lambda %S %S)\n  \"The 
lex-analyzer function.\")\n\n"
+        namespace
+        (nth 2 parser-generator-lex-analyzer--function)
+        (nth 3 parser-generator-lex-analyzer--function)))
+
+      ;; Lex-Analyzer Reset Function
+      (insert
+       (format
+        "(defvar\n  %s-lex-analyzer--reset-function\n  "
+        namespace))
+      (if parser-generator-lex-analyzer--reset-function
+          (insert
+           (format
+            "(lambda %S %S)\n"
+            (nth 2 parser-generator-lex-analyzer--reset-function)
+            (nth 3 parser-generator-lex-analyzer--reset-function)))
+        (insert "nil\n"))
+      (insert "  \"The lex-analyzer reset function.\")\n\n")
+
       (insert "\n;;; Functions:\n\n")
 
       (insert "\n;;; Lex-Analyzer:\n\n")



reply via email to

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