<div dir="ltr"><div><div><div><div><div>Hi Juan, </div>I fail to see the bug in current Squeak trunk. </div>I tried this | int out file | int := SmallInteger maxVal. file := FileStream fileNamed: 'Test-Int'. file binary. (DataStream on: file) nextPut: int. file close. file := FileStream fileNamed: 'Test-Int'. file binary. out := (DataStream on: file) next. file close. self assert: int = out </div>The large SmallInteger is restored correctly. </div>This is because we find this method timestamped from 2015: SmallInteger>>objectForDataStream: refStrm "In a 64-bit Spur VM, we may have to fake 32-bit SmallIntegers for compatibility." | large | self > 16r3FFFFFFF ifTrue: [ large := LargePositiveInteger new: self digitLength neg: false. 1 to: self digitLength do: [:i | large digitAt: i put: (self digitAt: i)]. ^large]. self < -16r40000000 ifTrue: [ large := LargeNegativeInteger new: self digitLength neg: true. 1 to: self digitLength do: [:i | large digitAt: i put: (self digitAt: i)]. ^large]. ^ self<div> </div><div>Did I overlook something?</div>I hope that Cuis and Squeak DataStream will remain consistent after your latest changes </div>Nicolas</div> <div class="gmail_quote gmail_quote_container"><div dir="ltr" class="gmail_attr">Le lun. 22 sept. 2025 à 15:45, Juan Vuletich via Cuis-dev <<a href="mailto:cuis-dev@lists.cuis.st">cuis-dev@lists.cuis.st</a>> a écrit : </div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex"> <div> Hi, <div>On 22/09/2025 10:10 AM, H. Hirzel via Cuis-dev wrote: </div> <blockquote type="cite"> <div dir="ltr"> <div>I could identify the change set which causes the problem, it is from last Wednesday </div> <div> </div> <div>CoreUpdates\<a href="http://7580-ReferenceStream-61BitSmallIntegers-fix-JuanVuletich-2025Sep17-08h16m-jmv.001.cs.st" target="_blank">7580-ReferenceStream-61BitSmallIntegers-fix-JuanVuletich-2025Sep17-08h16m-jmv.001.cs.st</a></div> <div> </div> <div>It introduces a new version of #readInteger and writeInteger: in the class DataStream.</div> <div>If I undo the change of this change set it works.</div> <div> </div> <div>--Hannes </div> </div> </blockquote> As you saw in that changeset (file name, comments in code, commit message), and as exemplified in the test added to BaseImageTests shortly after, what that code does is not to cause a problem, but to fix a serious bug that has been around for a long time and that is still present in Squeak. Just try to serialize an object with a largish SmallInteger and see what you get back. Anyway. I just pushed a better implementation that uses a different format for 32bit SmallIntegers than from larger ones. This brings back compatibility with the badly broken Squeak format, although it obviously can't bring back the bits that Squeak discarded when saving the file, and results will be wrong unless you're lucky enough to only use small SmallIntegers. <blockquote type="cite"> <div dir="ltr"> <div> </div> <div> </div> <div> </div> <div> </div> <div> </div> </div> <div class="gmail_quote"> <div dir="ltr" class="gmail_attr">On Mon, Sep 22, 2025 at 2:36 PM H. Hirzel <<a href="mailto:hannes.hirzel@gmail.com" target="_blank">hannes.hirzel@gmail.com</a>> wrote: </div> <blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex"> <div dir="ltr"> <div>I am currently identifying which change set causes the problem.</div> <div>So far Cuis update 7523 still works. </div> <div> </div> <div>This means if I produce a file ' aDictWithByteArraysFromSq.obj' in Squeak I can read it in Cuis 7523</div> <div> </div> <div>So the problem has been introduced in one of the last 60 updates.</div> <div> </div> <div> </div> <div class="gmail_quote"> <blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex"> <div dir="ltr"> <div>"Squeak" dict := Dictionary new. dict at: 1 put: #[1 2 3 4]. dict at: 2 put: #[5 6 7 8]. dict at: 3 put: #[10 20 30 40]. fileStream := ReferenceStream fileNamed: 'aDictWithByteArraysFromSq.obj'. objectToSave := dict. fileStream nextPut: objectToSave. fileStream close</div> <div> </div> </div> </blockquote> <div> </div> <blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex"> <div dir="ltr"> <div>"-----------------------------------------------" </div> <div>"Restore in Cuis" </div> <div>ReferenceStream restoreFromFile: ('aDictWithByteArraysFromSq.obj' asFileEntry). "Result OK in Cuis 7523 NOT OK in Cuis 7584"</div> <div> </div> </div> </blockquote> </div> </div> </blockquote> </div> <fieldset></fieldset> </blockquote> <pre cols="72">-- Juan Vuletich <a href="http://www.cuis.st" target="_blank">www.cuis.st</a> <a href="http://github.com/jvuletich" target="_blank">github.com/jvuletich</a> <a href="http://researchgate.net/profile/Juan-Vuletich" target="_blank">researchgate.net/profile/Juan-Vuletich</a> <a href="http://independent.academia.edu/JuanVuletich" target="_blank">independent.academia.edu/JuanVuletich</a> <a href="http://patents.justia.com/inventor/juan-manuel-vuletich" target="_blank">patents.justia.com/inventor/juan-manuel-vuletich</a></pre> </div> -- Cuis-dev mailing list <a href="mailto:Cuis-dev@lists.cuis.st" target="_blank">Cuis-dev@lists.cuis.st</a> <a href="https://lists.cuis.st/mailman/listinfo/cuis-dev" rel="noreferrer" target="_blank">https://lists.cuis.st/mailman/listinfo/cuis-dev</a> </blockquote></div>