parse assignment as keyword args inside indexing

fixes #25631

Author: JeffBezanson

src/julia-parser.scm

@@ -1185,7 +1185,7 @@
                    (if (null? al)
                        (loop (list 'ref ex))
                        (case (car al)
-                         ((vect)  (loop (list* 'ref ex (cdr al))))
+                         ((vect)  (loop (list* 'ref ex (map =-to-kw (cdr al)))))
                          ((hcat)  (loop (list* 'typed_hcat ex (cdr al))))
                          ((vcat)
                           (loop (list* 'typed_vcat ex (cdr al))))

src/julia-syntax.scm

@@ -1954,8 +1954,6 @@
           (let ((a    (cadr lhs))
                 (idxs (cddr lhs))
                 (rhs  (caddr e)))
-            (if (any assignment? idxs)
-                (syntax-deprecation "assignment inside indexing" "" #f))
             (let* ((reuse (and (pair? a)
                                (contains (lambda (x) (eq? x 'end))
                                          idxs)))
@@ -2010,8 +2008,6 @@
    'ref
    (lambda (e)
      (let ((args (cddr e)))
-       (if (any assignment? args)
-           (syntax-deprecation "assignment inside indexing" "" #f))
        (if (has-parameters? args)
            (error "unexpected semicolon in array expression")
            (expand-forms (partially-expand-ref e)))))