Long multiplication: Difference between revisions
Content added Content deleted
Line 5,412:
printedString := String streamContents:[:s | printOn value:rslt value:s].
self assert:(printedString = (2**64) squared printString)
{{out}}
3402823669293846346337467431768211456
1) not that I know of any Smalltalk ever ported to one :-)
=={{header|Tcl}}==
|