summaryrefslogtreecommitdiff
path: root/modules
diff options
context:
space:
mode:
authorRicardo Wurmus <rekado@elephly.net>2019-06-04 11:37:37 +0200
committerRicardo Wurmus <rekado@elephly.net>2019-06-04 11:37:37 +0200
commitd8eca15c63651e4c6014f4b91acd9589fb784cce (patch)
tree77550fd8194ac65454924bb1c579ad91a9a59868 /modules
parent5dea867d3a035de87278e662687bfa32870465c9 (diff)
compile: fast-ref: Simplify.
* modules/language/python/compile.scm (fast-ref): Simplify.
Diffstat (limited to 'modules')
-rw-r--r--modules/language/python/compile.scm4
1 files changed, 1 insertions, 3 deletions
diff --git a/modules/language/python/compile.scm b/modules/language/python/compile.scm
index 4c07076..efb98a2 100644
--- a/modules/language/python/compile.scm
+++ b/modules/language/python/compile.scm
@@ -548,9 +548,7 @@ empty list."
h))
(define (fast-ref x)
- (aif it (assoc x `((__class__ . ,(O 'py-class))))
- (cdr it)
- #f))
+ (and=> (assoc x `((__class__ . ,(O 'py-class)))) cdr))
(define fasthash
(mkfast