<html xmlns:v="urn:schemas-microsoft-com:vml" xmlns:o="urn:schemas-microsoft-com:office:office" xmlns:w="urn:schemas-microsoft-com:office:word" xmlns:m="http://schemas.microsoft.com/office/2004/12/omml" xmlns="http://www.w3.org/TR/REC-html40"><head>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso-8859-1">
<meta name=Generator content="Microsoft Word 15 (filtered medium)"><style><!--
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
        {margin:0cm;
        margin-bottom:.0001pt;
        font-size:11.0pt;
        font-family:"Calibri",sans-serif;}
a:link, span.MsoHyperlink
        {mso-style-priority:99;
        color:#0563C1;
        text-decoration:underline;}
a:visited, span.MsoHyperlinkFollowed
        {mso-style-priority:99;
        color:#954F72;
        text-decoration:underline;}
p.MsoPlainText, li.MsoPlainText, div.MsoPlainText
        {mso-style-priority:99;
        mso-style-link:"Plain Text Char";
        margin:0cm;
        margin-bottom:.0001pt;
        font-size:11.0pt;
        font-family:"Courier New";}
span.PlainTextChar
        {mso-style-name:"Plain Text Char";
        mso-style-priority:99;
        mso-style-link:"Plain Text";
        font-family:"Courier New";}
.MsoChpDefault
        {mso-style-type:export-only;
        font-family:"Calibri",sans-serif;}
@page WordSection1
        {size:612.0pt 792.0pt;
        margin:72.0pt 72.0pt 72.0pt 72.0pt;}
div.WordSection1
        {page:WordSection1;}
--></style><!--[if gte mso 9]><xml>
<o:shapedefaults v:ext="edit" spidmax="1026" />
</xml><![endif]--><!--[if gte mso 9]><xml>
<o:shapelayout v:ext="edit">
<o:idmap v:ext="edit" data="1" />
</o:shapelayout></xml><![endif]--></head><body lang=EN-US link="#0563C1" vlink="#954F72"><div class=WordSection1><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'>Hi<o:p></o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'><o:p> </o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'>If you think of Co-routines, this is not part of the Oberon language per se,<o:p></o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'>but this functionality can be added by a "MODULE Coroutines".<o:p></o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'><o:p> </o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'>If you are interested to see how to implement Co-routines in Oberon look at<o:p></o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'>the following code:<o:p></o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'><<a href="http://sourceforge.net/p/oberon/oberonv4/ci/master/tree/Amiga/Coroutines.Mod"><font color=black><span style='color:windowtext;text-decoration:none'>http://sourceforge.net/p/oberon/oberonv4/ci/master/tree/Amiga/Coroutines.Mod</span></font></a>?force=True><o:p></o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'><o:p> </o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'>I did not adapt the code to ProjectOberon.<o:p></o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'><o:p> </o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'>br<o:p></o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'>Jörg<o:p></o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'><o:p> </o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'>-----Original Message-----<o:p></o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'>From: Oberon [<a href="mailto:oberon-bounces@lists.inf.ethz.ch"><font color=black><span style='color:windowtext;text-decoration:none'>mailto:oberon-bounces@lists.inf.ethz.ch</span></font></a>] On Behalf Of Srinivas<o:p></o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'>Nayak<o:p></o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'>Sent: Donnerstag, 21. Januar 2016 15:57<o:p></o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'>To: ETH Oberon and related systems <<a href="mailto:oberon@lists.inf.ethz.ch"><font color=black><span style='color:windowtext;text-decoration:none'>oberon@lists.inf.ethz.ch</span></font></a>><o:p></o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'>Subject: [Oberon] Concurrency support in Oberon<o:p></o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'><o:p> </o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'>Dear All,<o:p></o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'><o:p> </o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'>We had Pascal,<o:p></o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'>We came to its successor Modula-2.<o:p></o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'>Then we came to its successor Oberon.<o:p></o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'><o:p> </o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'>But do we still have the concurrency programming support in Oberon, which<o:p></o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'>was present in Modula-2?<o:p></o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'><o:p> </o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'><o:p> </o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'>With thanks and best regards,<o:p></o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'><o:p> </o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'>Yours sincerely,<o:p></o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'>Srinivas Nayak<o:p></o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'><o:p> </o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'>Home: <a href="http://www.mathmeth.com/sn/"><font color=black><span style='color:windowtext;text-decoration:none'>http://www.mathmeth.com/sn/</span></font></a><o:p></o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span lang=DE-CH style='font-size:11.0pt'>Blog: </span><a href="http://srinivas-nayak.blogspot.in/"><font color=black><span lang=DE-CH style='color:windowtext;text-decoration:none'>http://srinivas-nayak.blogspot.in/</span></font></a></font><span lang=DE-CH><o:p></o:p></span></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'>--<o:p></o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'><a href="mailto:Oberon@lists.inf.ethz.ch"><font color=black><span style='color:windowtext;text-decoration:none'>Oberon@lists.inf.ethz.ch</span></font></a> mailing list for ETH Oberon and related systems<o:p></o:p></span></font></p><p class=MsoPlainText><font size=2 face="Courier New"><span style='font-size:11.0pt'><a href="https://lists.inf.ethz.ch/mailman/listinfo/oberon"><font color=black><span style='color:windowtext;text-decoration:none'>https://lists.inf.ethz.ch/mailman/listinfo/oberon</span></font></a><o:p></o:p></span></font></p></div></body></html>