1
0
mirror of https://github.com/retro-software/B5500-software.git synced 2026-01-11 23:42:42 +00:00
Paul Kimpel 85679ca58d Prepare for CUBE Library files.
Move and rename earlier transcriptions of files from the CUBE Library so
that they will underlay the the respective files extracted from the
CUBE-13 tapes and appear as versioned history of the extracted files.
2018-05-26 15:42:06 -07:00
..
2018-05-26 15:42:06 -07:00

KRUNCH and UNKRNCH Utilities for the Burroughs B5500

KRUNCH reads a card deck containing a B5500 Algol source program,
removing all extraneous spaces and reducing the source to the minimum
number of card images, writing the filtered source to the card punch.
All comments are also removed from the source, and the output deck is
resequenced 10+10. The source program is still compilable, but it is not
very readable. A sample run deck would be:

        ?EXECUTE KRUNCH/UTILITY
        ?DATA CARD
            :                   :
            : Algol source deck :
            :                   :
        ?END

UNKRNCH reads a B5500 Algol source program and reformats it, applying
standard spacing and indentation to it. It was probably written
originally to reverse what KRUNCH does, but it will work on any Algol
source to function as a primitive "pretty print" formatter. It preserves
comments in the input, but of course cannot reinsert comments that were
stripped out by KRUNCH.

Input can be from a card deck or a "0CRDIMG" library tape (unblocked
card images). Output can be to a new punched card deck, another
"0CRDIMG" tape, or the line printer. The reformatted program is
resequenced 100+100. The program reads a parameter card in free-field
format with two integers that define the modes of input and output. The
values of these integers are defined in a comment at the beginning of
the source. A sample run deck to read the original program from cards
and output to the line printer would be (note the trailing comma on the
parameter card):

        ?EXECUTE UNKRNCH/UTILITY
        ?DATA CARD
        0,2,
            :                   :
            : Algol source deck :
            :                   :
        ?END

These programs appear to have been written by someone at Burroughs. They
were donated by Burroughs to the CUBE (user association) library in
1968. I encountered them at the University of Delaware in 1970 and saved
compile listings of them.

The source files below were transcribed from those listings before the
CUBE Library tapes became available to this project in May 2018. The
transcriptions have now been renamed and moved under the respective
files extracted from the CUBEB13 tape so that they will appear in the
versioned history of those files.

KRUNCH.UTILITY.alg_m
    Transcribed source for the KRUNCH program. Moved to the versioned
    history of /CUBE-Library-13/Files/KRUNCH-V0104AA.alg in this
    repository.

KRUNCH.PATCH.alg
    Patch for KRUNCH containing the one-line difference between the
    version on the CUBEB13 tape and the listing of the program obtained
    at U.Delaware in 1970. This appears to recognize "%" comments and
    drop them from the crunched output.

KRUNCH-As-Krunched.card
    Card deck resulting from running the original transcribed source for
    KRUNCH through KRUNCH itself.

KRUNCH-Compile.lst
    Algol compile listing for KRUNCH generated using the retro-B5500
    emulator running Mark XIII software.

UNKRNCH.UTILITY.alg_m
    Transcribed source for the UNKRNCH program. Moved to the versioned
    history of /CUBE-Library-13/Files/UNKRNCH-V0107AA.alg in this
    repository.

UNKRNCH-Compile-Run.lst
    Algol file listing for UNKRNCH generated using the retro-B5500
    emulator running Mark XIII software, followed by an execution of
    UNKRNCH that read the KRUNCH-As-krunched.card file and output the
    reformatted source to the line printer.

__________
2016-05-30 Paul Kimpel
    Commit original transcription.
2018-05-26 Paul Kimpel
    Rename and move transcribed sources under /CUBE-Library-13.