diff options
| author | Ricardo Wurmus <rekado@elephly.net> | 2019-06-04 11:37:37 +0200 |
|---|---|---|
| committer | Ricardo Wurmus <rekado@elephly.net> | 2019-06-04 11:37:37 +0200 |
| commit | d8eca15c63651e4c6014f4b91acd9589fb784cce (patch) | |
| tree | 77550fd8194ac65454924bb1c579ad91a9a59868 | |
| parent | 5dea867d3a035de87278e662687bfa32870465c9 (diff) | |
compile: fast-ref: Simplify.
* modules/language/python/compile.scm (fast-ref): Simplify.
| -rw-r--r-- | modules/language/python/compile.scm | 4 |
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 |