/[guile]/guile/guile-core/test-suite/tests/numbers.test
ViewVC logotype

Diff of /guile/guile-core/test-suite/tests/numbers.test

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.27 by kryde, Tue Jul 8 00:32:01 2003 UTC revision 1.28 by kryde, Fri Jul 18 00:01:55 2003 UTC
# Line 1790  Line 1790 
1790  ;;; *  ;;; *
1791  ;;;  ;;;
1792    
1793    (with-test-prefix "*"
1794    
1795      (pass-if "complex * bignum"
1796        (let ((big (ash 1 90)))
1797          (= (make-rectangular big big)
1798             (* 1+1i big)))))
1799    
1800  ;;;  ;;;
1801  ;;; /  ;;; /
1802  ;;;  ;;;

Legend:
Removed from v.1.27  
changed lines
  Added in v.1.28

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26