- Oberon - mailman3.inf.ethz.ch

Andre's Watson.html.
by peter＠easthope.ca 11 Oct '21

11 Oct '21

Hi, Andre's Watson.html is at http://easthope.ca/Watson.html . Two details puzzle me. (1) Bellow "DEFINITION Items" are several instances of a graphical object which an be described as a horizontal black ellipse on a grey background. Can anyone explain the intention of this graphic? (2) The last three headings at the bottom of the page cite "OMEGA only". What is OMEGA? Thanks, ... P. -- [48.7693 N 123.3053 W] [mobile: +1 778 951 5147] [VoIP: +1 604 670 0140]

3 2

Re (2): Andre's Watson.html.
by peter＠easthope.ca 10 Oct '21

10 Oct '21

> Omega was one of the first industrial projects using Oberon as OS. > It was designed and coded by Josef Sedlacek. > His company Radiar http://www.radiar.ch/page_en.html still uses Oberon. Thanks J=C3=B6rg. Will add a footnote. ... P. -- [48.7693 N 123.3053 W] [mobile: +1 778 951 5147] [VoIP: +1 604 670 0140]

1 0

Re: [Oberon] Unreferenced/unused code in Project Oberon 2013
by Chris Burrows 28 Sep '21

28 Sep '21

> > -----Original Message----- > > From: Oberon [mailto:oberon-bounces@lists.inf.ethz.ch] On Behalf Of > > Michael Schierl > > Sent: Sunday, 28 April 2019 6:13 AM > > To: ETH Oberon and related systems > > Subject: [Oberon] Unreferenced/unused code in Project Oberon 2013 > > > > I used some scripts to identify unreferenced code (after stumbling > > upon some unused variables in TextFrames) > I previously objected to removing unreferenced code in a reply to this message but the mention of unused variables did grab my attention. The latest (v8) versions of my ARM Cortex-M Oberon-07 compilers now warn of unused imports, consts, types and variables. Most of the time these are harmless but every now and then they can usefully indicate a potential source of problems that has been overlooked. I am working on a similar change to the Astrobe for RISC5 compiler. Other compilers based on the Project Oberon RISC5 compiler can be modified to do the same. The changes might be something like this: 1. Introduce a new field into ORB.ObjDesc: used: BOOLEAN 2. Initialise 'new.used' to FALSE in ORB.NewObj after 'new' is created. 3. Set 'new.used', if the object is found, in ORB.ThisObj: .... UNTIL (x # NIL) OR (s = NIL); IF x # NIL THEN x.used := TRUE END; 4. Set 'obj.used' for pointers in ORP.Declarations ... IF obj.name = ptbase.name THEN ptbase.type.base := obj.type; obj.used := TRUE END ; 5. Introduce a new procedure in ORP to report the unused objects: PROCEDURE CheckUnused(); VAR x: ORB.Object; BEGIN x := ORB.topScope.next; WHILE (x # NIL) DO IF ~x.used & ~x.expo & ((x.class # ORB.Mod) OR x.rdo) THEN ORS.Mark("!" + x.name + " is not used") END; x := x.next END END CheckUnused; 6. Allow for warnings (message beginning with '!') as well as error messages in ORS.Mark: IF msg[0] # "!" THEN INC(errcnt); errpos := p + 4 END 7. Call CheckUnused in ORP.Module, after the statement sequence has been processed, to warn about unused globals: ... IF sym = ORS.begin THEN ORS.Get(sym); StatSequence END ; CheckUnused(); 8. Call CheckUnused in ORP.ProcedureDecl after the RETURN has been processed to warn about unused locals: ... ORG.Return(type.base.form, x, locblksize, int); CheckUnused(); Unused locals warnings will appear when each procedure has been compiled. Unused global warnings will appear after the whole module has been compiled. Regards, Chris Burrows CFB Software https://www.astrobe.com/RISC5

2 3

Eigen Compiler Suite
by Florian Negele 24 Sep '21

24 Sep '21

Dear all, I would like to introduce you to the Eigen Compiler Suite, a software development toolchain that features a fully compliant Oberon-2 front-end: https://ecs.openbrace.org/ Its latest development version is available for evaluation via the News link in the Download section and requires registration for now. The compiler is free software and runs natively on Windows, OS X, as well as Linux-based systems while targeting several hardware architectures and runtime environments. Although the included Oberon library is still in its infancy and there are only few bindings to external interfaces, the implementation of the language itself and its documentation are rather mature and thus suitable for programming embedded systems. Thank you for your attention, Florian Negele

1 1

Another Project Oberon RISC emulator
by Frederik Zipp 17 Sep '21

17 Sep '21

Hi all, I ported Peter De Wachter’s Project Oberon RISC emulator [1] to Go: https://github.com/fzipp/oberon <https://github.com/fzipp/oberon> There are two variants: 1) cmd/oberon-emu: A pure Go version which starts a server that uses WebSockets to communicate with a web browser HTML canvas as a display as well as for keyboard and mouse input. 2) cmd/oberon-emu-sdl: A version based on Cgo+SDL, which requires libsdl2 development files to build. I also ported Niklaus Wirth’s Project Oberon RISC compiler to Go: https://github.com/fzipp/oberon-compiler <https://github.com/fzipp/oberon-compiler> I did it for self-educational purposes, to read and understand Wirth's original source code carefully. Additionally, I found it useful to have a compiler that runs outside the target system, so I could develop code in an environment that is more familiar to me before transferring it to the target system. Best regards, Frederik [1] https://github.com/pdewacht/oberon-risc-emu

2 2

Re: [Oberon] Oberon Digest, Vol 208, Issue 5
by Sebastian Fleex 13 Sep '21

13 Sep '21

Hallo, ich arbeite ab und zu in speziellen Fragen der Benutzerfreundlichkeit mit Blackbox 1.8.2 als ich anfing hatte ich nur v24 Compiler aber für grafische Darstellungen und Hardware ging das ganz gut im dualen Studium Elektroniker für Geräte und Systeme. Aber ads interessante Büffel zeug von wirths hat sich echt noch schwer lesen lassen. LG Basti (Thüringen /Sondershausen 99706) <oberon-request(a)lists.inf.ethz.ch> schrieb am Mo., 13. Sep. 2021, 12:00: > Send Oberon mailing list submissions to > oberon(a)lists.inf.ethz.ch > > To subscribe or unsubscribe via the World Wide Web, visit > https://lists.inf.ethz.ch/mailman/listinfo/oberon > or, via email, send a message with subject or body 'help' to > oberon-request(a)lists.inf.ethz.ch > > You can reach the person managing the list at > oberon-owner(a)lists.inf.ethz.ch > > When replying, please edit your Subject line so it is more specific > than "Re: Contents of Oberon digest..." > > > Today's Topics: > > 1. Re: Ceres and Lilith at the Museum f?r Kommunikation Bern > (Nemo Nusquam) > > > ---------------------------------------------------------------------- > > Message: 1 > Date: Sun, 12 Sep 2021 15:46:16 -0400 > From: Nemo Nusquam <cym224(a)gmail.com> > To: oberon(a)lists.inf.ethz.ch > Subject: Re: [Oberon] Ceres and Lilith at the Museum f?r > Kommunikation Bern > Message-ID: <bfb20f0a-4980-309c-7d11-297385ab4128(a)gmail.com> > Content-Type: text/plain; charset=utf-8; format=flowed > > On 2021-09-11 19:38, Chris Burrows wrote: > > I am no fan of Facebook but they do have a Modula and Oberon group > > which often has interesting links that I might not otherwise have > > heard about e.g: > > > > ?A video from Museum f?r Kommunikation Bern, they have a lot of ex-ETH > > hardware including Oberon (Ceres) and Modula-2 (Lilith) workstations. > > The video can be translated by using the subtitles function.? > > > > https://www.youtube.com/watch?v=XdC_Z6XbQgU > > > > The "Modula & Oberon" group can be found at: > > > > https://www.facebook.com/Wirthians/ > > Thank you for the link, Chris.? I am not on FB but I can view the group. > > Sincerely, > N. > > > > > Regards, > > Chris Burrows > > > > CFB Software > > https://www.astrobe.com > > https://www.cfbsoftware.com/modula2 > > -- > > Oberon(a)lists.inf.ethz.ch mailing list for ETH Oberon and related systems > > https://lists.inf.ethz.ch/mailman/listinfo/oberon > > > > ------------------------------ > > Subject: Digest Footer > > -- > Oberon(a)lists.inf.ethz.ch mailing list for ETH Oberon and related systems > https://lists.inf.ethz.ch/mailman/listinfo/oberon > > > ------------------------------ > > End of Oberon Digest, Vol 208, Issue 5 > ************************************** >

1 0

Ceres and Lilith at the Museum für Kommunikation Bern
by Chris Burrows 12 Sep '21

12 Sep '21

I am no fan of Facebook but they do have a Modula and Oberon group which often has interesting links that I might not otherwise have heard about e.g: “A video from Museum für Kommunikation Bern, they have a lot of ex-ETH hardware including Oberon (Ceres) and Modula-2 (Lilith) workstations. The video can be translated by using the subtitles function.” https://www.youtube.com/watch?v=XdC_Z6XbQgU The "Modula & Oberon" group can be found at: https://www.facebook.com/Wirthians/ Regards, Chris Burrows CFB Software https://www.astrobe.com https://www.cfbsoftware.com/modula2

2 1

Re (2): Identities of releases.
by peter＠easthope.ca 10 Sep '21

10 Sep '21

From: Michael Schierl <schierlm(a)gmx.de> Date: Thu, 9 Sep 2021 21:20:09 +0200 > Codenames are a different story, but I would not use "alpha" or "beta" > as a codename for a release, just because it can be confused with the > software release phases. Remove "Alpha" from text and headings? Identify release only as 2.3.6 or 2.3.7? https://en.wikibooks.org/w/index.php?title=Oberon/ETH_Oberon&stable=0#Modul… The 2.3.6 sources can be added to the tables, if advisable. The Fischer tutorials will keep me busy for at least a few months. Thx, ... P.L. -- 48.7693 N 123.3053 W mobile: +1 778 951 5147 VoIP: +1 604 670 0140

1 0

Identities of releases; was: Modules in ETH Oberon ...
by peter＠easthope.ca 09 Sep '21

09 Sep '21

From: Michael Schierl schierlm at gmx.de, Sat Aug 7 22:22:59 CEST 2021 > I am not aware of a 2.3.6 alpha release. There is a 2.3.7 alpha > "release", but 2.3.7 is not 2.3.6 :-) I don't recall seeing an explanation of the notation identifying releases. Read here hoping for some insight to the meaning of "alpha" and "beta". https://en.wikipedia.org/wiki/Software_release_life_cycle Will hypothesize that, for 2.3.6, "beta" was meant to indicate that it was tested more than 2.3.7. For 2.3.7, "alpha" was meant to indicate that it was tested less than 2.3.6. Release numbers x.y.z are a mystery. Ideas? The release number is now in the headings here. Tips for further clarification welcome. https://en.wikibooks.org/wiki/Oberon/ETH_Oberon#Module_Sources_in_ETH_Obero… Thx, ... P.L. -- 48.7693 N 123.3053 W mobile: +1 778 951 5147 VoIP: +1 604 670 0140

2 1

Display modules in ETH Oberon.
by peter＠easthope.ca 09 Sep '21

09 Sep '21

Sources for the display modules are now available here. https://en.wikibooks.org/wiki/Oberon/ETH_Oberon#Module_Sources_in_ETH_Obero… Package File ========+============== Apps1 GfxDisplay.Mod Build DisplayMach64.Mod Build DisplayTool.Mod Build DisplayVGA4.Mod Build S3TrioC.Display.Mod Build SVGAH.Display.Mod Build SVGAL.Display.Mod Build Trace.Display.Mod Gadgets Display3.Mod Gadgets Displays.Colors.Mod Lab DisplayBackdrop.Mod System DisplayLinear.Mod System Displays.Display.Mod System Displays.Mod System Empty.Display.Mod System GD54xx.Display.Mod System OGLDisplay.Mod System S3C805.Display.Mod System S3C924.Display.Mod System S3Trio.Display.Mod System SVGA.Display.Mod System VGA.Display.Mod System W32.Display.Mod Regards, ... P.L. -- 48.7693 N 123.3053 W mobile: +1 778 951 5147 VoIP: +1 604 670 0140

1 0