equal
deleted
inserted
replaced
35 | ws1 ws2 | |
35 | ws1 ws2 | |
36 ws1 := PPSmalltalkWhitespaceParser new. |
36 ws1 := PPSmalltalkWhitespaceParser new. |
37 ws2 := PPSmalltalkWhitespaceParser new. |
37 ws2 := PPSmalltalkWhitespaceParser new. |
38 |
38 |
39 self assert: ws1 = ws2. |
39 self assert: ws1 = ws2. |
40 self assert: (ws1 == ws2) not. |
40 self assert: ws1 ~~ ws2. |
41 |
41 |
42 self assert: ws1 hash = ws2 hash. |
42 self assert: ws1 hash = ws2 hash. |
|
43 |
|
44 "Modified: / 30-07-2015 / 06:56:53 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
43 ! ! |
45 ! ! |
44 |
46 |