<div dir="auto"><div dir="ltr"><div>Hi Andreas, <br></div><div><br></div><div>thank you for sharing this.</div><div>I noticed that the files in the OriginalOberon2013 folder are not the original ones found in Prof Wirth's website, but a previous version of your work.</div><div>Some time ago I implemented the CASE statement in my compiler for the Java Virtual Machine: oberonc. Although the generated code is different, you might find it useful to compare your ORP.Mod with my equivalent OJP.Mod file.</div><div>For testing purposes you can try the following test cases:</div><div><br></div><div><a href="https://github.com/lboasso/oberonc/blob/master/tests/base/CaseNum0.Mod" target="_blank" rel="noreferrer">https://github.com/lboasso/oberonc/blob/master/tests/base/CaseNum0.Mod</a></div><div><a href="https://github.com/lboasso/oberonc/blob/master/tests/base/CaseNum1.Mod" target="_blank" rel="noreferrer">https://github.com/lboasso/oberonc/blob/master/tests/base/CaseNum1.Mod</a></div><div><br></div><div>In the meantime I'll play with your implementation.</div><div><br></div><div>Cheers, <br></div><div>Luca<br></div></div></div><div class="gmail_extra"><br><div class="gmail_quote">On Wed, Jun 13, 2018 at 2:21 PM, Andreas Pirklbauer <span dir="ltr"><<a href="mailto:andreas_pirklbauer@yahoo.com" target="_blank" rel="noreferrer">andreas_pirklbauer@yahoo.com</a>></span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">A modified Oberon-07 compiler adding the numeric CASE statement to the language is available at;<br>
<br>
   <a href="https://github.com/" target="_blank" rel="noreferrer">https://github.com/</a>andreaspirklbauer/Oberon-numeric-case-statement<br>
<br>
Note that this is a rather simple implementation containing no optimizations whatsoever, and which has not been stress-tested yet.<br>
<br>
Any input is welcome...<br>
<br>
<br>
--<br>
<a href="mailto:Oberon@lists.inf.ethz.ch" target="_blank" rel="noreferrer">Oberon@lists.inf.ethz.ch</a> mailing list for ETH Oberon and related systems<br>
<a href="https://lists.inf.ethz.ch/" target="_blank" rel="noreferrer">https://lists.inf.ethz.ch/</a>mailman/listinfo/oberon<br>
</blockquote></div><br></div>