[elpa] externals/phps-mode a418e41 26/62: Integration-test now comparing nest-location-stack as well

[Christian Johansson]

branch: externals/phps-mode
commit a418e412d2f1733719c7c64dc6bd4cc141529f7d
Author: Christian Johansson <christian@mediastrategi.se>
Commit: Christian Johansson <christian@mediastrategi.se>

    Integration-test now comparing nest-location-stack as well
---
 phps-mode-test.el                  | 29 +++++++++++++++++------------
 test/phps-mode-test-integration.el |  2 +-
 2 files changed, 18 insertions(+), 13 deletions(-)

diff --git a/phps-mode-test.el b/phps-mode-test.el
index 603d6a4..d8ab8d9 100644
--- a/phps-mode-test.el
+++ b/phps-mode-test.el
@@ -30,19 +30,21 @@
 (defmacro phps-mode-test--incremental-vs-intial-buffer (source &optional title 
&rest change)
   "Set up test buffer with SOURCE, TITLE, apply CHANGE and compare incremental 
values with initial values."
   `(let ((test-buffer-incremental (generate-new-buffer "test-incremental"))
-         (incremental-states nil)
-         (incremental-tokens nil)
-         (incremental-imenu nil)
-         (incremental-indent nil)
-         (incremental-buffer nil)
-         (incremental-bookkeeping nil)
+         (incremental-states)
+         (incremental-tokens)
+         (incremental-imenu)
+         (incremental-indent)
+         (incremental-buffer)
+         (incremental-bookkeeping)
+         (incremental-nest-location-stack)
          (test-buffer-initial (generate-new-buffer "test-initial"))
-         (initial-states nil)
-         (initial-tokens nil)
-         (initial-imenu nil)
-         (initial-indent nil)
-         (initial-buffer nil)
-         (initial-bookkeeping nil))
+         (initial-states)
+         (initial-tokens)
+         (initial-imenu)
+         (initial-indent)
+         (initial-buffer)
+         (initial-bookkeeping)
+         (initial-nest-location-stack))
 
      ;; Setup incremental buffer
      (switch-to-buffer test-buffer-incremental)
@@ -59,6 +61,7 @@
      (setq incremental-indent (phps-mode-test--hash-to-list 
phps-mode-lex-analyzer--lines-indent))
      (setq incremental-buffer (buffer-substring (point-min) (point-max)))
      (setq incremental-bookkeeping (phps-mode-test--hash-to-list 
phps-mode-lex-analyzer--bookkeeping t))
+     (setq incremental-nest-location-stack 
phps-mode-lex-analyzer--nest-location-stack)
 
      ;; Setup incremental buffer
      (switch-to-buffer test-buffer-initial)
@@ -73,6 +76,7 @@
      (setq initial-indent (phps-mode-test--hash-to-list 
phps-mode-lex-analyzer--lines-indent))
      (setq initial-buffer (buffer-substring (point-min) (point-max)))
      (setq initial-bookkeeping (phps-mode-test--hash-to-list 
phps-mode-lex-analyzer--bookkeeping t))
+     (setq initial-nest-location-stack 
phps-mode-lex-analyzer--nest-location-stack)
 
      ;; Run tests
      (phps-mode-debug-message
@@ -87,6 +91,7 @@
      (should (equal initial-indent incremental-indent))
      (should (equal initial-imenu incremental-imenu))
      (should (equal initial-bookkeeping incremental-bookkeeping))
+     (should (equal initial-nest-location-stack 
incremental-nest-location-stack))
 
      (kill-buffer test-buffer-incremental)
      (kill-buffer test-buffer-initial)
diff --git a/test/phps-mode-test-integration.el 
b/test/phps-mode-test-integration.el
index 04b8601..5891e5d 100644
--- a/test/phps-mode-test-integration.el
+++ b/test/phps-mode-test-integration.el
@@ -306,7 +306,7 @@
 
 (defun phps-mode-test-integration ()
   "Run test for integration."
-  (setq debug-on-error t)
+  ;; (setq debug-on-error t)
   ;; (setq phps-mode-analyzer--process-on-indent-and-imenu t)
   (phps-mode-test-integration--incremental-vs-initial-buffers)
   ;; (phps-mode-test-integration--whitespace-modifications)