equal
deleted
inserted
replaced
1443 |
1443 |
1444 "Created: / 21-03-2019 / 12:58:33 / Claus Gittinger" |
1444 "Created: / 21-03-2019 / 12:58:33 / Claus Gittinger" |
1445 ! |
1445 ! |
1446 |
1446 |
1447 test90_hash |
1447 test90_hash |
|
1448 "all string-representations must hash equal" |
|
1449 |
1448 | string8 string16 string32 | |
1450 | string8 string16 string32 | |
1449 |
1451 |
1450 string8 := 'sun/nio/cs/UTF_8.class'. |
1452 string8 := 'sun/nio/cs/UTF_8.class'. |
1451 string16 := string8 asUnicode16String. |
1453 string16 := string8 asUnicode16String. |
1452 string32 := string8 asUnicode16String. |
1454 string32 := string8 asUnicode16String. |
1453 |
1455 |
1454 self assert: string8 hash == string16 hash. |
1456 self assert: string8 hash == string16 hash. |
1455 self assert: string8 hash == string32 hash. |
1457 self assert: string8 hash == string32 hash. |
|
1458 self assert: string8 hash == string8 asSymbol hash. |
1456 |
1459 |
1457 "Created: / 09-10-2014 / 12:41:01 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
1460 "Created: / 09-10-2014 / 12:41:01 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
1461 "Modified: / 02-04-2019 / 10:42:35 / Claus Gittinger" |
1458 ! ! |
1462 ! ! |
1459 |
1463 |
1460 !StringTests class methodsFor:'documentation'! |
1464 !StringTests class methodsFor:'documentation'! |
1461 |
1465 |
1462 version |
1466 version |