#901 format('0.1119',2,2,3,0) returns bad exponent

[walter keller]

walter@walter:/media/wkData/wsh$ rexx -v
Open Object Rexx Version 4.0.0
Build date: Sep 30 2009
Addressing Mode: 32

Copyright (c) IBM Corporation 1995, 2004.
Copyright (c) RexxLA 2005-2009.
All Rights Reserved.
This program and the accompanying materials
are made available under the terms of the Common Public License v1.0
which accompanies this distribution.
http://www.oorexx.org/license.html

Syntax is "rexx [-v] filename [arguments]"
or "rexx [-e] program_string [arguments]".

walter@walter:/media/wkData/wsh$ rexx -e "say format('0.1119',2,2,3,0)"
1.12E-0-1
walter@walter:/media/wkData/wsh$

[Rick McGuire]

This is working correctly in the 4.0.1 version, which is currently in beta.