Examples Compilation &Linking
c:\expt1> QFALL
SUSIQ user routine compiler facility
%susevt-I- Getting SUSIQ.ACQ
Integer*4 ADC0
Integer*4 ADC1
Integer*4 ADC2
Integer*4 TDC0
Integer*4 TDC1
equivalence (Ibuff( 1) ,ADC0)
equivalence (Ibuff( 2) ,ADC1)
equivalence (Ibuff( 3) ,ADC2)
equivalence (Ibuff( 4) ,TDC0)
equivalence (Ibuff( 5) ,TDC1)
SUSEVT - PAA - Done
%suscof-I- Getting SUSIQ.CST
Real*4 NUMOUT
equivalence (const( 1) ,NUMOUT)
-SUSCOF -PAA- Done
%susequ-I- Getting SUSIQ.EQU
...
SUSEQU - PAA - Done
fl /Ox /G2 /c /If:\sqd\srce OUTUSER.FOR...
Microsoft (R) FORTRAN Optimizing Compiler Version 5.10
USER1
fl /Ox /G2 /c /If:\sqd\srce USER1.FOR...
Microsoft (R) FORTRAN Optimizing Compiler Version 5.10
Copyright (c) Microsoft Corp 1982-1991. All rights reserved.
PION.FOR
fl /Ox /G2 /c /If:\sqd\srce PION.FOR...
Microsoft (R) FORTRAN Optimizing Compiler Version 5.10
Copyright (c) Microsoft Corp 1982-1991. All rights reserved.
Inserting/Replacing USER1.OBJ in Quser...
Inserting/Replacing PION.OBJ in Quser...
Microsoft (R) Library Manager Version 3.18
Copyright (C) Microsoft Corp 1983-1991. All rights reserved.
OUTUSER.FOR PION.FOR PROT.FOR SUSGEN.FOR UBOR.FOR
UEOR.FOR USER1.FOR USER2.FOR USER3.FOR USER4.FOR USER5.FOR
11 file(s) 7578 bytes
-------------------------------------------
c:\expt1> QLINK
-------------------------------------------
c:\expt1> QFOR user1
fl /G2 /c /If:\sqd\srce user1.for...
Microsoft (R) FORTRAN Optimizing Compiler Version 5.10