From 03f46d99946975e1bd8baccfad4709a3e9d4354d Mon Sep 17 00:00:00 2001 From: Stefan Israelsson Tampe Date: Mon, 20 Aug 2018 15:02:25 +0200 Subject: getopt.py and filecmp.py --- modules/language/python/compile.scm | 3 +++ 1 file changed, 3 insertions(+) (limited to 'modules/language/python/compile.scm') 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)))) -- cgit v1.2.3