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

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

[elpa] externals/phps-mode f86d8dc6ac 078/135: More work on arrow functi


From: Christian Johansson
Subject: [elpa] externals/phps-mode f86d8dc6ac 078/135: More work on arrow function variable uri
Date: Sun, 29 Jan 2023 03:11:06 -0500 (EST)

branch: externals/phps-mode
commit f86d8dc6ac0b291b3b94a3f547555b0fdb3d128a
Author: christian <christian@cvj.se>
Commit: christian <christian@cvj.se>

    More work on arrow function variable uri
---
 phps-mode-parser-sdt.el | 18 ++++++++++++------
 1 file changed, 12 insertions(+), 6 deletions(-)

diff --git a/phps-mode-parser-sdt.el b/phps-mode-parser-sdt.el
index faab16fd49..ca8c10f00c 100644
--- a/phps-mode-parser-sdt.el
+++ b/phps-mode-parser-sdt.el
@@ -753,14 +753,20 @@
                       (setq potential-uri-index (1+ potential-uri-index)))))
 
                  ((equal space-type 'arrow-function)
-                  ;; TODO Should branch of two here one with and one without 
the arrow function scope
+                  ;; branch of two alternative namespaces here
+                  ;; one with and one without the arrow function scope
                   (let ((potential-uri-count (length potential-uris))
-                        (potential-uri-index 0))
+                        (potential-uri-index 0)
+                        (new-potential-uris))
                     (while (< potential-uri-index potential-uri-count)
-                      (setf
-                       (nth potential-uri-index potential-uris)
-                       (format " anonymous %s%s" space-name (nth 
potential-uri-index potential-uris)))
-                      (setq potential-uri-index (1+ potential-uri-index)))))
+                      (push
+                       (format " arrow %s%s" space-name (nth 
potential-uri-index potential-uris))
+                       new-potential-uris)
+                      (setq potential-uri-index (1+ potential-uri-index)))
+                    (setq potential-uris (append potential-uris 
new-potential-uris))
+                    (message "new-potential-uris: %S" new-potential-uris)
+                    (message "potential-uris: %S" potential-uris)
+                    ))
 
                  ;; TODO Below should alter symbol namespaces instead of build 
namespace data
                  ((equal space-type 'global)



reply via email to

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