Hi there,

I have a failing test and was wondering if anyone would have a sense as to why:

| testString filename file |
    testString  := 'ascii String'.
    filename := 'test-file-' , 99 atRandom printString , '.txt'.
     filename asFileReference ensureDelete.
    file := filename asFileReference
        writeStreamDo: [ :stream |
            stream
                nextPutAll: testString;
                crlf ].
    self assert: file species  = FileStream.

Many thanks,

Sheri