
<html><head><meta http-equiv="Content-Type" content="text/html; charset=utf-8"></head><body style="word-wrap: break-word; -webkit-nbsp-mode: space; line-break: after-white-space;" class="">Dear Prof. Cayuela,<div class=""><br class=""></div><div class="">I use a DOS emulator called Boxer, under macOS 10.14.6 (Mojave). </div><div class="">Boxer is based on DOSBox 0.74. </div><div class=""><br class=""></div><div class=""><div class=""><a href="http://boxerapp.com/" class="">http://boxerapp.com/</a></div><div class=""><a href="https://www.dosbox.com/" class="">https://www.dosbox.com/</a></div></div><div class=""><br class=""></div><div class="">Works very well!</div><div class=""><br class=""></div><div class="">Regards,</div><div class=""><br class=""></div><div class="">Hans Klaver</div><div class=""><br class=""></div><div class=""><div><br class=""><blockquote type="cite" class=""><div class="">Op 4 okt. 2020, om 15:32 heeft Pablo Cayuela <<a href="mailto:pablo.cayuela@gmail.com" class="">pablo.cayuela@gmail.com</a>> het volgende geschreven:</div><br class="Apple-interchange-newline"><div class=""><div dir="auto" class=""><div class="">Dear Hans Klaver,</div><div dir="auto" class="">As a side note, I do have some versions of DOS Oberon too, and I didn't get the source code either.</div><div dir="auto" class="">I wonder about the print screen picture that you included it.</div><div dir="auto" class="">In what DOS emulator do you have DOS Oberon working, and in what host operating system?</div><div dir="auto" class="">Thank you in advance.</div><div dir="auto" class=""><br class=""></div><div dir="auto" class="">Prof Pablo Cayuela</div><div dir="auto" class="">Argentina</div><div dir="auto" class=""><br class=""></div><div dir="auto" class="">PS: I'm also searching for the source code of DOS Oberon, if anyone have some direction I'll appreciate it.</div><div dir="auto" class=""><br class=""><div class="gmail_quote" dir="auto"><div dir="ltr" class="gmail_attr">El dom., 4 oct. 2020 2:46, Hans Klaver <<a href="mailto:hklaver@dds.nl" target="_blank" rel="noreferrer" class="">hklaver@dds.nl</a>> escribió:<br class=""></div><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div style="word-wrap:break-word;line-break:after-white-space" class=""><div class="">I wonder if it is known that the output of the present PO version of Texts.WriteReal and Texts.WriteRealFix for various borderline values can be completely false due to untrapped overflow of FLOOR(x)? Although it is acceptable that floating point representation of real numbers produces round-off errors, the output of obviously wrong values is undesirable. </div><div class=""><br class=""></div><div class="">While looking into this I compared the output of these procedures with the same in my first Oberon (DOS Oberon V1.4, which I ordered from ETH Zurich in the early nineties). I don't have the source code of that early Oberon version, but I suppose it uses the source as published in the 1992 Project Oberon book. For the present PO version prof. Wirth rewrote these procedures, originally by J. Gutknecht.</div><div class="">...<br class=""></div><div class=""><br class=""></div><div class="">Does anyone have a suggestion? Could it be that the TRAP7 is not due to integer overflow but to an array index overflow?<br class=""><br class="">--</div><div class="">Hans</div><div class="">...<br class=""></div><div class=""><br class=""></div><div class="">-----------------</div><div class=""><br class=""></div><div class="">The screenprint below shows the TRAP 7 produced by Text.WriteRealFix in DOS Oberon V1.4.</div><div class="">The present versions of Texts.WriteReal and Texts.WriteRealFix should show a TRAP in similar cases, imho.</div><div class=""><br class=""></div></div>--<br class="">

</blockquote></div></div></div>

--<br class=""><a href="mailto:Oberon@lists.inf.ethz.ch" class="">Oberon@lists.inf.ethz.ch</a> mailing list for ETH Oberon and related systems<br class=""><a href="https://lists.inf.ethz.ch/mailman/listinfo/oberon" class="">https://lists.inf.ethz.ch/mailman/listinfo/oberon</a><br class=""></div></blockquote></div><br class=""></div></body></html>