Smalltalk › Pharo › Pharo Smalltalk Users

From vwnc interesting..

_‹ Previous Topic Next Topic _›

Classic

List

1 message

S Krish

| x y |

x := 2.0.

[x > 0] whileTrue: [x := x / 2].

y := -2.0.

[y < 0] whileTrue: [y := y / 2].

(x = 0.0) -> (x = y) -> ((x basicAt: 1) = (y basicAt: 1))

printIt returns

true->true->false

and:

x = 0.0 and y = -0.0 the negative 0.0