<?xml version="1.0"?>
<paste-with-annotations>
  <paste>
    <number>
      <integer>70155</integer>
    </number>
    <user>
      <string>|Agent</string>
    </user>
    <title>
      <string>Using Open Dylan's split</string>
    </title>
    <contents>
      <string>--- testapp2.lid ---

library: testapp2
executable: testapp2
files: testapp2-exports
  testapp2


--- testapp2-exports.lid ---

module: dylan-user

define library testapp2
  use common-dylan;
  use io;
  use regular-expressions;
end library;

define module testapp2
  use common-dylan;
  use format-out;
  use regular-expressions;
end module;


--- testapp2.dylan ---

module: testapp2
synopsis: 
author: 
copyright: 

define function main(name, arguments)
  let s = &quot;Hello, world!&quot;;
  let r = compile-regex(&quot;,&quot;);
  let p = split(s, r);
  format-out(&quot;%=\n&quot;, p);
  exit-application(0);
end function main;

// Invoke our main() function.
main(application-name(), application-arguments());


--- Command-line ---

minimal-console-compiler -build testapp2.lid


</string>
    </contents>
    <universal-time>
      <integer>3435421350</integer>
    </universal-time>
    <channel>
      <string>#dylan</string>
    </channel>
    <colorization-mode>
      <string></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>
