Skip to content

Commit 0e7de74

Browse files
authored
[RAI-35987] Fix name canonicalization backport (#223)
1 parent 590b807 commit 0e7de74

File tree

1 file changed

+4
-2
lines changed

1 file changed

+4
-2
lines changed

src/julia-syntax.scm

Lines changed: 4 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -225,11 +225,13 @@
225225
(if lb (list lb ub) (list ub))
226226
(if lb (list lb '(core Any)) '())))))
227227

228+
;; Note that Scheme pairs representing a method in the AST are
229+
;; of the form (method name) or (method (outerref name)), at least in Julia 1.10.
228230
(define (is-method? x)
229231
(if (and (pair? x) (eq? (car x) 'method))
230232
(let ((name (cadr x)))
231-
(if (and (pair? name) (eq? (car name) 'globalref))
232-
(let ((name (caddr name)))
233+
(if (and (pair? name) (eq? (car name) 'outerref))
234+
(let ((name (cadr name)))
233235
(if (symbol? name)
234236
#t
235237
#f))

0 commit comments

Comments
 (0)