diff options
Diffstat (limited to 'src/interp/fortcall.boot')
| -rw-r--r-- | src/interp/fortcall.boot | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/fortcall.boot b/src/interp/fortcall.boot index d5cefb20..402800b8 100644 --- a/src/interp/fortcall.boot +++ b/src/interp/fortcall.boot @@ -337,7 +337,7 @@ makeUnion aspType == ["Union",[":","fp",aspType],[":","fn","FileName"]] axiomType(a,decls,asps,aspInfo) == - a in asps => + member(a, asps) => entry := first [u for u in aspInfo | first(u) = a] ftc := ["$elt","FortranType","construct"] rc := ["$elt", _ @@ -739,7 +739,7 @@ sendNagmanErrorSignal()== -- $fortranCompilerName := '"f90" inFirstNotSecond(f,s)== - [i for i in f | not i in s] + [i for i in f | not member(i,s)] -- Code for use in the Windows version of the AXIOM/NAG interface. |