Added fortran

This commit is contained in:
ceriel 1991-10-07 15:29:25 +00:00
parent 8e9b398e9f
commit 98b019c735
13 changed files with 48 additions and 6 deletions

View file

@ -40,6 +40,7 @@ name asld
({RTS}:.ocm.b={EM}/{RT}cc) \ ({RTS}:.ocm.b={EM}/{RT}cc) \
({RTS}{ANSI?}:.c={EM}/{RT}cc) \ ({RTS}{ANSI?}:.c={EM}/{RT}cc) \
({RTS}{ANSI?}:.cansi={EM}/{RT}ac) \ ({RTS}{ANSI?}:.cansi={EM}/{RT}ac) \
({RTS}:.f={EM}/{RT}ac) \
({RTS}:.p={EM}/{RT}pc) \ ({RTS}:.p={EM}/{RT}pc) \
({RTS}:.mod={EM}/{RT}m2) \ ({RTS}:.mod={EM}/{RT}m2) \
-o > < \ -o > < \
@ -47,10 +48,11 @@ name asld
(.b:{TAIL}={EM}/{LIB}bc) \ (.b:{TAIL}={EM}/{LIB}bc) \
(.ocm:{TAIL}={EM}/{LIB}ocm) \ (.ocm:{TAIL}={EM}/{LIB}ocm) \
(.mod:{TAIL}={EM}/{LIB}m2) \ (.mod:{TAIL}={EM}/{LIB}m2) \
(.f:{TAIL}={EM}/{LIB}f77 {EM}/{LIB}ac) \
(.ocm.b:{TAIL}={OLD_C_LIB}) \ (.ocm.b:{TAIL}={OLD_C_LIB}) \
(.c:{TAIL}={C_LIB}) \ (.c:{TAIL}={C_LIB}) \
(.mod.ocm.b.c.p.e:{TAIL}={EM}/{LIB}mon) \ (.mod.ocm.b.c.p.f.e:{TAIL}={EM}/{LIB}mon) \
(.mod.ocm.b.c.p.e:{TAIL}={EM}/{LIB}fp) \ (.mod.ocm.b.c.p.f.e:{TAIL}={EM}/{LIB}fp) \
(.e:{TAIL}={EM}/{LIB}em {EM}/{LIB}mon2 {EM}/lib/{M}/end_em) (.e:{TAIL}={EM}/{LIB}em {EM}/{LIB}mon2 {EM}/lib/{M}/end_em)
linker linker
end end

View file

@ -21,8 +21,10 @@ name cpp
mapflag -ansi ANSI_C=.ansi mapflag -ansi ANSI_C=.ansi
args {CPP_F?} ({SUFFIX?}:.ocm=-I{EM}/include/occam) \ args {CPP_F?} ({SUFFIX?}:.ocm=-I{EM}/include/occam) \
-D__{NAME} \ -D__{NAME} \
({ANSI_C?}:.ansi={SYSINCLUDES?} {ANSI_C_INCLUDES} {INCLUDES?}) \ {SYSINCLUDES?} \
({ANSI_C?.c}:{SUFFIX}={SYSINCLUDES?} {C_INCLUDES} {INCLUDES?}) \ ({ANSI_C?}:.ansi={ANSI_C_INCLUDES}) \
{C_INCLUDES} \
{INCLUDES?} \
({ANSI_C?.xx}:.xx=-D{NAME} \ ({ANSI_C?.xx}:.xx=-D{NAME} \
-DEM_WSIZE={w} -DEM_PSIZE={p} \ -DEM_WSIZE={w} -DEM_PSIZE={p} \
-DEM_SSIZE={s} -DEM_LSIZE={l} -DEM_FSIZE={f} -DEM_DSIZE={d}) \ -DEM_SSIZE={s} -DEM_LSIZE={l} -DEM_FSIZE={f} -DEM_DSIZE={d}) \
@ -32,6 +34,22 @@ name cpp
stdout stdout
prep is prep is
end end
name f77
from .f
to .c
program {EM}/lib.bin/f2c
mapflag -ansi F2_F={F2_F?} -A
mapflag -w* F2_F={F2_F?} -w*
args \
{F2_F?}
stdin
stdout
prep cond
rts .f
need .f
callname f77
callname f2c
end
name cem name cem
from .c from .c
to .k to .k
@ -58,7 +76,7 @@ name cem
{CPP_F?} \ {CPP_F?} \
{SYSINCLUDES?} \ {SYSINCLUDES?} \
({ANSI_C?}:.ansi={ANSI_C_INCLUDES}) \ ({ANSI_C?}:.ansi={ANSI_C_INCLUDES}) \
({ANSI_C?.c}:.c={C_INCLUDES}) \ {C_INCLUDES} \
{INCLUDES?} \ {INCLUDES?} \
({ANSI_C?}:.ansi=-D__{NAME}) \ ({ANSI_C?}:.ansi=-D__{NAME}) \
({ANSI_C?.xx}:.xx=-D{NAME}) \ ({ANSI_C?.xx}:.xx=-D{NAME}) \

View file

@ -28,6 +28,7 @@ name asld
({RTS}:.ocm.b={EM}/{RT}cc) \ ({RTS}:.ocm.b={EM}/{RT}cc) \
({RTS}{ANSI?}:.c={EM}/{RT}cc) \ ({RTS}{ANSI?}:.c={EM}/{RT}cc) \
({RTS}{ANSI?}:.cansi={EM}/{RT}ac) \ ({RTS}{ANSI?}:.cansi={EM}/{RT}ac) \
({RTS}:.f={EM}/{RT}ac) \
({RTS}:.mod={EM}/{RT}m2) \ ({RTS}:.mod={EM}/{RT}m2) \
({RTS}:.p={EM}/{RT}pc) \ ({RTS}:.p={EM}/{RT}pc) \
-o > < \ -o > < \
@ -35,8 +36,9 @@ name asld
(.b:{TAIL}={EM}/{LIB}bc) \ (.b:{TAIL}={EM}/{LIB}bc) \
(.ocm:{TAIL}={EM}/{LIB}ocm) \ (.ocm:{TAIL}={EM}/{LIB}ocm) \
(.mod:{TAIL}={EM}/{LIB}m2) \ (.mod:{TAIL}={EM}/{LIB}m2) \
(.f:{TAIL}={EM}/{LIB}f77 {EM}/{LIB}ac) \
(.ocm.b:{TAIL}={OLD_C_LIB}) \ (.ocm.b:{TAIL}={OLD_C_LIB}) \
(.c:{TAIL}={C_LIB}) \ (.c:{TAIL}={C_LIB}) \
(.p.b.ocm.mod.c.e:{TAIL}={EM}/{LIB}mon) (.p.b.ocm.mod.c.f.e:{TAIL}={EM}/{LIB}mon)
linker linker
end end

View file

@ -40,11 +40,13 @@ name led
({RTS}{ANSI?}:.c={EM}/{RT}cc) \ ({RTS}{ANSI?}:.c={EM}/{RT}cc) \
({RTS}{ANSI?}:.cansi={EM}/{RT}ac) \ ({RTS}{ANSI?}:.cansi={EM}/{RT}ac) \
({RTS}:.mod={EM}/{RT}m2) \ ({RTS}:.mod={EM}/{RT}m2) \
({RTS}:.f={EM}/{RT}ac) \
({RTS}:.p={EM}/{RT}pc) \ ({RTS}:.p={EM}/{RT}pc) \
-o > < \ -o > < \
(.p:{TAIL}={EM}/{LIB}pc) \ (.p:{TAIL}={EM}/{LIB}pc) \
(.b:{TAIL}={EM}/{LIB}bc) \ (.b:{TAIL}={EM}/{LIB}bc) \
(.mod:{TAIL}={EM}/{LIB}m2) \ (.mod:{TAIL}={EM}/{LIB}m2) \
(.f:{TAIL}={EM}/{LIB}f {EM}/{LIB}ac) \
(.ocm:{TAIL}={EM}/{LIB}ocm) \ (.ocm:{TAIL}={EM}/{LIB}ocm) \
(.ocm.b:{TAIL}={OLD_C_LIB}) \ (.ocm.b:{TAIL}={OLD_C_LIB}) \
(.c:{TAIL}={C_LIB}) \ (.c:{TAIL}={C_LIB}) \

View file

@ -50,6 +50,7 @@ name led
({RTS}:.ocm.b={EM}/{RT}cc) \ ({RTS}:.ocm.b={EM}/{RT}cc) \
({RTS}{ANSI?}:.c={EM}/{RT}cc) \ ({RTS}{ANSI?}:.c={EM}/{RT}cc) \
({RTS}{ANSI?}:.cansi={EM}/{RT}ac) \ ({RTS}{ANSI?}:.cansi={EM}/{RT}ac) \
({RTS}:.f={EM}/{RT}ac) \
({RTS}:.p={EM}/{RT}pc) \ ({RTS}:.p={EM}/{RT}pc) \
({RTS}:.mod={EM}/{RT}m2) \ ({RTS}:.mod={EM}/{RT}m2) \
-o > < \ -o > < \
@ -57,6 +58,7 @@ name led
(.b:{TAIL}={EM}/{LIB}bc) \ (.b:{TAIL}={EM}/{LIB}bc) \
(.ocm:{TAIL}={EM}/{LIB}ocm) \ (.ocm:{TAIL}={EM}/{LIB}ocm) \
(.mod:{TAIL}={EM}/{LIB}m2) \ (.mod:{TAIL}={EM}/{LIB}m2) \
(.f:{TAIL}={EM}/{LIB}f77 {EM}/{LIB}ac) \
(.ocm.b:{TAIL}={OLD_C_LIB}) \ (.ocm.b:{TAIL}={OLD_C_LIB}) \
(.c:{TAIL}={C_LIB}) \ (.c:{TAIL}={C_LIB}) \
{LIBFP?} \ {LIBFP?} \

View file

@ -52,6 +52,7 @@ name led
({RTS}:.ocm.b={EM}/{RT}cc) \ ({RTS}:.ocm.b={EM}/{RT}cc) \
({RTS}{ANSI?}:.c={EM}/{RT}cc) \ ({RTS}{ANSI?}:.c={EM}/{RT}cc) \
({RTS}{ANSI?}:.cansi={EM}/{RT}ac) \ ({RTS}{ANSI?}:.cansi={EM}/{RT}ac) \
({RTS}:.f={EM}/{RT}ac) \
({RTS}:.p={EM}/{RT}pc) \ ({RTS}:.p={EM}/{RT}pc) \
({RTS}:.mod={EM}/{RT}m2) \ ({RTS}:.mod={EM}/{RT}m2) \
-o > < \ -o > < \
@ -59,6 +60,7 @@ name led
(.b:{TAIL}={EM}/{LIB}bc) \ (.b:{TAIL}={EM}/{LIB}bc) \
(.ocm:{TAIL}={EM}/{LIB}ocm) \ (.ocm:{TAIL}={EM}/{LIB}ocm) \
(.mod:{TAIL}={EM}/{LIB}m2) \ (.mod:{TAIL}={EM}/{LIB}m2) \
(.f:{TAIL}={EM}/{LIB}f77 {EM}/{LIB}ac) \
(.ocm.b:{TAIL}={OLD_C_LIB}) \ (.ocm.b:{TAIL}={OLD_C_LIB}) \
(.c:{TAIL}={C_LIB}) \ (.c:{TAIL}={C_LIB}) \
{LIBFP?} \ {LIBFP?} \

View file

@ -54,11 +54,13 @@ name led
({RTS}{ANSI?}:.c={EM}/{RT}cc) \ ({RTS}{ANSI?}:.c={EM}/{RT}cc) \
({RTS}{ANSI?}:.cansi={EM}/{RT}ac) \ ({RTS}{ANSI?}:.cansi={EM}/{RT}ac) \
({RTS}:.mod={EM}/{RT}m2) \ ({RTS}:.mod={EM}/{RT}m2) \
({RTS}:.f={EM}/{RT}ac) \
({RTS}:.p={EM}/{RT}pc) \ ({RTS}:.p={EM}/{RT}pc) \
-o > < \ -o > < \
(.p:{TAIL}={EM}/{LIB}pc) \ (.p:{TAIL}={EM}/{LIB}pc) \
(.b:{TAIL}={EM}/{LIB}bc) \ (.b:{TAIL}={EM}/{LIB}bc) \
(.mod:{TAIL}={EM}/{LIB}m2) \ (.mod:{TAIL}={EM}/{LIB}m2) \
(.f:{TAIL}={EM}/{LIB}f77 {EM}/{LIB}ac) \
(.ocm:{TAIL}={EM}/{LIB}ocm) \ (.ocm:{TAIL}={EM}/{LIB}ocm) \
(.ocm.b:{TAIL}={OLD_C_LIB}) \ (.ocm.b:{TAIL}={OLD_C_LIB}) \
(.c:{TAIL}={C_LIB}) \ (.c:{TAIL}={C_LIB}) \

View file

@ -39,6 +39,7 @@ name led
({RTS}:.ocm.b={EM}/{RT}cc) \ ({RTS}:.ocm.b={EM}/{RT}cc) \
({RTS}{ANSI?}:.c={EM}/{RT}cc) \ ({RTS}{ANSI?}:.c={EM}/{RT}cc) \
({RTS}{ANSI?}:.cansi={EM}/{RT}ac) \ ({RTS}{ANSI?}:.cansi={EM}/{RT}ac) \
({RTS}:.f={EM}/{RT}ac) \
({RTS}:.p={EM}/{RT}pc) \ ({RTS}:.p={EM}/{RT}pc) \
({RTS}:.mod={EM}/{RT}m2) \ ({RTS}:.mod={EM}/{RT}m2) \
-o > < \ -o > < \
@ -46,6 +47,7 @@ name led
(.b:{TAIL}={EM}/{LIB}bc) \ (.b:{TAIL}={EM}/{LIB}bc) \
(.ocm:{TAIL}={EM}/{LIB}ocm) \ (.ocm:{TAIL}={EM}/{LIB}ocm) \
(.mod:{TAIL}={EM}/{LIB}m2) \ (.mod:{TAIL}={EM}/{LIB}m2) \
(.f:{TAIL}={EM}/{LIB}f77 {EM}/{LIB}ac) \
(.ocm.b:{TAIL}={OLD_C_LIB}) \ (.ocm.b:{TAIL}={OLD_C_LIB}) \
(.c:{TAIL}={C_LIB}) \ (.c:{TAIL}={C_LIB}) \
(.e:{TAIL}={EM}/{LIB}mon {EM}/{LIB}mon2 {EM}/{LIB}em {EM}/lib/{M}/end_em) (.e:{TAIL}={EM}/{LIB}mon {EM}/{LIB}mon2 {EM}/{LIB}em {EM}/lib/{M}/end_em)

View file

@ -54,6 +54,7 @@ name led
({RTS}:.ocm.b={EM}/{RT}cc) \ ({RTS}:.ocm.b={EM}/{RT}cc) \
({RTS}{ANSI?}:.c={EM}/{RT}cc) \ ({RTS}{ANSI?}:.c={EM}/{RT}cc) \
({RTS}{ANSI?}:.cansi={EM}/{RT}ac) \ ({RTS}{ANSI?}:.cansi={EM}/{RT}ac) \
({RTS}:.f={EM}/{RT}ac) \
({RTS}:.p={EM}/{RT}pc) \ ({RTS}:.p={EM}/{RT}pc) \
({RTS}:.mod={EM}/{RT}m2) \ ({RTS}:.mod={EM}/{RT}m2) \
-o > < \ -o > < \
@ -61,6 +62,7 @@ name led
(.b:{TAIL}={EM}/{LIB}bc) \ (.b:{TAIL}={EM}/{LIB}bc) \
(.ocm:{TAIL}={EM}/{LIB}ocm) \ (.ocm:{TAIL}={EM}/{LIB}ocm) \
(.mod:{TAIL}={EM}/{LIB}m2) \ (.mod:{TAIL}={EM}/{LIB}m2) \
(.f:{TAIL}={EM}/{LIB}f77 {EM}/{LIB}ac) \
(.ocm.b:{TAIL}={OLD_C_LIB}) \ (.ocm.b:{TAIL}={OLD_C_LIB}) \
(.c:{TAIL}={C_LIB}) \ (.c:{TAIL}={C_LIB}) \
{LIBFP?} \ {LIBFP?} \

View file

@ -40,6 +40,7 @@ name led
({RTS}:.ocm.b={EM}/{RT}cc) \ ({RTS}:.ocm.b={EM}/{RT}cc) \
({RTS}{ANSI?}:.c={EM}/{RT}cc) \ ({RTS}{ANSI?}:.c={EM}/{RT}cc) \
({RTS}{ANSI?}:.cansi={EM}/{RT}ac) \ ({RTS}{ANSI?}:.cansi={EM}/{RT}ac) \
({RTS}:.f={EM}/{RT}ac) \
({RTS}:.mod={EM}/{RT}m2) \ ({RTS}:.mod={EM}/{RT}m2) \
({RTS}:.p.8={EM}/{RT}pc) \ ({RTS}:.p.8={EM}/{RT}pc) \
-o > < \ -o > < \
@ -48,6 +49,7 @@ name led
(.b:{TAIL}={EM}/{LIB}bc) \ (.b:{TAIL}={EM}/{LIB}bc) \
(.ocm:{TAIL}={EM}/{LIB}ocm) \ (.ocm:{TAIL}={EM}/{LIB}ocm) \
(.mod:{TAIL}={EM}/{LIB}m2) \ (.mod:{TAIL}={EM}/{LIB}m2) \
(.f:{TAIL}={EM}/{LIB}f77 {EM}/{LIB}ac) \
(.ocm.b:{TAIL}={OLD_C_LIB}) \ (.ocm.b:{TAIL}={OLD_C_LIB}) \
(.c:{TAIL}={C_LIB}) \ (.c:{TAIL}={C_LIB}) \
{LIBDB?} \ {LIBDB?} \

View file

@ -56,6 +56,7 @@ name led
({RTS}:.ocm.b={EM}/{RT}cc) \ ({RTS}:.ocm.b={EM}/{RT}cc) \
({RTS}{ANSI?}:.c={EM}/{RT}cc) \ ({RTS}{ANSI?}:.c={EM}/{RT}cc) \
({RTS}{ANSI?}:.cansi={EM}/{RT}ac) \ ({RTS}{ANSI?}:.cansi={EM}/{RT}ac) \
({RTS}:.f={EM}/{RT}ac) \
({RTS}:.p={EM}/{RT}pc) \ ({RTS}:.p={EM}/{RT}pc) \
({RTS}:.mod={EM}/{RT}m2) \ ({RTS}:.mod={EM}/{RT}m2) \
-o > < \ -o > < \
@ -63,6 +64,7 @@ name led
(.b:{TAIL}={EM}/{LIB}bc) \ (.b:{TAIL}={EM}/{LIB}bc) \
(.ocm:{TAIL}={EM}/{LIB}ocm) \ (.ocm:{TAIL}={EM}/{LIB}ocm) \
(.mod:{TAIL}={EM}/{LIB}m2) \ (.mod:{TAIL}={EM}/{LIB}m2) \
(.f:{TAIL}={EM}/{LIB}f77 {EM}/{LIB}ac) \
(.ocm.b:{TAIL}={OLD_C_LIB}) \ (.ocm.b:{TAIL}={OLD_C_LIB}) \
(.c:{TAIL}={C_LIB}) \ (.c:{TAIL}={C_LIB}) \
{LIBFP?} \ {LIBFP?} \

View file

@ -58,6 +58,7 @@ name led
({RTS}{ANSI?}:.c={EM}/{RT}cc) \ ({RTS}{ANSI?}:.c={EM}/{RT}cc) \
({RTS}{ANSI?}:.cansi={EM}/{RT}ac) \ ({RTS}{ANSI?}:.cansi={EM}/{RT}ac) \
({RTS}:.mod={EM}/{RT}m2) \ ({RTS}:.mod={EM}/{RT}m2) \
({RTS}:.f={EM}/{RT}ac) \
({RTS}:.p.8={EM}/{RT}pc) \ ({RTS}:.p.8={EM}/{RT}pc) \
-o > < \ -o > < \
(.8:{TAIL}={EM}/{LIB}a68s) \ (.8:{TAIL}={EM}/{LIB}a68s) \
@ -65,6 +66,7 @@ name led
(.b:{TAIL}={EM}/{LIB}bc) \ (.b:{TAIL}={EM}/{LIB}bc) \
(.ocm:{TAIL}={EM}/{LIB}ocm) \ (.ocm:{TAIL}={EM}/{LIB}ocm) \
(.mod:{TAIL}={EM}/{LIB}m2) \ (.mod:{TAIL}={EM}/{LIB}m2) \
(.f:{TAIL}={EM}/{LIB}f77 {EM}/{LIB}ac) \
(.ocm.b:{TAIL}={OLD_C_LIB}) \ (.ocm.b:{TAIL}={OLD_C_LIB}) \
(.c:{TAIL}={C_LIB}) \ (.c:{TAIL}={C_LIB}) \
{LIBFP?} \ {LIBFP?} \

View file

@ -53,6 +53,7 @@ name led
({RTS}{ANSI?}:.c={EM}/{RT}cc) \ ({RTS}{ANSI?}:.c={EM}/{RT}cc) \
({RTS}{ANSI?}:.cansi={EM}/{RT}ac) \ ({RTS}{ANSI?}:.cansi={EM}/{RT}ac) \
({RTS}:.mod={EM}/{RT}m2) \ ({RTS}:.mod={EM}/{RT}m2) \
({RTS}:.f={EM}/{RT}ac) \
({RTS}:.p.8={EM}/{RT}pc) \ ({RTS}:.p.8={EM}/{RT}pc) \
-o > < \ -o > < \
(.8:{TAIL}={EM}/{LIB}a68s) \ (.8:{TAIL}={EM}/{LIB}a68s) \
@ -60,6 +61,7 @@ name led
(.b:{TAIL}={EM}/{LIB}bc) \ (.b:{TAIL}={EM}/{LIB}bc) \
(.ocm:{TAIL}={EM}/{LIB}ocm) \ (.ocm:{TAIL}={EM}/{LIB}ocm) \
(.mod:{TAIL}={EM}/{LIB}m2) \ (.mod:{TAIL}={EM}/{LIB}m2) \
(.f:{TAIL}={EM}/{LIB}f77 {EM}/{LIB}ac) \
(.ocm.b:{TAIL}={OLD_C_LIB}) \ (.ocm.b:{TAIL}={OLD_C_LIB}) \
(.c:{TAIL}={C_LIB}) \ (.c:{TAIL}={C_LIB}) \
{LIBDB?} \ {LIBDB?} \