From 20a8ad75b7e37bb087342e80e3f1c18eb74e4af8 Mon Sep 17 00:00:00 2001 From: dos-reis Date: Fri, 9 May 2008 17:39:54 +0000 Subject: * interp/as.boot: Remove Old Boot semantics. * interp/br-con.boot: Likewise. * interp/br-data.boot: Likewise. * interp/br-op1.boot: Likewise. * interp/br-op2.boot: Likewise. * interp/br-saturn.boot: Likewise. * interp/compiler.boot: Likewise. * interp/define.boot: Likewise. * interp/fortcall.boot: Likewise. * interp/functor.boot: Likewise. * interp/htsetvar.boot: Likewise. * interp/newfort.boot: Likewise. * interp/nruncomp.boot: Likewise. * interp/nrunopt.boot: Likewise. --- src/interp/define.boot | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/interp/define.boot') diff --git a/src/interp/define.boot b/src/interp/define.boot index 94df2a18..673c45cd 100644 --- a/src/interp/define.boot +++ b/src/interp/define.boot @@ -703,7 +703,7 @@ genDomainOps(viewName,dom,cat) == for [op,sig] in siglist]]]] $getDomainCode:= [cd,:$getDomainCode] for [opsig,cond,:.] in oplist for i in 0.. repeat - if opsig in $ConditionalOperators then cond:=nil + if member(opsig,$ConditionalOperators) then cond:=nil [op,sig]:=opsig $e:= addModemap(op,dom,sig,cond,['ELT,viewName,i],$e) viewName -- cgit v1.2.3