Page 1¶

Norsk Data A.S¶

PROGRAM DESCRIPTION

Date	Page
87.09.07	1 of 4

Product¶

Name	Reg. no.	Category
FORTRAN Crosscompiler for ND-100 running on ND-500	210863G	STPR

Reason¶

X Error Correction
X Change/Addition

Documentation¶

Title	Reg. no.
ND FORTRAN Reference Manual	60.145.8 EN
User Guide for ND FORTRAN	60.265.1 EN

Purpose¶

ANSI 77 FORTRAN compiler running on ND-500, producing code for ND-100/NORD-10 and runtime system.

Prerequisites¶

Computer Type	Floating format	Op. system Version
ND-500		SIN III VSX >=J

Minimum mass storage resources for installation¶

User	Userspace	Number of files
`<dummy user>`	155 pages	4 files
`<domain user>`	145 pages	3 files
SYSTEM	113 pages	2 files

Minimum permanent mass storage resources¶

User	Userspace	Number of files
`<domain user>`	145 pages	3 files
SYSTEM	113 pages	2 files

Reg. no. for Source 210351L

File Information¶

File Name	Type	Containing
FORTRAN-100-G	LINK	FORTRAN compiler
FORTRAN-100-G	DSEG	FORTRAN compiler
FORTRAN-100-G	PSEG	FORTRAN compiler
FOR32-1BANK-G	BRF	1-bank runtime system
FOR32-2BANK-G	BRF	2-bank runtime system
FORT48-1BANK-G	BRF	1-bank runtime system
FORT48-2BANK-G	BRF	2-bank runtime system
IN-FORT--G	PROG	Installation file
IN-FORT--G	INIT	Installation file
IN-FORT--G	RSRC	Installation file

NOTE: <rev> and <lang> are to be replaced by the current revision level and language code of the DIRECTORY or FILE. The revision level and language code is found on the preceding "ND SOFTWARE LIBRARY DISKETTE" pages.

Page 2¶

Program Description¶

Product	Name	Reg. no.	Category
	FORTRAN Crosscompiler for ND-100 running on ND-500	210863G	STPR

1. Error Correction¶

Error when an implied do-loop inside a do-loop was compiled with ARRAY-INDEX-CHECK ON.
Error when using '!' in format statement and as inline-comment.
Close for unit 100 (scratch file) is corrected.
The values of FORMATTED and UNFORMATTED parameters in INQUIRE statement are corrected.
The unformatted I/O of arrays over 32 kB is corrected.
By unsuccessful unformatted reading from outside of a file, the max-byte-pointer was increased.
Programs trying to open more than 20 files were hanging.
Close(-1) closed only 1 file.

2. Changes/Addition¶

NEW FILE-FORMAT FOR SEQUENTIAL UNFORMATTED I/O WITH VARIABLE RECORD-LENGTH. Four bytes before and beyond each record is used to hold the record length. This new file-format is used in the cases when READ and WRITE statements do not have REC or FMT specifiers, and the OPEN statement does not have RECL specifier. As a consequence of this new format, it is now possible to backspace, skip records when reading and have empty records in the file. This is all part of the FORTRAN'77 standard. The only place where this new format will cause trouble is when using unformatted sequential I/O with variable record-length, and the file is written with the old format and read with the new format.

When using unformatted sequential I/O with fixed record length, the old file format is used if the RECL specifier in the OPEN statement is used.
Inquire for remote files is now implemented. Because of some restrictions in Sintran INQUIRE by Name returns only deabbreviated file-name.
The testing of correct values of the parameters to runtime routines that was done only at runtime, is now done at compile-time when possible.

Page 3¶

Program Description¶

Product	Name	Reg. no.	Category
	FORTRAN Crosscompiler for ND-100	210863G	STPR
	running on ND-500

3 Installation Procedure¶

FORTRAN Crosscompiler and runtime system for ND-100 is supplied on five diskettes, with directory name 210863G--01S to 210863G--05S. If you have ordered DS/DD diskette, the name is 210863G--01D.

Installation procedure to generate the FORTRAN system:

Log in as user SYSTEM and perform the following commands:

@ENTER-DIRECTORY 210863G<rev>-<lang>-01,F-D-1,,,
@(210863G<rev>-<lang>-01:FLOPPY-USER)IN-FORTW

The installation program will ask for and give the necessary information to install the system.

Page 4¶

Program Description¶

Date	Norsk Data A.S	Page	of
87.09.07		4	4

Product	Reg. no.	Category
Name	210863G	STPR
FORTRAN Crosscompiler for ND-100 running on ND-500

4 Change Default Values¶

It is possible to change the default value of some system variables permanently. The change is achieved by executing the following commands (or mode file):

@ND∟
N500: LOOK-AT-DATA <addr>,FORTRAN-100-G<rev> ∟
PER∟
<value>∟
EXIT∟
EXIT∟

<addr> is the address of the system-variable, and <value> is the value to be inserted.

`<addr>`	`<value>`	effect
1'14110B	1/0	same as: STANDARD-CHECK ON/OFF
1'14124B	1/0	cross-ref is default/not default
1'14144B	1/0	program-map is default/not default
1'14314B	num	same as: PAGE-SIZE num
1'14060B	1/0	same as: SEPARATE-DATA ON/OFF
1'14160B	62010B/63010B	same as: IMPLICIT ON/OFF
1'14164B	6002432B/6002422B	same as: UNASSIGN-VAR-CHECK ON/OFF

ooo  ND Norsk Data  ooo
Scanned by Jonny Oddene for Sintran Data © 2011

Page 5¶

ND Software Library Diskette¶

Page 1

Containing:
FORTRAN Crosscompiler for ND-100
running on ND-500

Directory Name:
210863G02-XK-01D

User Name: FLOPPY-USER

No	File name	Type	T	Public	Friend	Own	Pages	Bytes
0	DESCRIPTION-FILE	DESC	I	R	R	RWACD	12	22528
1	SCRATCH-SEG-01	LINK	I	R	R	RWACD	1	9
2	SCRATCH-SEG-01	DSEG	I	R	R	RWACD	2	1029
3	SCRATCH-SEG-01	PSEG	I	R	R	RWACD	2	5
4	FORTRAN-100-G02	LINK	I	R	R	RWACD	10	17505
5	FORTRAN-100-G02	DSEG	I	R	R	RWACD	31	483493
6	FORTRAN-100-G02	PSEG	I	R	R	RWACD	100	202226
7	FORT32-1BANK-G02	BRF	I	R	R	RWACD	56	111695
8	FORT32-2BANK-G02	BRF	I	R	R	RWACD	58	115786
9	FORT48-2BANK-G02	BRF	I	R	R	RWACD	58	116188
10	FORT48-1BANK-G02	BRF	I	R	R	RWACD	56	112097
11	IN-FORT-XX-G02	INIT	I	R	R	RWACD	12	20674
12	IN-FORT-XX-G02	RSRC	I	R	R	RWACD	12	21556
13	IN-FORT-XX-G02	PROC	I	R	R	RWACD	66	190696

14 files using 476 pages. 610 pages reserved out of 610 pages.