summaryrefslogtreecommitdiff
path: root/modules/language/python/compile.scm
diff options
context:
space:
mode:
Diffstat (limited to 'modules/language/python/compile.scm')
-rw-r--r--modules/language/python/compile.scm3
1 files changed, 3 insertions, 0 deletions
diff --git a/modules/language/python/compile.scm b/modules/language/python/compile.scm
index 2cef86b..3bf81ef 100644
--- a/modules/language/python/compile.scm
+++ b/modules/language/python/compile.scm
@@ -1021,6 +1021,7 @@
(let ((s (exp vs a)))
(fluid-set! ignore
(cons s (fluid-ref ignore)))
+ (dont-warn s)
s))
((a . b)
@@ -2442,6 +2443,8 @@
(set v x val))
((_ v (#:vecref n) val)
(pylist-set! v n val))
+ ((_ v (#:array-ref n ...) val)
+ (pylist-set! v (list n ...) val))
((_ v (#:vecsub x ...) val)
(pylist-subset! v x ... val))))