negative exponents in negative doubles

why does in IDE
(setf z 4.0D-5)
echo
4.0d-5

while
(setf zz -4.0D-5)
echo
-4.0d0
?
in CormanLisp 2.5
Is there a patch I need to patch with?

same in console viz:
;; Corman Lisp 2.5  Copyright (c) 2003 Corman Technologies. All rights
reserved.

;; Licensed to Nigel Brown [version 2.0].
Type :quit to exit.
?(setf zzz -4.0D-5)
-4.0d0
?



as my 2.01 gets it right viz
;; Corman Lisp 2.01  Copyright (c) 2003 Roger Corman. All rights reserved.
;; Licensed to Nigel Brown.
Type :quit to exit.
?(setf zzzz -4.0D-5)
-4.0d-5
?

Regards
Nigel

------------------------ Yahoo! Groups Sponsor ---------------------~-->
Buy Ink Cartridges or Refill Kits for your HP, Epson, Canon or Lexmark
Printer at MyInks.com. Free s/h on orders $50 or more to the US & Canada.
http://www.c1tracking.com/l.asp?cid=5511
http://us.click.yahoo.com/mOAaAA/3exGAA/qnsNAA/SyjtlB/TM
---------------------------------------------------------------------~->

To unsubscribe from this group, send an email to:
[email protected]

 

Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/