<?xml version="1.0"?>
<paste-with-annotations>
  <paste>
    <number>
      <integer>79433</integer>
    </number>
    <user>
      <string>|Agent</string>
    </user>
    <title>
      <string>&lt;sequence-stream&gt; failure</string>
    </title>
    <contents>
      <string>define function main(name, arguments)
  let s = &quot;This is a test.&quot;;
  let stream = make(&lt;sequence-stream&gt;, contents: s);
  stream.stream-position := #&quot;end&quot;;
  format-out(&quot;Length %d\n&quot;, stream.stream-position);
end function main;

// Invoke our main() function.
main(application-name(), application-arguments());

</string>
    </contents>
    <universal-time>
      <integer>3450038595</integer>
    </universal-time>
    <channel>
      <string>#dylan</string>
    </channel>
    <colorization-mode>
      <string>None</string>
    </colorization-mode>
    <maybe-spam>
      <null/>
    </maybe-spam>
    <is-unicode>
      <keyword>TRUE</keyword>
    </is-unicode>
    <deletion-requested>
      <null/>
    </deletion-requested>
    <deletion-requested-email>
      <null/>
    </deletion-requested-email>
    <expiration-time>
      <null/>
    </expiration-time>
  </paste>
</paste-with-annotations>
