• Please review our updated Terms and Rules here

Modula-2 and PDP-11

Hunta

Experienced Member
Joined
Mar 23, 2021
Messages
188
Location
Samara, Russian Federation
V1A Edit #2 9-Nov-84 Autor: G.Maier File: NOTE.TXT


M2RT11 Release Notes
--------------------

This updated M2RT11 distribution kit contains a revised version
of the Modula-2 Compiler (M23) as well as the following additions
not described in INSTAL.TXT and GUIDE.TXT:

- M2C*.SYM: the symbol files of the compiler

- M2CDEF.COM: command file to compile the definition modules
M2C*.DEF of the compiler

- M2CMOD.COM: command file to compile M2C*.MOD

- M2CLNK.COM: command file to link a compiler which assumes FIS

- DB*.(TXT,DEF,MOD,SYM,LNK,COM): a new debugger for structured
data

- DECREF.MOD: a reference file decoder (new reference file syntax)

DBUG.TXT includes the informations needed additionaly to DEBUG.TXT to
install and use the new debugger for structured data which uses
a new reference syntax. Therefore, pass 2 (M2CP2) has to be linked
with the OLD implementation M2CREO.LNK of the module M2CREF, if the
OLD debugger is used. (The old debugger needs reference files generated
by M2CP2 linked with M2CREO.LNK, the new debugger needs reference
files generated by M2CP2 linked with M2CREF.LNK or M2CREN.LNK.)

------------

Installation Instructions
__________________


Modula-2 system


The Modula-2 system is an implementation of the programming
language MODULA-2 on the PDP-11 computers. The system has been
developped by a group under the direction of Prof. N. Wirth at
the Institut fur Informatik of the ETH Zurich.

The responsibilities for the different parts of the system were
divided in the implementors group as follows:

Resident system : Christian Jacobi
Compiler : Leo Geissmann
Anton Gorrengourt
Christian Jacobi
Svend Erik Knudsen
Linker, Loader : Anton Gorrengourt
Christian Jacobi
Hans Heinrich Naegeli

Acknowledgement is also due to Urs Ammann, who contributed at
the compiler in the earlier stages of the project and to Andrea
Ventura, the author of the debugger module.

The author of this memo is Leo Geissmann.




Institut fur Informatik, ETH
CH-8092 Zurich

......


1. Requirements
____________

Hardware : PDP-11/40 (or other PDP-11 computers with the same
instruction set).
EIS option.
FIS or FPP option for real number arithmetics.

Emulation of EIS and/or FIS should be possible.

Optionally PDP-11/03 (LSI).

Operating system : RT-11SJ - V03 B, or RT-11SJ V04.00 .
 

bqt

Veteran Member
Joined
Sep 15, 2019
Messages
506
Location
Zurich, CH
I have Modula-2 for RSX. However, I am missing something like three files. Do you have sources? I sortof suspect there is a lot of shared bits between them...
 

daver2

Veteran Member
Joined
Jun 19, 2012
Messages
8,789
Location
UK - Worcester
Just out of interest - is the (RT-11) kit available for download from somewhere?

Another 'language of interest' to tick off my list...

Dave
 

whartung

Veteran Member
Joined
Apr 23, 2020
Messages
616
Does this system compile to the common Modula-2 P-Machine? or to machine language?
 

daver2

Veteran Member
Joined
Jun 19, 2012
Messages
8,789
Location
UK - Worcester
>>> Is available for download from me? - after a while :)

I am eagerly waiting...

I used Modula-2 as my main programming language on the first Amiga A1000 I got (a USA import). I came from a Pascal background - and couldn't understand 'C' at the time. 'C' is now my 'GOTO' language - but not on a PDP-8 or PDP-11!

Dave
 

cbscpe

Experienced Member
Joined
Apr 11, 2017
Messages
369
Location
Switzerland
I remember a workshop I visited in BBC Dättwil where we had an introduction to Modula-2 on PDP-11, still at a very early stage, I really liked the concepts very much. But back to work I continued to use MACRO-11 which up to now is still may favourite programming language on PDP-11.
 

Hunta

Experienced Member
Joined
Mar 23, 2021
Messages
188
Location
Samara, Russian Federation
MACRO-11 with macros. Impressed by Modula-2.

Code:
.NLIST
.INCLUDE /KXX: DSMAC.MAC/
.INCLUDE /KXX:MYMAC.MAC/
.INCLUDE /KXX:ASCII.MAC/
.INCLUDE /KXX:HWDF.MAC/

.INCLUDE /MACRO.MAC/

.LIST

D$EBUG =: ^O<1>

MODULE NAME=<CFUTIL>, REL=<CU>, VER=<01>, COMM=<CF Utility>

  FROM SYSMAC IMPORT .ASSUME
  FROM SYSMAC IMPORT .GTLIN, .PRINT, .SETTOP, .TRPSET, .EXIT
  FROM SYSMAC IMPORT .CSISPC, .DSTAT
  FROM SYSMAC IMPORT .FETCH, .LOCK
  FROM SYSMAC IMPORT .ENTER, .LOOKUP, .READW, .WRITW, .CLOSE
  FROM SYSMAC IMPORT .UNLOCK .RELEASE

  C$UNKN =: ^O<0>
  C$READ =: ^O<1>
  C$WRIT =: ^O<2>
  C$COMP =: ^O<3>
  C$INFO =: ^O<4>

  FCHANL =: ^O<1>

  $ASCII

    PROMPT:
      .ASCII /CFU>/<200>

.......

  PROCEDURE PFILE
  BEGIN
    IF FDESC EQ #0 THEN
      LET FDESC := <#^RDK >
    END

    .DSTAT #DSTAT, #FDESC
    IF RESULT IS CC THEN

      CLC
        IF FDESC+2 EQ #0 AND FDESC+4 EQ #0 THEN
          IF DSTAT MI #0 OR ICMD NE #C$INFO THEN ; FILST$ = 100000
            PRINT <Only non-file structerd device possible>
            PRINT < as device-only name and for GETINFO only>
            SEC
          END
        END
        IF RESULT IS CC THEN

          IF DSTAT+4 EQ #0 THEN
            LET R1 := DSTAT+2
            CALL GETMEM
            IF RESULT IS CC THEN
              .FETCH R0, #FDESC
              IF RESULT IS CS THEN
                SEC
                PRINT <FETCH error>
              END
            ELSE
              SEC
              PRINT <Error while getting memory for FETCH>
            END
          END

          IF RESULT IS CC THEN
            .LOCK
            IF RESULT IS CC THEN
              IF ICMD EQ #C$READ OR ICMD EQ #C$INFO THEN
                CALL FENTER
              ELSE
                CALL FLUKUP
              END
           ELSE
             PRINT <LOCK 1 error>
             SEC
           END
         END

       END
     ELSE
       PRINT <Invalid device for file>
       SEC
     END
     RETURN
   END PFILE

..........

  END CFUTIL

.END MAIN
 

MattisLind

Veteran Member
Joined
Sep 30, 2013
Messages
1,006
Location
Stockholm, Sweden
What happened to this? I found three RX02 disks with Modula-2 written on them. But they seems to be hard to recover. There is mold on two of them and the third is squealing a lot and gives plenty of errors. But there is no shedding. I can try cyclomethicone to see if that helps.

But there is no point in doing the effort if someone else already imaged a copy of Module 2 for RT-11. Btw. This is a three disk set. I have no idea about version since it is a handwritten label.
 

jdreesen

Experienced Member
Joined
Jul 5, 2012
Messages
307
Location
Switzerland
I have all the distribution disks for Modula-2 on the PDP11 ( from G. Dotzel Modulaware) Also Occam for the PDP11 and a set of disks for Per Brink Hansen's "Edison" system.
What I do not have at the moment is a running RX02 equipped PDP11....

Jos
 

MattisLind

Veteran Member
Joined
Sep 30, 2013
Messages
1,006
Location
Stockholm, Sweden
Then lets hope that your disks are in better shape than mine!

BTW. I am using a Shugart connected to a Catweasel board for recovering the disks. Not a RX02.
 

MattisLind

Veteran Member
Joined
Sep 30, 2013
Messages
1,006
Location
Stockholm, Sweden
They are not made any more. I am not sure if there are moden alternatives. Perhaps any of the Applesauce, Fluxengine or Greaseweazle can handle RX02. I don’t know really.
 

Al Kossow

Documentation Wizard
Joined
Sep 1, 2006
Messages
2,914
Location
Silicon Valley
decus version is here ftp://ftp.trailing-edge.com/pub/rt11freewarev2/split/sigtapes/11s083/modula
but I assume that's something different
 
Top