complex numbers

1 files changed, 12 insertions, 4 deletions

diff --git a/modules/language/python/dir.scm b/modules/language/python/dir.scm
index a1c77c9..1189673 100644
--- a/modules/language/python/dir.scm
+++ b/modules/language/python/dir.scm
@@ -127,14 +127,22 @@
           (pylist-sort! l)
           l)
         l1)))
+
+(define-method (dir (o <py-complex>))
+  (let ((l1 (pycomplex-listing)))
+    (if (is-a? o <p>)
+        (let* ((l2 (next-method))
+               (l  (+ l1 l2)))
+          (pylist-sort! l)
+          l)
+        l1)))
           
     
 (define-method (dir (o <hashtable>   )) (pyhash-listing))
 (define-method (dir (o <string>      )) (pystring-listing))
-(define-method (dir (o <complex>     ))
-  (if (integer? o)
-      (pyint-listing)
-      (pyfloat-listing)))
+(define-method (dir (o <complex>     )) (pycomplex-listing))
+(define-method (dir (o <real>        )) (pyfloat-listing))
+(define-method (dir (o <integer>     )) (pyint-listing))
 
 (define-method (dir)
   (let ((l '()))