<div dir="ltr"><div><div>These changes are making some of the BitmapStreamTests fail.<br></div>Believe it or not, a WordArray is passed to this method...<br></div>And this seems a normal op, since #primitiveFileWrite is prepared to handle that...<br>
</div><div class="gmail_extra"><br><br><div class="gmail_quote">2014-05-03 2:19 GMT+02:00  <span dir="ltr">&lt;<a href="mailto:commits@source.squeak.org" target="_blank">commits@source.squeak.org</a>&gt;</span>:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
Eliot Miranda uploaded a new version of Files to project The Trunk:<br>
<a href="http://source.squeak.org/trunk/Files-eem.134.mcz" target="_blank">http://source.squeak.org/trunk/Files-eem.134.mcz</a><br>
<br>
==================== Summary ====================<br>
<br>
Name: Files-eem.134<br>
Author: eem<br>
Time: 2 May 2014, 5:19:13.06 pm<br>
UUID: eaf22de5-75b8-4350-b6a5-2fc8ae1077a7<br>
Ancestors: Files-eem.133<br>
<br>
Make the Files-eem.133 fix robust when the collection type<br>
doesn&#39;t match buffer1&#39;s type.<br>
<br>
=============== Diff against Files-eem.133 ===============<br>
<br>
Item was changed:<br>
  ----- Method: StandardFileStream&gt;&gt;nextPutAll: (in category &#39;read, write, position&#39;) -----<br>
  nextPutAll: aString<br>
        &quot;Write all the characters of the given string to this file.&quot;<br>
        | size |<br>
        rwmode ifFalse: [^ self error: &#39;Cannot write a read-only file&#39;].<br>
        collection ifNotNil: [<br>
                position &lt; readLimit ifTrue: [ self flushReadBuffer ] ].<br>
        (size := aString size) &gt; 0 ifTrue:<br>
+               [buffer1<br>
+                       at: 1<br>
+                       put: ((buffer1 at: 1) isCharacter<br>
+                                       ifTrue: [(aString at: size) asCharacter]<br>
+                                       ifFalse: [(aString at: size) asInteger]).<br>
-               [buffer1 at: 1 put: (aString at: size).<br>
                 self primWrite: fileID from: aString startingAt: 1 count: aString basicSize].<br>
        ^ aString<br>
  !<br>
<br>
<br>
</blockquote></div><br></div>