compile: fast-ref: Simplify.

* modules/language/python/compile.scm (fast-ref): Simplify.

diff --git a/modules/language/python/compile.scm b/modules/language/python/compile.scm
index 4c07076..efb98a2 100644 (file)
--- 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