Calling

Non-BASIC-SO

Subroutines

E-6

ISIS-II
PL/H-8B
Vl.l
COMPILATION
OF
MODULE
PLHHODULE
OBJECT
",oDULE
PLACED
IN
:Fl:USRPLM.OBJ
COMPILER
INVOKED
BY:
PLH8B
:Fl:USRPLH.PLH
2
3
4
5
6
1
2
2
2
2
1
PLM:$HODULE:
DO;
USRPLH:
PROCEDURE(PRESULT,PARGA;PARGB,PARGC);
DECLARE
(PRESULT,PARGA,PARGB,PARGC)
ADDRESS;
DECLARE
(RESULT
BASED
PRESULT~
ARCA
BASED
PARCA.
ARCS
BASED
PARCB.
ARCC
BAseD
PARCe)
ADDRESS;
RESULT=ARGA+ARG8+ARGC;
END
USRPL";
END
PLIUHOOULE;
CODE
AREA
SIZE
VARIABLE
AREA
SIZE
~AXI"U"
STACK
SIZE
BB32H
BlUSH
BBB4H
SBD
SO
40
11 LINES
READ
a
PROGRAM
ERROR(S)

Figure E-3.

PL/M-80

Program

FORTRAN
COMPILER
1
2
3
4
FUNCTION
IRTN(IARCA,IARGB,IARCC)
IRTH=IARGA+IARG8+IARGC
RETURN
END
CODE
AREA
SIZE
VARIABLE
AREA
SIZE
HAXI"UH
STACK
SIZE
4
LI
NES READ
BB20H
OBB8H
BBB4H
450
SO
40
B
PROGRAM
ERROR(S)
IN
PROGRAM
UNIT
IRTN
B
TOTAL
PROGRAM
ERROR(S)
END
OF
FORTRAN
COMPILATION

Figure E-4. FORTRAN-80

Program

BASIC-SO