#15 Real(-1) => -.1

[Robert de Forest]

In chaos:

"-1" 'Real new .
-.1E0#64

(Should be -1.E0)

Works for init from number, too:

-123 'Real new .
-.123E0#64

(Could be rendering problem?)

Most interesting is the following:

-123 dup 'Real new == .
0

(Initialize from int, get inequal number)
123 dup 'Real new == .
1

(works for positive numbers)