software: Added more and more
[pdp8.git] / sw / f4 / FRTSRC / FMAIN.OL
CommitLineData
7af5ad59
PH
1$JOB FORTRAN IV BUILD - MAIN PART
2/ *******************************************************************
3/ *******************************************************************
4/ *******************************************************************
5/
6/ PAL-8 ASSEMBLY
7/
8/ *******************************************************************
9/ *******************************************************************
10/ *******************************************************************
11/
12/ *******************************************************************
13/ FORTRAN IV COMPILER, PASS 1
14/ *******************************************************************
15/
16.PAL F4
17.LOAD F4
18.SAVE SYS F4=0;12200
19.DELETE F4.BN
20/
21/ *******************************************************************
22/ FORTRAN IV COMPILER, PASS 2
23/ *******************************************************************
24/
25.PAL PASS2
26.LOAD PASS2
27.SAVE SYS PASS2=0;5000
28.DELETE PASS2.BN
29/
30/ *******************************************************************
31/ FORTRAN IV COMPILER, PASS 2 OVERLAY
32/ *******************************************************************
33/
34.PAL PASS2O<P2OCFG,PASS2
35.LOAD PASS2O
36.SAVE SYS PASS2O=0;7605
37.DELETE PASS2O.BN
38/
39/ *******************************************************************
40/ FORTRAN IV COMPILER, PASS 3
41/ *******************************************************************
42/
43.PAL PASS3
44.LOAD PASS3
45.SAVE SYS PASS3=0;400
46.DELETE PASS3.BN
47/
48/ *******************************************************************
49/ RALF ASSEMBLER
50/ *******************************************************************
51/
52.R PAL8
53.PAL RALF/W
54.LOAD RALF
55.SAVE SYS RALF.SV=0;200
56.DELETE RALF.BN
57/
58/ *******************************************************************
59/ FORTRAN IV LIBRARIAN
60/ *******************************************************************
61/
62.PAL LIBRA
63.LOAD LIBRA
64.SAVE SYS LIBRA=0;200
65.DELETE LIBRA.BN
66/
67/ *******************************************************************
68/ LINKING LOADER
69/ *******************************************************************
70/
71.PAL LOAD
72.LOAD LOAD
73.SAVE SYS LOAD=0;200
74.DELETE LOAD.BN
75/
76/ *******************************************************************
77/ FORTRAN IV RUNTIME SYSTEM
78/ *******************************************************************
79/
80.PAL FRTS<RTS,RTL
81.LOAD FRTS
82.SAVE SYS FRTS=0;200
83.DELETE FRTS.BN
84/
85/ SQUISHING.
86.SQUISH DSK:/O
87/
88/
89/ *******************************************************************
90/ *******************************************************************
91/ *******************************************************************
92/
93/ STUPID ASSEMBLER PROCEDURES
94/
95/ *******************************************************************
96/ *******************************************************************
97/ *******************************************************************
98/ THE RALF ASSEMBLER REFUSES TO ACCEPPT THE .RA FILES AS THEY
99/ COME FROM KERMIT. I CANNOT INVESTIGATE WHICH PARITY IS GENERATED
100/ BY KERMIT-12. BUT I KNOW THAT PIP MAKES EVERYTHING RIGHT AGAIN.
101/ SO ALL .RA FILES ARE MOVED TROUGH PIP ONCE.
102/
103.R PIP
104*ABS.RA<ABS.RA/A
105*ACOS.RA<ACOS.RA/A
106*ADC.RA<ADC.RA/A
107*ALOG10.RA<ALOG10.RA/A
108*ALOG.RA<ALOG.RA/A
109*AMAX.RA<AMAX.RA/A
110*AMIN.RA<AMIN.RA/A
111*AMOD.RA<AMOD.RA/A
112*ASIN.RA<ASIN.RA/A
113*ATAN2.RA<ATAN2.RA/A
114*ATAN.RA<ATAN.RA/A
115*CABS.RA<CABS.RA/A
116*CARITH.RA<CARITH.RA/A
117*CEXP.RA<CEXP.RA/A
118*CHARS.RA<CHARS.RA/A
119*CHKEOF.RA<CHKEOF.RA/A
120*CLK8A.RA<CLK8A.RA/A
121*CLOCK.RA<CLOCK.RA/A
122*CLOG.RA<CLOG.RA/A
123*CMPLX.RA<CMPLX.RA/A
124*COSD.RA<COSD.RA/A
125*COSH.RA<COSH.RA/A
126*COS.RA<COS.RA/A
127*CSIN.RA<CSIN.RA/A
128*CSQRT.RA<CSQRT.RA/A
129*DABS.RA<DABS.RA/A
130*DATAN2.RA<DATAN2.RA/A
131*DATAN.RA<DATAN.RA/A
132*DATE.RA<DATE.RA/A
133*DBLE.RA<DBLE.RA/A
134*DCOS.RA<DCOS.RA/A
135*DEXP3.RA<DEXP3.RA/A
136*DEXP.RA<DEXP.RA/A
137*DIM.RA<DIM.RA/A
138*DLOG10.RA<DLOG10.RA/A
139*DLOG.RA<DLOG.RA/A
140*DMAX1.RA<DMAX1.RA/A
141*DMIN1.RA<DMIN1.RA/A
142*DMOD.RA<DMOD.RA/A
143*DSIGN.RA<DSIGN.RA/A
144*DSIN.RA<DSIN.RA/A
145*DSQRT.RA<DSQRT.RA/A
146*EXP3.RA<EXP3.RA/A
147*EXPCC.RA<EXPCC.RA/A
148*EXPCI.RA<EXPCI.RA/A
149*EXPDD.RA<EXPDD.RA/A
150*EXPDI.RA<EXPDI.RA/A
151*EXPDR.RA<EXPDR.RA/A
152*EXPIC.RA<EXPIC.RA/A
153*EXPID2.RA<EXPID2.RA/A
154*EXPID.RA<EXPID.RA/A
155*EXPII.RA<EXPII.RA/A
156*EXPIR.RA<EXPIR.RA/A
157*EXP.RA<EXP.RA/A
158*FLOAT.RA<FLOAT.RA/A
159*IDINT.RA<IDINT.RA/A
160*IFIX.RA<IFIX.RA/A
161*LTR.RA<LTR.RA/A
162*ONQIB.RA<ONQIB.RA/A
163*PAUSE.RA<PAUSE.RA/A
164*PLOT.RA<PLOT.RA/A
165*REAL.RA<REAL.RA/A
166*REALTM.RA<REALTM.RA/A
167*RFCV.RA<RFCV.RA/A
168*RFDV.RA<RFDV.RA/A
169*RSW.RA<RSW.RA/A
170*SIGN.RA<SIGN.RA/A
171*SIND.RA<SIND.RA/A
172*SINH.RA<SINH.RA/A
173*SNGL.RA<SNGL.RA/A
174*SQRT.RA<SQRT.RA/A
175*TAND.RA<TAND.RA/A
176*TANH.RA<TANH.RA/A
177*TAN.RA<TAN.RA/A
178*XFIX.RA<XFIX.RA/A$
179/
180/ SQUISHING.
181.SQUISH DSK:/O
182/
183/
184/ *******************************************************************
185/ *******************************************************************
186/ *******************************************************************
187/
188/ RALF LIBRARY ASSEMBLY
189/
190/ *******************************************************************
191/ *******************************************************************
192/ *******************************************************************
193/
194/
195.COMPILE ABS.RA
196.COMPILE ACOS.RA
197.COMPILE ADC.RA
198.COMPILE ALOG10.RA
199.COMPILE ALOG.RA
200.COMPILE AMAX.RA
201.COMPILE AMIN.RA
202.COMPILE AMOD.RA
203.COMPILE ASIN.RA
204.COMPILE ATAN2.RA
205.COMPILE ATAN.RA
206.COMPILE CABS.RA
207.COMPILE CARITH.RA
208.COMPILE CEXP.RA
209.COMPILE CHARS.RA
210.COMPILE CHKEOF.RA
211/.COMPILE CLK8A.RA
212.COMPILE CLOCK.RA
213.COMPILE CLOG.RA
214.COMPILE CMPLX.RA
215.COMPILE COSD.RA
216.COMPILE COSH.RA
217.COMPILE COS.RA
218.COMPILE CSIN.RA
219.COMPILE CSQRT.RA
220.COMPILE DABS.RA
221.COMPILE DATAN2.RA
222.COMPILE DATAN.RA
223.COMPILE DATE.RA
224.COMPILE DBLE.RA
225.COMPILE DCOS.RA
226.COMPILE DEXP3.RA
227.COMPILE DEXP.RA
228.COMPILE DIM.RA
229.COMPILE DLOG10.RA
230.COMPILE DLOG.RA
231.COMPILE DMAX1.RA
232.COMPILE DMIN1.RA
233.COMPILE DMOD.RA
234.COMPILE DSIGN.RA
235.COMPILE DSIN.RA
236.COMPILE DSQRT.RA
237.COMPILE EXP3.RA
238.COMPILE EXPCC.RA
239.COMPILE EXPCI.RA
240.COMPILE EXPDD.RA
241.COMPILE EXPDI.RA
242.COMPILE EXPDR.RA
243.COMPILE EXPIC.RA
244.COMPILE EXPID2.RA
245.COMPILE EXPID.RA
246.COMPILE EXPII.RA
247.COMPILE EXPIR.RA
248.COMPILE EXP.RA
249.COMPILE FLOAT.RA
250.COMPILE IDINT.RA
251.COMPILE IFIX.RA
252.COMPILE LTR.RA
253.COMPILE ONQIB.RA
254.COMPILE PAUSE.RA
255.COMPILE PLOT.RA
256.COMPILE REAL.RA
257.COMPILE REALTM.RA
258.COMPILE RFCV.RA
259.COMPILE RFDV.RA
260.COMPILE RSW.RA
261.COMPILE SIGN.RA
262.COMPILE SIND.RA
263.COMPILE SINH.RA
264.COMPILE SIN.RA
265.COMPILE SNGL.RA
266.COMPILE SQRT.RA
267.COMPILE TAND.RA
268.COMPILE TANH.RA
269.COMPILE TAN.RA
270.COMPILE XFIX.RA
271/
272/
273/ *******************************************************************
274/ *******************************************************************
275/ *******************************************************************
276/
277/ LIBRARY BUILD
278/
279/ *******************************************************************
280/ *******************************************************************
281/ *******************************************************************
282/
283/
284.R LIBRA
285*SYS:FORLIB.RL[20]/Z<ABS,ACOS,ADC,ALOG10/C
286*<ALOG,AMAX,AMIN,AMOD/C
287*<ASIN,ATAN2,ATAN,CABS/C
288*<CARITH,CEXP,CHARS,CHKEOF/C
289*<CLOCK,CLOG,CMPLX/C
290*<COSD,COSH,COS,CSIN,CSQRT/C
291*<DABS,DATAN2,DATAN,DATE/C
292*<DBLE,DCOS,DEXP3,DEXP/C
293*<DIM,DLOG10,DLOG,DMAX1/C
294*<DMIN1,DMOD,DSIGN,DSIN/C
295*<DSQRT,EXP3,EXPCC,EXPCI/C
296*<EXPDD,EXPDI,EXPDR,EXPIC,EXPID2/C
297*<EXPID,EXPII,EXPIR,EXP/C
298*<FLOAT,IDINT,IFIX,LTR,ONQIB/C
299*<PAUSE,PLOT,REAL,REALTM/C
300*<RFCV,RFDV,RSW,SIGN/C
301*<SIND,SINH,SNGL,SQRT/C
302*<TAND,TANH,TAN,XFIX=200$
303/
304/
305/ *******************************************************************
306/ *******************************************************************
307/ *******************************************************************
308/
309/ END OF JOB!
310/
311/ *******************************************************************
312/ *******************************************************************
313/ *******************************************************************
314/
315/ CHAIN BACK TO DSK:
316.SUBMIT DSK:EXIT.BI
317
318
319
320
321
322
323
324
325
326