
DECUS Pascal SIG Library Tape
  Chicago   Spring 1980


            (****************************************)
            (*                                      *)
            (*     DECUS  Pascal  SIG  "Chicago"    *)
            (*     Spring-80 Pascal Library Tape    *)
            (*                                      *)
            (*                                      *)
            (*          14  May  1980               *)
            (*                                      *)
            (*                                      *)
            (*          Tape format:                *)
            (*          9 track, 800 bpi,           *)
            (*          DOS-11                      *)
            (*                                      *)
            (*                                      *)
            (*      This is file PASCAL.RNO.        *)
            (*                                      *)
            (****************************************)




                            Contents
     
    ==================================================================
     
    (Note: uics/ppns are shown in octal;
     RSTS users should convert to decimal.)
     
      UIC   Description
    ------- -----------
     
     
    [70,1]  FIRST.FIL  (a file whose only  purpose is to put
                    some space between the beginning of tape
                    and the first useful file)
    [70,1]  PASCAL.TXT / PASCAL.RNO  (this file)
     
    -----------------
    [70,2]  Documentation for NBS Pascal (V 1.6e).
     
    -----------------
    [70,3]  Latest NBS Pascal (V 1.6e) for RSX11,
            for use on machines with fp11 hardware.
     
    -----------------
    [70,4]  Brian Nelson's implementation
            of NBS Pascal (V 1.6e) for RSTS.
     
    -----------------
    [70,5]  Floating point interpreter for NBS Pascal
            under RSX11, submitted by Steve Williams.
     
    -----------------
    [70,6]  NBS Pascal (V 1.6e) for RT11, for use
            on machines with fis hardware.  Adapted

DECUS Pascal SIG Library Tape                                   Page 2
  Chicago   Spring 1980


            to RT11 and fis by John Barr.
     
    -----------------
    [70,7]  Various Pascal utilities, submitted by
            John Barr and Bill Heidebrecht.
     
    -----------------
    [70,10] Utilities submitted by John Collins.
     
    -----------------
    [70,11] Interpreter for NBS Pascal, submitted by
            K.S. Bhaskar.  Demonstrates NBS Pascal
            intermediate code. 
     
    -----------------
    [70,12] Include preprocessor and external procedures
            for use with NBS Pascal under RSX-11M,
            submitted by Hugh Applewhite.
     
    -----------------
    [70,13] ODLGEN.PAS, a program which aids
            construction of overlay programs
            with NBS Pascal.  Submitted by Stephen
            Kamnitzer.
     
    -----------------
    [70,14] RMS interface to Pascal for RSX11,
            submitted by Tom Brentlinger.
     
    -----------------
    [70,15] PASRUF.PAS, a RUNOFF subset
            written in Pascal, submitted by
            Michelle Feraud.
     
    -----------------
    [70,16] SWS, a package for parsing character
            strings and setting switches.  For
            use with DEC 10 Pascal, FORTRAN and COBOL.
            Submitted by Robert P. Nix.
     
    -----------------
    [70,17] String.pas, a set of functions which implement
            strings in standard Pascal.
            Also contains Whetstone, quicksort and
            matrix inversion benchmarks for Pascal,
            Basic and FORTRAN.  Submitted by
            Oregon Software Inc.
     
    -----------------
    [70,20] Latest version of Swedish Pascal (V 6),
            submitted by Seved Torstendahl.
     
    -----------------
    [70,21] DKBLOCK, DXBLOCK, MTBLOCK for Swedish Pascal.
            Submitted by John Barr.

DECUS Pascal SIG Library Tape                                   Page 3
  Chicago   Spring 1980


     
    -----------------
    [70,22] Intel 8086 Cross Assembler and linker,
            written in Pascal. (Use Swedish Pascal to
            compile.) Submitted by Thomas Mathieu.
     
    -----------------
    [76,100], [76,101], [76,102], [76,103]:
            Self compiling version of Swedish Pascal (V 5.3);
            modified to compile itself on a PDP11 by
            Gerry Pelletier, of Transport Canada.
            Also a Pascal version of Joseph Weizenbaum's
            Eliza ("doctor"), and other utilities.
     
    -----------------
    [77,77] LAST.FIL - The last file on the tape;
            contains nothing useful.
     
     
    ==================================================================

DECUS Pascal SIG Library Tape                                   Page 4
  Chicago   Spring 1980


    General Information
    -------------------

         The DECUS Program Library and the DECUS  Tape  Copy  Facility
    provide  a clearing house function only;  programs are not sold or
    generated or tested.  All programs and information and copies  are
    provided  "as  is".   Digital  Equipment  Computer  Users Society,
    Digital Equipment Corporation, and the  contributor  disclaim  all
    warranties  on  the  programs,  including  without limitation, all
    implied warranties or merchantability and fitness.

         The DECUS Pascal Special Interest Group assembled  this  tape
    following  the  1980 Spring DECUS U.S.  Symposium held in Chicago,
    Illinois, on April 22-25, 1980.  This tape represents  the  Pascal
    SIG's  library for LSI 11, PDP 11, VAX 11, and DEC 10/20 machines.
    The tape is a superset of the Fall 79 (San Diego) Pascal  Library.
    Whether  you use one of the compilers available through DECUS or a
    compiler  obtained  from  another  source,   we   encourage   your
    participation in the Pascal SIG and its library.

         As you are probably aware, the various SIGs were swamped with
    requests  for  copies of the SIG tapes at previous DECUS Symposia.
    Starting with the 1979 Fall DECUS U.S.  Symposium, DECUS is trying
    a  new  approach  to the distribution of Symposium SIG tapes.  For
    the Chicago Symposium, the EDUSIG, Pascal, RSTS,  RSX,  RT-11  and
    VAX  SIGs  are  participating  in the plan.  With this new method,
    individual copies of the  SIG  tapes  will  not  be  made  at  the
    Symposium.   Instead,  DECUS  will  have  copies  made  after  the
    Symposium, and will mail a copy to each of the participating Local
    User  Groups  (LUGs).   Individuals  who  cannot  contact a LUG to
    obtain a copy locally may prepay for a copy of  the  tape  at  the
    Symposium.   There  will  be  a  limited number of copies made, in
    order to promote local participation.  We expect a similar plan to
    be  used  for  the  Fall  1980  DECUS Symposium in San Diego.  The
    International DECUS Chapters will receive copies of the SIG tapes,
    but  I  do  not  know what tape copy facilities they have, if any.
    Please refer to DECUS publications for exact details of the plan.


         There are two complete Pascal compilers  for  the  PDP-11  on
    this tape, "Swedish" Pascal and NBS Pascal, as well as a number of
    utility programs and procedures.

    Swedish Pascal
    --------------

         The so-called Swedish Pascal compiler was adapted to  RSX-11M
    by  Seved  Torstendahl.  Swedish Pascal is a single pass compiler,
    similar in structure to the  DEC  10/20  Pascal.   There  are  two
    versions  of  Swedish  Pascal on this tape, V5.3 and V6.  Both are
    identical to the versions distributed on the  Fall  79  San  Diego
    Pascal Tape.  Version 6 features an interactive symbolic debugger,
    and a number of  errors  have  been  corrected.   Version  5.3  is
    capable  of  compiling  itself on a PDP-11.  The modifications for
    this version were provided  by  Gerry  Pelletier.   We  expect  to

DECUS Pascal SIG Library Tape                                   Page 5
  Chicago   Spring 1980


    receive  a new version of Swedish Pascal in time for the Fall 1980
    Pascal Tape.

         Gerry Pelletier reports that the file  P11FIL.PAS,  found  in
    the  current  V6 distribution is actually a V5 source file, and is
    not compatible with V6.  However, the object file is ok.

    NBS Pascal
    ----------

         The NBS compiler is a new version of the one  distributed  at
    San  Diego.  A number of bugs have been fixed in this version (see
    documentation files for details).  NBS Pascal was  implemented  by
    Brian  Lucas  and Justin Walker, previously of the National Bureau
    of Standards, and now of Interactive Systems Corp.  NBS Pascal  is
    a  two  pass  compiler.   Pass  1 is based roughly on Urs Ammann's
    P-compiler, and pass 2 implements the Lucas / Walker PDP  11  code
    generator.   The  generated  code is in general smaller and faster
    than that of Swedish Pascal, but  no  options  are  available  for
    runtime checks.

         NBS  Pascal  assumes  the  existence  of  the  EIS  and  FP11
    hardware,  but  can  be partially run on machines with no floating
    point unit.  There is an alternate version  of  NBS  Pascal  which
    uses  the FIS instruction set instead of the FP11 instruction set,
    and which runs under RT11.  The RT11 version is self compiling  on
    an  LSI-11.   The FIS and RT11 implementation was provided by John
    Barr.  An fpp interpreter is  also  included  on  this  tape  (uic
    [70,5]),  for  using  the  compiler  on  PDP11s  without  the FP11
    hardware.

         NBS  Pascal  has  some  known  limitations  and  incompletely
    implemented  features  (see  the user's guide and news files).  As
    such, the compiler has the status  of  an  experimental  bootstrap
    compiler,  and  you  should  be aware of these restrictions before
    using it.  The Pascal SIG is implementing NBS Pascal for RSX, IAS,
    RSTS,  and  RT11, and the compiler is also implemented under UNIX.
    We also intend to have a VAX  native  mode  version  before  long.
    Justin  Walker,  John  Barr,  and  myself  are  doing  most of the
    maintenance, and Brian Nelson is doing the RSTS work.   Questions,
    comments and bug reports should be sent to myself or John Barr.

         There are some duplicate file names on this tape, so be  sure
    to  copy  files  from  the different UICs on the tape to different
    UICs on your disk.  For example, do NOT mix the  *.obj  and  *.mac
    files  from  Swedish  Pascal with those of NBS Pascal, as they are
    definitely not compatible.  The UICs on disk need not be the  same
    as  those  on  tape.   Before building either compiler, be sure to
    read all the documentation files for that compiler.
     
    On Bug Reports
    --------------

         The best way to report a compiler bug is  to  mail  a  source
    listing  of  the  smallest  sample  program  you  can  create that

DECUS Pascal SIG Library Tape                                   Page 6
  Chicago   Spring 1980


    exhibits the bug to Bill Heidebrecht or John Barr for  NBS  Pascal
    or Seved Torstendahl for Swedish Pascal.  Also include object code
    listings if appropriate, exact version number  of  compiler,  name
    and  version of operating system, type of computer, which hardware
    options are in the machine, sample output of the  program,  and  a
    description of the problem.  Also, if you have a possible solution
    or further information, please tell us as much  as  possible.   We
    will generally do what we can to fix bugs, but please remember, we
    are not DEC.  We are  under  no  obligation  to  provide  support,
    consultation,  etc.  Most of us are doing this work because we are
    enthusiastic about Pascal and want to see its use increase on  DEC
    machines.   If  you are not satisfied with either of the compilers
    on this tape, commercially supported compilers are available  from
    various sources.

    DEC 10 / 20 Pascal
    ------------------

         A Pascal compiler for DEC 10's and  20's  is  available  from
    Charles  Hedrick  at  Rutgers  (see  address  below).   It is also
    distributed by DECUS.  This compiler, known as System Programmer's
    Pascal,  is  a  variant  of the Nagel (Hamburg) compiler.  Charles
    Hedrick requests that if you mail him a tape  for  the  DEC  10/20
    compiler,  you  include  a  stamped,  self  addressed  return mail
    container.   Also  include  your   exact   hardware   and   system
    configuration.   Roy Touzeau (University of Montana) also supports
    a version of DEC 20 Pascal.
     
    IMPORTANT
    ---------

         You are free to make copies of  this  tape  for  other  DECUS
    members in your area.  It would be especially useful if you belong
    to a PDP11, VAX, etc Local User Group to make the  tape  available
    to  other  LUG  members.  BUT PLEASE, when making copies, COPY THE
    ENTIRE TAPE, including this file!  PLEASE MAKE IMAGE MODE  COPIES,
    so  that  the  uic  / ppn information is preserved.  RSX users may
    find the program TPC (available on old RSX SIG tapes) very  useful
    in making image mode copies.  VAX users may find the TPCPY utility
    (available on the VAX SIG tape) helpful.  RSTS users can use Brian
    Nelson's  Pascal program TC (on this tape) to make copies.  Please
    remember also, that the programs on  the  library  tape  generally
    have  the  status of public domain experimental research software,
    and they should not be turned into commercial products.
     
    Tape Format
    -----------

         The Pascal and other SIGs  are  looking  for  a  better  tape
    format in which to distribute future symposia tapes.  A new format
    must have at least the following characteristics:

         1.  Larger block size (say 2048 bytes).

         2.  Files  should  be  identified   by   filename   and   uic

DECUS Pascal SIG Library Tape                                   Page 7
  Chicago   Spring 1980


             (directory).   It  should  be possible to select files by
             name, type, or directory when reading the tape.

         3.  The format must be available to ALL DEC operating systems
             (and hopefully UNIX as well).

    The above is not a complete list of requirements, but it may  help
    put  the  problem  into  perspective.   One  solution  might be to
    enhance the features available in the various versions of  FLX  or
    FLX-like  programs,  and  speed  them  up.  If you have some ideas
    along these lines, I would like to hear from you.
     
    Library Contributions Sought
    ----------------------------

         We are looking for  quality  (checked  out)  Standard  Pascal
    programs  and  algorithms  of general utility for inclusion in the
    next Pascal SIG tape, to be assembled at San  Diego  in  November,
    1980.   As  of  this  writing, it appears that the Pascal SIG will
    expand its interest to C, Ratfor, Modula, Concurrent Pascal,  Ada,
    and  similar  languages.   The  SIG  may  also  change its name to
    reflect our interest in other structured high level languages.

         If you have utility software relevant to these  languages,  I
    would  appreciate  hearing  from  you.   To  avoid  duplication of
    effort, it would be best to call me (number below) or write before
    actually  sending  a  tape.   Submissions can also be delivered in
    person at the DECUS Symposium.  A signed tape  copy  release  form
    (available   from   DECUS)   must   accompany   each   submission.
    Proprietary or licensed software will not be accepted.

         Text files should be in ASCII, and the tape format should  be
    9  track  DOS-11  (RSX-FLX  or  RSTS-PIP).  Please include machine
    readable documentation either in the form of a RUNOFF source file,
    a  text  file,  or comments at the beginning of the program source
    file.  Documentation should include  author's  name,  address  and
    telephone  number,  and the purpose, usage and restrictions of the
    program.  In general, we will distribute only the  source  version
    and documentation of utilities in order to save space on the tape.
     
    Membership
    ----------

         If you are not already a member of DECUS and the DECUS Pascal
    SIG,  we  encourage  you  to join.  Membership forms are available
    from DECUS.  You need a DECUS member number before  you  can  join
    the  various  SIGs.  Completed membership application forms should
    be mailed to the nearest DECUS Chapter office.
     
     
                                 -- Bill Heidebrecht,
                                    DECUS Pascal SIG
                                    Program Librarian
     
                                    (213) 535-2805

DECUS Pascal SIG Library Tape                                   Page 8
  Chicago   Spring 1980


    Names and Addresses:
    --------------------
     
        Name                                Interest Area
    =========================================================
     
    DECUS U.S.
    Digital Equipment Computer Users Society
    One Iron Way,  MR2-3/E55
    Marlboro, Massachusetts  01752
    -----------------
     
    DECUS Australia
    P.O. Box 491
    Crows Nest, N.S.W. 2065
    Australia
    -----------------
     
    DECUS Canada
    P.O. Box 11500
    Ottawa, Ontario, K2H 8K8
    Canada
    -----------------
     
    DECUS Europe
    C.P. 510
    CH-1213 Petit-Lancy 1/GE
    Switzerland
    -----------------
     
     
    Dr. John R. Barr                Pascal SIG Chairman;
    Computer Science Dept           NBS Pascal (RSX-11 and RT-11);
    University of Montana           DEC 20 Pascal
    Missoula, Montana  59812
     
    (406) 243-2883
    -----------------
     
    Dr. Roy F. Touzeau              Pascal SIG Newsletter Editor;
    Computer Science Dept           DEC 20 Pascal
    University of Montana
    Missoula, Montana  59812
    -----------------
     
    Bill Heidebrecht                Pascal SIG Librarian;
    TRW DSSG                        NBS Pascal (RSX-11 and VAX);
    R2 / 1170                       Concurrent programming languages
    One Space Park
    Redondo Beach, California 90278
     
    (213) 535-2805
    -----------------
     

DECUS Pascal SIG Library Tape                                   Page 9
  Chicago   Spring 1980


    Justin Walker and               NBS Pascal authors (UNIX)
    Brian Lucas
    Interactive Systems Corp.
    1050 17th Street, N.W.
    Suite 580
    Washington, D.C. 20036
    -----------------
     
    Brian Nelson                    NBS Pascal (RSTS)
    University of Toledo
    Computer Services
    2801 West Bancroft
    Toledo, Ohio  43606
     
    (419) 537-2511
    -----------------
     
     
    Seved Torstendahl               "Swedish" Pascal author
    Telefon AB LM Ericsson
    TN/X/Tdg
    S-126  25  Stockholm
    Sweden
     
    (tel. 08 / 719 4909)
    -----------------
     
     
     
    Gerry Pelletier                 "Swedish" Pascal
    Transport Canada (TARI)
    Transport Canada Bldg.
    Place de Ville
    Ottawa, Ontario
    Canada  K1A 0N8
    -----------------
     
     
    Susan Murray                    "Swedish" Pascal
    School Computer Unit, ANU
    PO Box 4
    Canberra, ACT 2601
    Australia
    -----------------
     
     
    Charles Hedrick                 System Programmer's Pascal
    Computer Science Dept.          for DEC 10/20
    Rutgers University
    Hill Center
    New Brunswick, NJ 08903
     
    (201) 356-2593
    -----------------
     

DECUS Pascal SIG Library Tape                                  Page 10
  Chicago   Spring 1980


     
    Steven McGeady                  C on DEC Operating
    Kockums Industries              Systems
    P.O. Box 575
    Tualatin, OR  97062
     
    (503) 638-9811
    -----------------
     
     
    Kevin Thomas                    C on DEC 10/20
    Morgan Guaranty
    15 Broad St  (11/30)
    New York City, NY  10015
     
    (212) 483-2736
    -----------------
     
     
    Gary Beckmann                   RATFOR
    Joint Center for
      Radiation Therapy
    50 Binney St.
    Boston, MA 02115
     
    (617) 732-8508
    -----------------
     
    =========================================================

